diff options
author | nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2004-06-16 07:04:05 +0000 |
---|---|---|
committer | nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2004-06-16 07:04:05 +0000 |
commit | 6a5e63a71557428a68a576a0890e784a6dd12a25 (patch) | |
tree | a4fcd636d6f57486eb5b08280dd4a3e9df10cd0d /object.c | |
parent | 83c917df38d6edbcbe7a220d21ed2e8d3a97b1d6 (diff) | |
download | ruby-6a5e63a71557428a68a576a0890e784a6dd12a25.tar.gz |
* object.c (rb_class_inherited_p): singleton class inherits Class
rather than its object's class. [ruby-dev:23690]
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@6462 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'object.c')
-rw-r--r-- | object.c | 5 |
1 files changed, 5 insertions, 0 deletions
@@ -1257,6 +1257,11 @@ rb_class_inherited_p(mod, arg) rb_raise(rb_eTypeError, "compared with non class/module"); } + if (FL_TEST(mod, FL_SINGLETON)) { + if (RCLASS(mod)->m_tbl == RCLASS(arg)->m_tbl) + return Qtrue; + mod = RBASIC(mod)->klass; + } while (mod) { if (RCLASS(mod)->m_tbl == RCLASS(arg)->m_tbl) return Qtrue; |