ocaml-containers/src/core/CCUnit.ml
2022-02-21 17:12:32 -05:00

13 lines
168 B
OCaml

[@@@ifge 4.08]
include Unit
[@@@else_]
type t = unit
let[@inline] equal (_:t) (_:t) = true
let[@inline] compare (_:t) (_:t) = 0
let to_string () = "()"
[@@@endif]