From 6a6e0d330ce2ca5edfed689333f10b6c48d589d9 Mon Sep 17 00:00:00 2001 From: Rudi Grinberg Date: Mon, 30 Sep 2024 23:22:40 +0100 Subject: [PATCH] fix: jsoo (#510) Sys.word_size is 32 on jsoo --- lib/hash_set.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/hash_set.ml b/lib/hash_set.ml index 1b2b1416..c49ca15c 100644 --- a/lib/hash_set.ml +++ b/lib/hash_set.ml @@ -3,7 +3,7 @@ open Import module Array = struct type nonrec t = Bytes.t - let words = Sys.word_size / 8 + let words = 8 let[@inline] length t = Bytes.length t / words let[@inline] unsafe_get t i = Int64.to_int (Bytes.get_int64_ne t (i * words)) let[@inline] unsafe_set t i x = Bytes.set_int64_ne t (i * words) (Int64.of_int x)