Skip to content

Commit 4164966

Browse files
committed
Patch the v0.14.1 opam release with a byte code fix.
The masking function called for bytecode in bits_stubs.c calls the wrong value conversion function, and basically breaks the bits api. This patches it to call the correct function. The native code was correct. Signed-off-by: andrewray <[email protected]>
1 parent 1d32837 commit 4164966

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/bits_stubs.c

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -35,7 +35,7 @@ CAMLprim value hardcaml_bits_mask(intnat width, value vdst) {
3535
}
3636

3737
CAMLprim value hardcaml_bits_mask_bc(value width, value vdst) {
38-
return hardcaml_bits_mask(Val_int(width), vdst);
38+
return hardcaml_bits_mask(Int_val(width), vdst);
3939
}
4040

4141
/* Add two multiword [Bits.t]. The widths of the arguments and results are the same.

0 commit comments

Comments
 (0)