Raise LocalJumpError when returning from top-level

66df0ad0 · Kazuki Tsujimoto · e6631bf5 · 66df0ad0
Commit 66df0ad0 authored May 12, 2012 by Kazuki Tsujimoto
Hide whitespace changes
Inline Side-by-side

Showing with 4 additions and 0 deletions

src/vm.c src/vm.c +4 -0

No files found.
--- a/src/vm.c
+++ b/src/vm.c
@@ -1002,6 +1002,10 @@ mrb_run(mrb_state *mrb, struct RProc *proc, mrb_value self)

        switch (GETARG_B(i)) {
        case OP_R_NORMAL:
+          if (ci == mrb->cibase) {
+            localjump_error(mrb, "return");
+            goto L_RAISE;
+          }
          ci = mrb->ci;
          break;
        case OP_R_BREAK: