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