simon/ocaml-containers
1
0
Fork 0
mirror of https://github.com/c-cube/ocaml-containers.git synced 2025-12-06 03:05:28 -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
(*$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
let (=) : t -> t -> bool = Stdlib.(=)
let (<>) : t -> t -> bool = Stdlib.(<>)
let (<) : t -> t -> bool = Stdlib.(<)
let (>) : t -> t -> bool = Stdlib.(>)
let (<=) : t -> t -> bool = Stdlib.(<=)
let (>=) : t -> t -> bool = Stdlib.(>=)
let (=) : t -> t -> bool = CCShims_.Stdlib.(=)
let (<>) : t -> t -> bool = CCShims_.Stdlib.(<>)
let (<) : t -> t -> bool = CCShims_.Stdlib.(<)
let (>) : t -> t -> bool = CCShims_.Stdlib.(>)
let (<=) : t -> t -> bool = CCShims_.Stdlib.(<=)
let (>=) : t -> t -> bool = CCShims_.Stdlib.(>=)
end
include Infix