add todos

src/amount.mli

@@ -18,6 +18,8 @@ val make :
 
 (* fail on differents currencies *)
 val compare : t -> t -> int
+
+(* TODO rename pp_dump *)
 val pp : Format.formatter -> t -> unit
 val to_string : t -> string
 val of_string : string -> (t, string) result

src/secmod_eddsa.ml

@@ -1,5 +1,6 @@
 (* TODO
    ! use lock
+   !? Scanf not thread-safe
    schedule tasks
    sign: check timestamps before signing *)
 (* IMPROVE

src/time.mli

@@ -14,6 +14,8 @@ module TimeRelative : sig
   val bin : t Bin.t
   val caqti : t Caqti_type.t
   val jsont : t Jsont.t
+
+  (* TODO rename pp_dump *)
   val pp : Format.formatter -> t -> unit
 end
 
@@ -30,6 +32,8 @@ module TimeAbsolute : sig
   val sub : t -> TimeRelative.t -> t
   val of_s : int64 -> t
   val of_ptime : Ptime.t -> t
+
+  (* TODO rename pp_dump *)
   val pp : Format.formatter -> t -> unit
 end
 
@@ -54,5 +58,7 @@ module Timestamp : sig
   val bin : t Bin.t
   val caqti : t Caqti_type.t
   val jsont : t Jsont.t
+
+  (* TODO rename pp_dump *)
   val pp : Format.formatter -> t -> unit
 end