summaryrefslogtreecommitdiffstats
path: root/stdlib/int32.ml
diff options
context:
space:
mode:
authorGabriel Scherer <gabriel.scherer@gmail.com>2014-12-21 11:46:08 +0000
committerGabriel Scherer <gabriel.scherer@gmail.com>2014-12-21 11:46:08 +0000
commit85b75d7963febd9f31a3fbf52a7846ee28c429e7 (patch)
treee33475baa95a388ff036a13f8a0c590b95f0fcb3 /stdlib/int32.ml
parentc7d7103646aa5078d326a78c3d0f51709d38f579 (diff)
PR#6494: Add equal function in modules Big_int, Bytes, Char, Digest, Int32, Int64, Nativeint, Num and String
(Romain Calascibetta) From: Romain Calascibetta <romain.calascibetta@gmail.com> git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@15725 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'stdlib/int32.ml')
-rw-r--r--stdlib/int32.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/stdlib/int32.ml b/stdlib/int32.ml
index e8e55ddc8..63c99e3d4 100644
--- a/stdlib/int32.ml
+++ b/stdlib/int32.ml
@@ -50,3 +50,4 @@ external of_string : string -> int32 = "caml_int32_of_string"
type t = int32
let compare (x: t) (y: t) = Pervasives.compare x y
+let equal (x: t) (y: t) = compare x y = 0