Update rng/unix/mc_getrandom_stubs.c

Co-authored-by: Török Edwin <[email protected]>
mirage · Jan 7, 2025 · 4caa18e · 4caa18e
1 parent 74e4e67
commit 4caa18e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/rng/unix/mc_getrandom_stubs.c b/rng/unix/mc_getrandom_stubs.c
@@ -75,6 +75,6 @@ void raw_getrandom(uint8_t *data, size_t len) {
 #endif
 
 CAMLprim value mc_getrandom (value buf, value off, value len) {
-  raw_getrandom(_bp_uint8_off(buf, off), Int_val(len));
+  raw_getrandom(_bp_uint8_off(buf, off), Long_val(len));
   return Val_unit;
 }