mirror of
https://github.com/c-cube/ocaml-containers.git
synced 2025-12-06 03:05:28 -05:00
96ed8a37ab
- also make `unlabel` an explicit operation - use `Stdlib` instead of `Pervasives` - remove some warnings in Format
16 lines
305 B
OCaml
16 lines
305 B
OCaml
|
|
(* This file is free software, part of containers. See file "license" for more details. *)
|
|
|
|
open CCShims_
|
|
|
|
type t = bool
|
|
|
|
let equal (a:bool) b = Stdlib.(=) a b
|
|
|
|
let compare (a:bool) b = Stdlib.compare a b
|
|
|
|
let negate = not
|
|
|
|
type 'a printer = Format.formatter -> 'a -> unit
|
|
|
|
let pp = Format.pp_print_bool
|