swrup/mte
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

better amount.ml

Browse source
This commit is contained in:
swrup 2026-02-11 00:06:28 +01:00
parent bc1cc013ee
commit 98ba917cfb
4 changed files with 82 additions and 85 deletions
Download patch file Download diff file Expand all files Collapse all files

13
src/amount.mli
View file

@ -1,6 +1,3 @@
(* TODO
? have a currency agnostic amount_lib.ml and specialize amount.ml to Config.currency *)
type sign =
| Sign_plus
| Sign_minus
@ -22,13 +19,9 @@ val make :
val pp : Format.formatter -> t -> unit
val to_string : t -> string
val of_string : string -> (t, string) result
val currency_len : int
val jsont : t Jsont.t
(* only for encoding *)
(* - *)
val jsont : t Jsont.t
val bin : t Bin.t
val bin_nbo : t Bin.t
(* TODO
dummy value to use as placeholder for WIP *)
val dummy_value : t
(* [caqti] is in pg_type.ml *)