sig
  type result = [ `Clean of string | `Dirty of string | `Wrong_padding ]
  val is_b64 : char -> bool
  val decode :
    unit Parser.t -> unit Parser.t -> MrMime_base64.Decoder.result Parser.t
  val inline : unit -> MrMime_base64.Decoder.result Parser.t
end