MrMime_header.Decoder

sig
  val header :
    ([> MrMime_header.field ] as 'a) list ->
    (MrMime_header.header * 'a list) MrMime_parser.t
end