summaryrefslogtreecommitdiff
path: root/proc.c
diff options
context:
space:
mode:
Diffstat (limited to 'proc.c')
-rw-r--r--proc.c22
1 files changed, 10 insertions, 12 deletions
diff --git a/proc.c b/proc.c
index 08aac7e366..507ee6167c 100644
--- a/proc.c
+++ b/proc.c
@@ -353,7 +353,6 @@ proc_new(VALUE klass, int is_lambda)
!RUBY_VM_CLASS_SPECIAL_P(cfp->lfp[0])) {
block = GC_GUARDED_PTR_REF(cfp->lfp[0]);
- cfp = RUBY_VM_PREVIOUS_CONTROL_FRAME(cfp);
}
else {
cfp = RUBY_VM_PREVIOUS_CONTROL_FRAME(cfp);
@@ -363,15 +362,6 @@ proc_new(VALUE klass, int is_lambda)
block = GC_GUARDED_PTR_REF(cfp->lfp[0]);
- if (block->proc) {
- return block->proc;
- }
-
- /* TODO: check more (cfp limit, called via cfunc, etc) */
- while (cfp->dfp != block->dfp) {
- cfp = RUBY_VM_PREVIOUS_CONTROL_FRAME(cfp);
- }
-
if (is_lambda) {
rb_warn("tried to create Proc object without a block");
}
@@ -383,8 +373,16 @@ proc_new(VALUE klass, int is_lambda)
}
procval = block->proc;
- if (procval && RBASIC(procval)->klass == klass) {
- return procval;
+
+ if (procval) {
+ if (RBASIC(procval)->klass == klass) {
+ return procval;
+ }
+ else {
+ VALUE newprocval = proc_dup(procval);
+ RBASIC(newprocval)->klass = klass;
+ return newprocval;
+ }
}
procval = vm_make_proc(th, block, klass);