Module Email_message__.Email_grammar_types
type header
= (string * string) list
type content_offset
=[
|
`Content_offset of int
|
`Bad_headers of int
|
`Truncated
]
type message
=[
|
`Message of header * content_offset
]