From 6bd49a3d95c836e82382f333a600a368bf0638fc Mon Sep 17 00:00:00 2001
From: "Yukihiro \"Matz\" Matsumoto" <matz@ruby-lang.org>
Date: Tue, 2 Apr 2013 10:33:54 +0900
Subject: Module#constants should include constants defined in superclass;
 close #1126

---
 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 c3b77d75c..a9570db02 100644
--- a/src/variable.c
+++ b/src/variable.c
@@ -946,10 +946,15 @@ mrb_value
 mrb_mod_constants(mrb_state *mrb, mrb_value mod)
 {
   mrb_value ary;
+  struct RClass *c = mrb_class_ptr(mod);
 
   ary = mrb_ary_new(mrb);
-  if (obj_iv_p(mod) && mrb_obj_ptr(mod)->iv) {
-    iv_foreach(mrb, mrb_obj_ptr(mod)->iv, const_i, &ary);
+  while (c) {
+    if (c->iv) {
+      iv_foreach(mrb, c->iv, const_i, &ary);
+    }
+    c = c->super;
+    if (c == mrb->object_class) break;
   }
   return ary;
 }
-- 
cgit v1.2.3