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

Add CCEqual.physical

Browse source
This commit is contained in:
Jacques-Pascal Deplaix 2017-12-31 12:02:26 +01:00
parent 3c808f397e
commit aa0f34c5c9
2 changed files with 5 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
src/core/CCEqual.ml
View file

@ -6,6 +6,7 @@
type 'a t = 'a -> 'a -> bool type 'a t = 'a -> 'a -> bool
let poly = Pervasives.(=) let poly = Pervasives.(=)
let physical = Pervasives.(==)
let int : int t = (=) let int : int t = (=)
let string : string t = Pervasives.(=) let string : string t = Pervasives.(=)

4
src/core/CCEqual.mli
View file

@ -11,6 +11,10 @@ type 'a t = 'a -> 'a -> bool
val poly : 'a t val poly : 'a t
(** Standard polymorphic equality *) (** Standard polymorphic equality *)
val physical : 'a t
(** Standard physical equality
@since NEXT_RELEASE *)
val int : int t val int : int t
val string : string t val string : string t
val bool : bool t val bool : bool t