Module Email_message.Email_grammar

type token =
| ERROR of string
| EOF
| FIELD of string * string
| HEADER_END
| NO_HEADER_END
| OCTET_STREAM_OFFSET of int
val message : (Lexing.lexbuf ‑> token) ‑> Lexing.lexbuf ‑> Email_grammar_types.message
val only_header : (Lexing.lexbuf ‑> token) ‑> Lexing.lexbuf ‑> Email_grammar_types.header