summaryrefslogtreecommitdiff
path: root/byterun/compare.c
diff options
context:
space:
mode:
authorXavier Leroy <xavier.leroy@inria.fr>2006-05-04 12:41:26 +0000
committerXavier Leroy <xavier.leroy@inria.fr>2006-05-04 12:41:26 +0000
commitb89cda5f86a61bd68448c1aaa24c6ea767a5bfaf (patch)
tree7724b794e66d7296f50547124ce0059fc3536bc1 /byterun/compare.c
parent5d7edf5d8cce41eb9582ab79433d509e3a217261 (diff)
downloadocaml-b89cda5f86a61bd68448c1aaa24c6ea767a5bfaf.tar.gz
Nettoyages pour modele IL32LLP64
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@7394 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'byterun/compare.c')
-rw-r--r--byterun/compare.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/byterun/compare.c b/byterun/compare.c
index a709b2e473..3337f77d05 100644
--- a/byterun/compare.c
+++ b/byterun/compare.c
@@ -83,7 +83,7 @@ static struct compare_item * compare_resize_stack(struct compare_item * sp)
#define LESS -1
#define EQUAL 0
#define GREATER 1
-#define UNORDERED (1L << (8 * sizeof(value) - 1))
+#define UNORDERED ((intnat)1 << (8 * sizeof(value) - 1))
/* The return value of compare_val is as follows:
> 0 v1 is greater than v2