mirror of
https://github.com/c-cube/ocaml-containers.git
synced 2025-12-06 11:15:31 -05:00
missing function
This commit is contained in:
parent
93568949e6
commit
71ad95044f
2 changed files with 2 additions and 0 deletions
|
|
@ -11,6 +11,7 @@ let int : int t = (=)
|
||||||
let string : string t = (=)
|
let string : string t = (=)
|
||||||
let bool : bool t = (=)
|
let bool : bool t = (=)
|
||||||
let float : float t = (=)
|
let float : float t = (=)
|
||||||
|
let unit () () = true
|
||||||
|
|
||||||
let rec list f l1 l2 = match l1, l2 with
|
let rec list f l1 l2 = match l1, l2 with
|
||||||
| [], [] -> true
|
| [], [] -> true
|
||||||
|
|
|
||||||
|
|
@ -15,6 +15,7 @@ val int : int t
|
||||||
val string : string t
|
val string : string t
|
||||||
val bool : bool t
|
val bool : bool t
|
||||||
val float : float t
|
val float : float t
|
||||||
|
val unit : unit t
|
||||||
|
|
||||||
val list : 'a t -> 'a list t
|
val list : 'a t -> 'a list t
|
||||||
val array : 'a t -> 'a array t
|
val array : 'a t -> 'a array t
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue