From 2529f1edba6095301ca0278cdedaf8b47248a4d1 Mon Sep 17 00:00:00 2001 From: "Yukihiro \"Matz\" Matsumoto" Date: Sat, 20 Apr 2013 22:58:52 +0900 Subject: Module#class_variables should check superclasses --- src/variable.c | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) (limited to 'src/variable.c') diff --git a/src/variable.c b/src/variable.c index 2057b69ef..63945b7fa 100644 --- a/src/variable.c +++ b/src/variable.c @@ -668,10 +668,15 @@ mrb_value mrb_mod_class_variables(mrb_state *mrb, mrb_value mod) { mrb_value ary; + struct RClass *c; ary = mrb_ary_new(mrb); - if (obj_iv_p(mod) && mrb_obj_ptr(mod)->iv) { - iv_foreach(mrb, mrb_obj_ptr(mod)->iv, cv_i, &ary); + c = mrb_obj_ptr(mod); + while (c) { + if (c->iv) { + iv_foreach(mrb, c->iv, cv_i, &ary); + } + c = c->super; } return ary; } -- cgit v1.2.3