* 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

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();