sig   val add_encoding :     string ->     (unit MrMime_parser.t ->      unit MrMime_parser.t -> MrMime_message.encoding MrMime_parser.t) ->     unit   val add_content :     string ->     (string option ->      MrMime_content.t ->      MrMime_message.field_message list ->      MrMime_message.content MrMime_parser.t) ->     unit end