Implement a basic cache dumper

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

diff --git a/src/ocaml/lib/khatus_msg_parser.mli b/src/ocaml/lib/khatus_msg_parser.mli
new file mode 100644 (file)
index 0000000..f177b28
--- /dev/null
+++ b/src/ocaml/lib/khatus_msg_parser.mli
@@ -0,0 +1,8 @@
+val parse_msg
+  : Lexing.lexbuf
+  ->
+    ( Khatus_msg.t
+    , [ `Bad_format_of_msg_head
+      | `Bad_format_of_msg_content
+      ]
+    ) result