Fix syntax to update buffer

astrada · Nov 7, 2023 · c8eb017 · c8eb017
1 parent faf57d8
commit c8eb017
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/test/testBuffering.ml b/test/testBuffering.ml
@@ -5,7 +5,7 @@ let print_array arr =
   let len = Bigarray.Array1.dim arr in
   let r = Bytes.make len ' ' in
   for i = 0 to len - 1 do
-    r.[i] <- arr.{i}
+    Bytes.set r i arr.{i}
   done;
   Bytes.to_string r