Fuzzer in progress (mini fix)

OCamlPro · Jun 29, 2023 · 8c70113 · 8c70113
1 parent 0b919a5
commit 8c70113
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/test/fuzz/gen.ml b/test/fuzz/gen.ml
@@ -267,7 +267,7 @@ let func env =
   Env.refill_fuel env;
   let* locals = list (local env) in
   let* type_f = B.block_type env in
-  let _ = Env.add_block env type_f Env.Func in
+  let _name = Env.add_block env type_f Env.Func in
   let+ body = expr ~block_type:type_f ~stack:[] ~locals env in
   Env.remove_block env;
   let id = Some (Env.add_func env type_f) in