Module Async_smtp.Mail_from_lexer_types

type email = {
local_part : string;
domain : string option;
}
val compare_email : email ‑> email ‑> int
val email_of_sexp : Sexplib.Sexp.t ‑> email
val sexp_of_email : email ‑> Sexplib.Sexp.t
type email_with_suffix = {
prefix : string option;
sender : [ `Email of email | `Null ];
suffix : string;
}
val compare_email_with_suffix : email_with_suffix ‑> email_with_suffix ‑> int
val email_with_suffix_of_sexp : Sexplib.Sexp.t ‑> email_with_suffix
val sexp_of_email_with_suffix : email_with_suffix ‑> Sexplib.Sexp.t