From deeafa0e178fad98e05a538e8392fbcd7aab072e Mon Sep 17 00:00:00 2001 From: knu Date: Sat, 3 Mar 2007 07:28:54 +0000 Subject: * env.h (SCOPE_CLONE): Introduce a new scope flag to prevent a local_tbl region from getting freed many times; submitted by Chikanaga Tomoyuki in [ruby-dev:30460]. * eval.c (proc_invoke): Ditto. * gc.c (obj_free): Ditto. * parse.y (top_local_setup_gen): Ditto. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@11964 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- eval.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'eval.c') diff --git a/eval.c b/eval.c index 598609e8cf..64a43c5b54 100644 --- a/eval.c +++ b/eval.c @@ -8553,11 +8553,12 @@ proc_invoke(proc, args, self, klass) if (klass) _block.frame.last_class = klass; _block.frame.argc = RARRAY(tmp)->len; _block.frame.flags = ruby_frame->flags; - if (_block.frame.argc && (ruby_frame->flags & FRAME_DMETH)) { + if (_block.frame.argc && DMETHOD_P()) { NEWOBJ(scope, struct SCOPE); OBJSETUP(scope, tmp, T_SCOPE); scope->local_tbl = _block.scope->local_tbl; scope->local_vars = _block.scope->local_vars; + scope->flags |= SCOPE_CLONE; _block.scope = scope; } /* modify current frame */ -- cgit v1.2.3