From b7d92fa53e5b5e186fb8c62d4e86de1baa9ccef8 Mon Sep 17 00:00:00 2001 From: swrup Date: Thu, 12 Mar 2026 17:20:03 +0100 Subject: [PATCH] add todo rename pp_dump --- src/amount.mli | 2 ++ src/time.mli | 6 ++++++ 2 files changed, 8 insertions(+) diff --git a/src/amount.mli b/src/amount.mli index 75b6773f..01496ff5 100644 --- a/src/amount.mli +++ b/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 diff --git a/src/time.mli b/src/time.mli index 7955f822..9247fe5e 100644 --- a/src/time.mli +++ b/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