Be sure to keep tc.curFrame in sync.

Raku · Jul 2, 2013 · 800df5e · 800df5e
1 parent fa3d25f
commit 800df5e
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/src/vm/jvm/QAST/Compiler.nqp b/src/vm/jvm/QAST/Compiler.nqp
@@ -1649,6 +1649,9 @@ QAST::OperationsJAST.add_core_op('handle', sub ($qastcomp, $op) {
     $catchil.append(JAST::Instruction.new( :op('aload'), 'cf' ));
     $catchil.append(JAST::Instruction.new( :op('invokestatic'), $TYPE_OPS,
         'return_o', 'Void', $TYPE_SMO, $TYPE_CF ));
+    $catchil.append(JAST::Instruction.new( :op('aload'), 'cf' ));
+    $catchil.append(JAST::Instruction.new( :op('invokevirtual'),
+        $TYPE_CF, 'leave', 'Void' ));
     $catchil.append($RETURN);
     $catchil.append($exitlbl);