Skip to content

Commit

Permalink
Fix argument order
Browse files Browse the repository at this point in the history
  • Loading branch information
dhil committed Feb 18, 2025
1 parent 6d7826a commit 946e356
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion interpreter/exec/eval.ml
Original file line number Diff line number Diff line change
Expand Up @@ -436,7 +436,7 @@ let rec step (c : config) : config =
Ref (HandlerRef (ref (Some Name)))
in
cont := None;
vs', [Prompt (Some Name, hs, ctxt (args @ [name], [])) @@ e.at]
vs', [Prompt (Some Name, hs, ctxt (name :: args, [])) @@ e.at]

| Switch (x, y), Ref (NullRef _) :: vs ->
vs, [Trapping "null continuation reference" @@ e.at]
Expand Down

0 comments on commit 946e356

Please sign in to comment.