ocaml-containers/src/core/CCBool.ml
2017-07-21 15:02:27 +02:00

14 lines
283 B
OCaml

(* This file is free software, part of containers. See file "license" for more details. *)
type t = bool
let equal (a:bool) b = a=b
let compare (a:bool) b = Pervasives.compare a b
let negate = not
type 'a printer = Format.formatter -> 'a -> unit
let pp = Format.pp_print_bool