new module CCChar

README.adoc

@@ -117,6 +117,8 @@ Documentation http://cedeela.fr/~simon/software/containers[here].
 - `CCError` (monadic error handling, very useful)
 - `CCIO`, basic utilities for IO (channels, files)
 - `CCInt64,` utils for `int64`
+- `CCChar`, utils for `char`
+- `CCFormat`, pretty-printing utils around `Format`
 
 === Containers.data
 

_oasis

@@ -45,8 +45,8 @@ Library "containers"
   Path:             src/core
   Modules:          CCVector, CCPrint, CCError, CCHeap, CCList, CCOpt, CCPair,
                     CCFun, CCHash, CCInt, CCBool, CCFloat, CCArray, CCRef, CCSet,
-                    CCOrd, CCRandom, CCString, CCHashtbl, CCMap, CCFormat, CCIO, CCInt64,
+                    CCOrd, CCRandom, CCString, CCHashtbl, CCMap, CCFormat, CCIO,
-                    Containers
+                    CCInt64, CCChar, Containers
   BuildDepends:     bytes
   # BuildDepends:     bytes, bisect_ppx
 

doc/intro.txt

@@ -25,6 +25,7 @@ by ocamlfind).
 {!modules:
 CCArray
 CCBool
+CCChar
 CCError
 CCFloat
 CCFun

src/core/CCChar.ml

@@ -0,0 +1,14 @@
+(* This file is free software, part of containers. See file "license" for more details. *)
+
+(** {1 Utils around char}
+
+  @since NEXT_RELEASE *)
+
+type t = char
+
+let equal (a:char) b = a=b
+let compare = Char.compare
+
+let print = Format.pp_print_char
+
+

src/core/CCChar.mli

@@ -0,0 +1,14 @@
+
+(* This file is free software, part of containers. See file "license" for more details. *)
+
+(** {1 Utils around char}
+
+  @since NEXT_RELEASE *)
+
+type t = char
+
+val equal : t -> t -> bool
+val compare : t -> t -> int
+
+val print : Format.formatter -> t -> unit
+