Up

module Lexer

: sig
#
val message : Lexer_state.t -> Lexing.lexbuf -> Grammar.token
#
val content_type : Lexing.lexbuf -> Grammar.token
#
val find_boundary : string -> Lexing.lexbuf -> [
| `Open_boundary_first of int
| `Open_boundary of int * int
| `Close_boundary of int * int
| `Eof
]
#
val is_rfc2045_token : Lexing.lexbuf -> bool
#
val decode_base64 : int -> is_text:bool -> Lexing.lexbuf -> Core.Std.Bigbuffer.t * [
| `Ok
| `Unexpected_characters
| `Wrong_padding
]
#
val encode_base64 : int -> is_text:bool -> Lexing.lexbuf -> Core.Std.Bigbuffer.t
#
val decode_quoted_printable : int -> Lexing.lexbuf -> Core.Std.Bigbuffer.t * [
| `Ok
| `Unexpected_characters
]
#
val encode_quoted_printable : int -> is_text:bool -> Lexing.lexbuf -> Core.Std.Bigbuffer.t
end