summaryrefslogtreecommitdiff
path: root/stdlib/int32.ml
diff options
context:
space:
mode:
authorXavier Leroy <xavier.leroy@inria.fr>2007-01-30 09:34:36 +0000
committerXavier Leroy <xavier.leroy@inria.fr>2007-01-30 09:34:36 +0000
commit6ce858f4a8cff5682a88f2978eb5a7618e48def6 (patch)
treeb1df0f592d045b9b4fc95852c1f305eb7cffed73 /stdlib/int32.ml
parent959fa08e78ecadb5bc241d05511537766bfe809b (diff)
downloadocaml-6ce858f4a8cff5682a88f2978eb5a7618e48def6.tar.gz
Ensure type specialization for the 'compare' functions (PR#4194)
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@7818 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'stdlib/int32.ml')
-rw-r--r--stdlib/int32.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/stdlib/int32.ml b/stdlib/int32.ml
index 0700ffdd99..64d525e88f 100644
--- a/stdlib/int32.ml
+++ b/stdlib/int32.ml
@@ -51,4 +51,4 @@ external of_string : string -> int32 = "caml_int32_of_string"
type t = int32
-let compare = (Pervasives.compare: t -> t -> int)
+let compare (x: t) (y: t) = Pervasives.compare x y