ocaml-containers/src/core/CCBool.ml

14 lines
298 B
OCaml

(* This file is free software, part of containers. See file "license" for more details. *)
type t = bool
let equal (a:bool) b = Pervasives.(=) 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