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 | 0e4f4071ba01b6890f4cd7f08d99f789f9c4658e (patch) | |
| tree | 78f4c48ed4d1b7b3116d0bba7c8f6f60362fbc69 /yarvcore.c | |
| parent | 1ca6cdaf51a4c93862d436668976bf84ed637c10 (diff) | |
| download | ruby-0e4f4071ba01b6890f4cd7f08d99f789f9c4658e.tar.gz ruby-0e4f4071ba01b6890f4cd7f08d99f789f9c4658e.tar.xz ruby-0e4f4071ba01b6890f4cd7f08d99f789f9c4658e.zip | |
* 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: http://svn.ruby-lang.org/repos/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 3b510495e..899ffb65e 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(); |