better if-not-match
This commit is contained in:
parent
98ba917cfb
commit
85b6dd38ae
167 changed files with 18509 additions and 109 deletions
27
.jjconflict-side-0/src/amount.mli
Normal file
27
.jjconflict-side-0/src/amount.mli
Normal file
|
|
@ -0,0 +1,27 @@
|
|||
type sign =
|
||||
| Sign_plus
|
||||
| Sign_minus
|
||||
|
||||
type t = private {
|
||||
sign: sign option;
|
||||
currency: string;
|
||||
value: Int64.t;
|
||||
fraction: Int32.t;
|
||||
}
|
||||
|
||||
val make :
|
||||
sign:sign option ->
|
||||
currency:string ->
|
||||
value:Int64.t ->
|
||||
fraction:Int32.t ->
|
||||
(t, string) result
|
||||
|
||||
val pp : Format.formatter -> t -> unit
|
||||
val to_string : t -> string
|
||||
val of_string : string -> (t, string) result
|
||||
|
||||
(* - *)
|
||||
val jsont : t Jsont.t
|
||||
val bin : t Bin.t
|
||||
val bin_nbo : t Bin.t
|
||||
(* [caqti] is in pg_type.ml *)
|
||||
Loading…
Add table
Add a link
Reference in a new issue