diff options
author | ko1 <ko1@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2007-08-19 04:02:21 +0000 |
---|---|---|
committer | ko1 <ko1@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2007-08-19 04:02:21 +0000 |
commit | cd30220afff0d5473022bfb5749716364ebc05a8 (patch) | |
tree | ff25171e4e731389fea8466fa852cbeb9c255ff7 | |
parent | a854a4358f84a04cb79b8e0db3a08f63731fd526 (diff) | |
download | ruby-cd30220afff0d5473022bfb5749716364ebc05a8.tar.gz |
* insnhelper.ci (vm_call_bmethod): fix to propagate information
that this proc is "from Method". [ruby-dev:31490]
* proc.c (method_proc, rb_mod_define_method): ditto.
* vm.c (vm_invoke_proc_core): removed.
* vm_core.h: ditto.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@13111 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
-rw-r--r-- | ChangeLog | 11 | ||||
-rw-r--r-- | insnhelper.ci | 2 | ||||
-rw-r--r-- | proc.c | 10 | ||||
-rw-r--r-- | vm.c | 13 | ||||
-rw-r--r-- | vm_core.h | 2 |
5 files changed, 23 insertions, 15 deletions
@@ -1,3 +1,14 @@ +Sun Aug 19 12:58:39 2007 Koichi Sasada <ko1@atdot.net> + + * insnhelper.ci (vm_call_bmethod): fix to propagate information + that this proc is "from Method". [ruby-dev:31490] + + * proc.c (method_proc, rb_mod_define_method): ditto. + + * vm.c (vm_invoke_proc_core): removed. + + * vm_core.h: ditto. + Sun Aug 19 12:36:11 2007 Tanaka Akira <akr@fsij.org> * test/ruby/sentence.rb: new method Sentence(). diff --git a/insnhelper.ci b/insnhelper.ci index e1b6d79ae4..530ccf97ab 100644 --- a/insnhelper.ci +++ b/insnhelper.ci @@ -387,7 +387,7 @@ vm_call_bmethod(rb_thread_t *th, ID id, VALUE procval, VALUE recv, (cfp-2)->method_klass = klass; GetProcPtr(procval, proc); - val = vm_invoke_proc_core(th, proc, recv, argc, argv, 0); + val = vm_invoke_proc(th, proc, recv, argc, argv); return val; } @@ -957,6 +957,7 @@ rb_mod_define_method(int argc, VALUE *argv, VALUE mod) proc->block.iseq->defined_method_id = id; proc->block.iseq->klass = mod; proc->is_lambda = Qtrue; + proc->is_from_method = Qtrue; } node = NEW_BMETHOD(body); } @@ -1351,7 +1352,8 @@ rb_proc_new( static VALUE method_proc(VALUE method) { - VALUE proc; + VALUE procval; + rb_proc_t *proc; /* * class Method * def to_proc @@ -1361,8 +1363,10 @@ method_proc(VALUE method) * end * end */ - proc = rb_iterate((VALUE (*)(VALUE))mlambda, 0, bmcall, method); - return proc; + procval = rb_iterate((VALUE (*)(VALUE))mlambda, 0, bmcall, method); + GetProcPtr(procval, proc); + proc->is_from_method = 1; + return procval; } static VALUE @@ -606,8 +606,8 @@ vm_yield(rb_thread_t *th, int argc, VALUE *argv) } VALUE -vm_invoke_proc_core(rb_thread_t *th, rb_proc_t *proc, - VALUE self, int argc, VALUE *argv, int restore_safe) +vm_invoke_proc(rb_thread_t *th, rb_proc_t *proc, + VALUE self, int argc, VALUE *argv) { VALUE val = Qundef; int state; @@ -623,7 +623,7 @@ vm_invoke_proc_core(rb_thread_t *th, rb_proc_t *proc, } TH_POP_TAG(); - if (restore_safe) { + if (!proc->is_from_method) { th->safe_level = stored_safe; } @@ -650,13 +650,6 @@ vm_invoke_proc_core(rb_thread_t *th, rb_proc_t *proc, return val; } -VALUE -vm_invoke_proc(rb_thread_t *th, rb_proc_t *proc, - VALUE self, int argc, VALUE *argv) -{ - return vm_invoke_proc_core(th, proc, self, argc, argv, 1); -} - /* special variable */ VALUE @@ -504,6 +504,7 @@ typedef struct { VALUE envval; /* for GC mark */ VALUE blockprocval; int safe_level; + int is_from_method; int is_lambda; NODE *special_cref_stack; @@ -616,7 +617,6 @@ int rb_thread_method_id_and_klass(rb_thread_t *th, ID *idp, VALUE *klassp); VALUE vm_eval_body(rb_thread_t *th); VALUE vm_invoke_proc(rb_thread_t *th, rb_proc_t *proc, VALUE self, int argc, VALUE *argv); -VALUE vm_invoke_proc_core(rb_thread_t *th, rb_proc_t *proc, VALUE self, int argc, VALUE *argv, int restore_flag); VALUE vm_make_proc(rb_thread_t *th, rb_control_frame_t *cfp, rb_block_t *block); VALUE vm_make_env_object(rb_thread_t *th, rb_control_frame_t *cfp); VALUE vm_backtrace(rb_thread_t *, int); |