diff options
author | ko1 <ko1@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2007-01-16 03:06:01 +0000 |
---|---|---|
committer | ko1 <ko1@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2007-01-16 03:06:01 +0000 |
commit | 7eb928624f84135634075ea575d6f10d759f2263 (patch) | |
tree | 78f4c48ed4d1b7b3116d0bba7c8f6f60362fbc69 /yarvcore.c | |
parent | d2907d42bea13a670d5fb52c32e8761fa57efff1 (diff) | |
download | ruby-7eb928624f84135634075ea575d6f10d759f2263.tar.gz |
* eval_proc.c (rb_proc_new): added.
* string.c (sym_to_proc): supported.
* vm.c (invoke_block, th_invoke_yield, th_invoke_proc): fix to support
rb_proc_new.
* yarvcore.c: add a test code.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@11536 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'yarvcore.c')
-rw-r--r-- | yarvcore.c | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/yarvcore.c b/yarvcore.c index 3b510495e6..899ffb65e3 100644 --- a/yarvcore.c +++ b/yarvcore.c @@ -815,11 +815,15 @@ yarv_segv() } static VALUE +proc_func(VALUE v) +{ + dp(v); +} + +static VALUE cfunc(void) { - rb_funcall(Qnil, rb_intern("rfunc"), 0, 0); - rb_funcall(Qnil, rb_intern("rfunc"), 0, 0); - return Qnil; + return rb_proc_new(proc_func, INT2FIX(12345)); } // VALUE yarv_Hash_each(); |