mirror of
https://github.com/ruby/ruby.git
synced 2022-11-09 12:17:21 -05:00
94f01c55df
* array.c (rb_ary_hash): should not ignore the rest of recursive constructs. * hash.c (rb_hash_hash): ditto. * range.c (range_hash): ditto. * struct.c (rb_struct_hash): ditto. * test/-ext-/test_recursion.rb (TestRecursion): separate from test/ruby/test_thread.rb. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@43860 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
28 lines
634 B
C
28 lines
634 B
C
#include <ruby.h>
|
|
|
|
static VALUE
|
|
recursive_i(VALUE obj, VALUE mid, int recur)
|
|
{
|
|
if (recur) return Qnil;
|
|
return rb_funcallv(obj, rb_to_id(mid), 0, 0);
|
|
}
|
|
|
|
static VALUE
|
|
exec_recursive(VALUE self, VALUE mid)
|
|
{
|
|
return rb_exec_recursive(recursive_i, self, mid);
|
|
}
|
|
|
|
static VALUE
|
|
exec_recursive_outer(VALUE self, VALUE mid)
|
|
{
|
|
return rb_exec_recursive_outer(recursive_i, self, mid);
|
|
}
|
|
|
|
void
|
|
Init_recursion(void)
|
|
{
|
|
VALUE m = rb_define_module_under(rb_define_module("Bug"), "Recursive");
|
|
rb_define_method(m, "exec_recursive", exec_recursive, 1);
|
|
rb_define_method(m, "exec_recursive_outer", exec_recursive_outer, 1);
|
|
}
|