sig val p_msg_id : MrMime_msgID.msg_id MrMime_parser.t end