diff options
author | Xavier Leroy <xavier.leroy@inria.fr> | 2007-01-30 09:34:36 +0000 |
---|---|---|
committer | Xavier Leroy <xavier.leroy@inria.fr> | 2007-01-30 09:34:36 +0000 |
commit | 6ce858f4a8cff5682a88f2978eb5a7618e48def6 (patch) | |
tree | b1df0f592d045b9b4fc95852c1f305eb7cffed73 /stdlib/int32.ml | |
parent | 959fa08e78ecadb5bc241d05511537766bfe809b (diff) | |
download | ocaml-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.ml | 2 |
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 |