Source file stdcompat__unit.ml

1
2
3
4
5
6
7
8
9
10
11
12

include Unit

(*
type t = unit = ()

let equal () () = true

let compare () () = 0

let to_string () = "()"
*)