fix: jsoo (#510)

Sys.word_size is 32 on jsoo
ocaml · Sep 30, 2024 · 6a6e0d3 · 6a6e0d3
1 parent 2824665
commit 6a6e0d3
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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)