pop register stack before rescue

750b7c20 · Yukihiro Matsumoto · 89a18e4f · 750b7c20
Commit 750b7c20 authored Oct 20, 2012 by Yukihiro Matsumoto
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 0 deletions

src/codegen.c src/codegen.c +1 -0

No files found.
--- a/src/codegen.c
+++ b/src/codegen.c
@@ -972,6 +972,7 @@ codegen(codegen_scope *s, node *tree, int val)
      lp->pc1 = onerr;
      if (tree->car) {
        codegen(s, tree->car, val);
+	if (val) pop();
      }
      lp->type = LOOP_RESCUE;
      noexc = new_label(s);