summaryrefslogtreecommitdiff
path: root/byterun/hash.c
diff options
context:
space:
mode:
Diffstat (limited to 'byterun/hash.c')
-rw-r--r--byterun/hash.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/byterun/hash.c b/byterun/hash.c
index ddbe25e1e5..f7d0d22233 100644
--- a/byterun/hash.c
+++ b/byterun/hash.c
@@ -217,7 +217,7 @@ CAMLprim value caml_hash(value count, value limit, value seed, value obj)
break;
case Double_array_tag:
for (i = 0, len = Wosize_val(v) / Double_wosize; i < len; i++) {
- h = caml_hash_mix_double(h, Double_field(v, i));
+ h = caml_hash_mix_double(h, Double_flat_field(v, i));
num--;
if (num <= 0) break;
}