diff options
author | nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2015-12-22 13:15:58 +0000 |
---|---|---|
committer | nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2015-12-22 13:15:58 +0000 |
commit | 366de1fccd77b78dfe7dc34b7283ab4100cc6b0e (patch) | |
tree | 23a6763c57b782d374aa8a02deba2a4a7aabd7f6 /gc.c | |
parent | 5db09062bbb5d0934a13ceebf01b49bc2527546e (diff) | |
download | ruby-366de1fccd77b78dfe7dc34b7283ab4100cc6b0e.tar.gz |
gc.c: do not expose internal singleton class
* gc.c (internal_object_p): should not expose singleton classes
without a metaclass. based on patches by ko1 and shugo.
[Bug #11740]
* class.c (rb_singleton_class_object_p): added.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@53243 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'gc.c')
-rw-r--r-- | gc.c | 6 |
1 files changed, 6 insertions, 0 deletions
@@ -2400,6 +2400,12 @@ internal_object_p(VALUE obj) case T_NODE: case T_ZOMBIE: break; + case T_CLASS: + if (!p->as.basic.klass) break; + if (FL_TEST(obj, FL_SINGLETON)) { + return rb_singleton_class_internal_p(obj); + } + return 0; default: if (!p->as.basic.klass) break; return 0; |