summaryrefslogtreecommitdiff
path: root/byterun/hash.c
diff options
context:
space:
mode:
Diffstat (limited to 'byterun/hash.c')
-rw-r--r--byterun/hash.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/byterun/hash.c b/byterun/hash.c
index 17748e3933..2b8a235756 100644
--- a/byterun/hash.c
+++ b/byterun/hash.c
@@ -21,8 +21,8 @@
#include "custom.h"
#include "memory.h"
-static unsigned long hash_accu;
-static long hash_univ_limit, hash_univ_count;
+static uintnat hash_accu;
+static intnat hash_univ_limit, hash_univ_count;
static void hash_aux(value obj);
@@ -137,7 +137,7 @@ static void hash_aux(value obj)
/* Otherwise, obj is a pointer outside the heap, to an object with
a priori unknown structure. Use its physical address as hash key. */
- Combine((long) obj);
+ Combine((intnat) obj);
}
/* Hashing variant tags */