Skip to content

Commit 492303b

Browse files
committed
Forgot to delete the cont reassignment.
1 parent 7afd3c6 commit 492303b

File tree

1 file changed

+0
-1
lines changed

1 file changed

+0
-1
lines changed

interpreter/exec/eval.ml

-1
Original file line numberDiff line numberDiff line change
@@ -417,7 +417,6 @@ let rec step (c : config) : config =
417417
let arity = Lib.List32.length ts' in
418418
let tagt = tag c.frame.inst y in
419419
let args, vs' = i32_split (Int32.sub n 1l) vs e.at in
420-
cont := Some (arity, ctxt);
421420
vs', [Suspending (tagt, args, Some (arity, ContRef cont), fun code -> code) @@ e.at]
422421

423422
| ReturnCall x, vs ->

0 commit comments

Comments
 (0)