Module MrMime.Convenience

module Convenience: sig .. end

type 'a decoding = [ `Continue | `Done of 'a | `Error of MrMime.Parser.err ] 

type ('input, 'a) decoder 

val decoder_src : ('input, 'a) decoder -> 'input MrMime.Input.t

val decoder : 'input MrMime.Input.t ->
       'a MrMime.Parser.t -> ('input, 'a) decoder

val decode : ('input, 'a) decoder -> 'a decoding

val src : ('input, 'a) decoder -> string -> int -> int -> unit

val decoding : ('input, 'a) decoder ->
       'b MrMime.Parser.t -> ('input, 'b) decoder