* insnhelper.ci (vm_yield_with_cfunc), proc.c: fix Method#to_proc

to return lamba Proc ([ruby-dev:31021], [ruby-dev:31037]).



git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@12620 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
ko1 2007-06-25 19:06:00 +00:00
parent 1a49d91fdd
commit 8bfcdf323f
3 changed files with 38 additions and 20 deletions

9
proc.c
View file

@ -1312,10 +1312,17 @@ mproc(VALUE method)
return rb_funcall(Qnil, rb_intern("proc"), 0);
}
static VALUE
mlambda(VALUE method)
{
return rb_funcall(Qnil, rb_intern("lambda"), 0);
}
static VALUE
bmcall(VALUE args, VALUE method)
{
volatile VALUE a;
if (CLASS_OF(args) != rb_cArray) {
args = rb_ary_new3(1, args);
}
@ -1356,7 +1363,7 @@ method_proc(VALUE method)
* end
* end
*/
proc = rb_iterate((VALUE (*)(VALUE))mproc, 0, bmcall, method);
proc = rb_iterate((VALUE (*)(VALUE))mlambda, 0, bmcall, method);
return proc;
}