sig val p_content : MrMime_contentType.content MrMime_parser.t end