simon/ocaml-containers
1
0
Fork 0
mirror of https://github.com/c-cube/ocaml-containers.git synced 2025-12-06 11:15:31 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

attempt to fix tests

Browse source
This commit is contained in:
Simon Cruanes 2021-03-13 16:56:21 -05:00
parent 2c96dd1b55
commit 0de515b94b
1 changed files with 7 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
src/core/CCChar.ml
View file

@ -21,15 +21,15 @@ let to_int = Char.code
let to_string c = String.make 1 c let to_string c = String.make 1 c
(*$Q to_string (*$Q to_string
(Q.string_of_size (Q.Gen.return 1)) (fun s -> Stdlib.(=) (to_string s.[0]) s) (Q.string_of_size (Q.Gen.return 1)) (fun s -> CCShims_.Stdlib.(=) (to_string s.[0]) s)
*) *)
module Infix = struct module Infix = struct
let (=) : t -> t -> bool = Stdlib.(=) let (=) : t -> t -> bool = CCShims_.Stdlib.(=)
let (<>) : t -> t -> bool = Stdlib.(<>) let (<>) : t -> t -> bool = CCShims_.Stdlib.(<>)
let (<) : t -> t -> bool = Stdlib.(<) let (<) : t -> t -> bool = CCShims_.Stdlib.(<)
let (>) : t -> t -> bool = Stdlib.(>) let (>) : t -> t -> bool = CCShims_.Stdlib.(>)
let (<=) : t -> t -> bool = Stdlib.(<=) let (<=) : t -> t -> bool = CCShims_.Stdlib.(<=)
let (>=) : t -> t -> bool = Stdlib.(>=) let (>=) : t -> t -> bool = CCShims_.Stdlib.(>=)
end end
include Infix include Infix