[ruby-dev:31496] Re: SEGV: def m() yield [] end; m(&lambda {|*v| p v})

　ささだです。

Tanaka Akira wrote:
> 以下のようにすると SEGV になります。
> 
> % RUBY_DEBUG=gc_stress ./ruby -e 'def m() yield [] end; m(&lambda {|*v| p v})'

　うちだと SEGV しなかったんですが、これで SEGV しなくなるか、試して
もらえないでしょうか。


Index: insnhelper.ci
===================================================================
--- insnhelper.ci	(リビジョン 13107)
+++ insnhelper.ci	(作業コピー)
@@ -114,6 +114,7 @@
     else {
 	VALUE * const dst = argv;
 	int opt_pc = 0;
+	th->mark_stack_len = iseq->arg_size;

 	/* mandatory */
 	if (argc < (m + iseq->arg_post_len)) { /* check with post arg */
@@ -176,9 +177,7 @@
 		if (blockptr->proc == 0) {
 		    rb_proc_t *proc;

-		    th->mark_stack_len = orig_argc; /* for GC */
 		    blockval = vm_make_proc(th, th->cfp, blockptr);
-		    th->mark_stack_len = 0;

 		    GetProcPtr(blockval, proc);
 		    *block = &proc->block;
@@ -190,7 +189,7 @@

 	    dst[iseq->arg_block] = blockval; /* Proc or nil */
 	}
-
+	th->mark_stack_len = 0;
 	return opt_pc;
     }
 }


-- 
// SASADA Koichi at atdot dot net