diff options
| author | Yukihiro "Matz" Matsumoto <[email protected]> | 2014-05-30 15:25:58 +0900 |
|---|---|---|
| committer | Yukihiro "Matz" Matsumoto <[email protected]> | 2014-05-30 15:25:58 +0900 |
| commit | 6bf1ee78c8cdc5c1b0265694c404ada0ec32cb28 (patch) | |
| tree | 67d486cb32408c2a579796eca0bfa8401a4f7506 /src/parse.y | |
| parent | f38e53eccacbd413bf567a97e6e0ec2941e2e85c (diff) | |
| download | mruby-6bf1ee78c8cdc5c1b0265694c404ada0ec32cb28.tar.gz mruby-6bf1ee78c8cdc5c1b0265694c404ada0ec32cb28.zip | |
add internal function mrb_toplevel_run_keep() to keep stack contents; close #2326
Diffstat (limited to 'src/parse.y')
| -rw-r--r-- | src/parse.y | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/parse.y b/src/parse.y index b3f5f6664..c6795fb65 100644 --- a/src/parse.y +++ b/src/parse.y @@ -5522,6 +5522,7 @@ load_exec(mrb_state *mrb, parser_state *p, mrbc_context *c) struct RClass *target = mrb->object_class; struct RProc *proc; mrb_value v; + unsigned int keep = 0; if (!p) { return mrb_undef_value(); @@ -5555,12 +5556,13 @@ load_exec(mrb_state *mrb, parser_state *p, mrbc_context *c) if (c->target_class) { target = c->target_class; } + keep = c->slen + 1; } proc->target_class = target; if (mrb->c->ci) { mrb->c->ci->target_class = target; } - v = mrb_toplevel_run(mrb, proc); + v = mrb_toplevel_run_keep(mrb, proc, keep); if (mrb->exc) return mrb_nil_value(); return v; } |