[khatus.git] / src / ocaml / lib / khatus_msg_parser.mli

val parse_msg
  : Lexing.lexbuf
  ->
    ( Khatus_msg.t
    , [ `Bad_format_of_msg_head
      | `Bad_format_of_msg_content
      ]
    ) result
Commit	Line	Data
c6a7396e SK	1	val parse_msg
	2	: Lexing.lexbuf
	3	->
	4	( Khatus_msg.t
	5	, [ `Bad_format_of_msg_head
	6	\| `Bad_format_of_msg_content
	7	]
	8	) result