Refactor cache dumper

[khatus.git] / src / ocaml / lib / khatus_time.ml

diff --git a/src/ocaml/lib/khatus_time.ml b/src/ocaml/lib/khatus_time.ml
index cf6538a..9410417 100644 (file)
--- a/src/ocaml/lib/khatus_time.ml
+++ b/src/ocaml/lib/khatus_time.ml
@@ -21,4 +21,5 @@ let to_string t =
   |> List.hd
 
 let of_string s =
+  (* TODO: Shall we validate time string format at msg parse time? *)
   float_of_string s