copy tainted/untrusted/frozen status when adds the method into single…

…ton class
MacRuby · Jul 28, 2012 · 72daf83 · 72daf83
1 parent 3d82777
commit 72daf83
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 2 deletions.
diff --git a/class.c b/class.c
@@ -1193,6 +1193,12 @@ rb_singleton_class(VALUE obj)
 	    klass = rb_make_metaclass(obj, RBASIC(obj)->klass);
 	    break;
     }
+
+    OBJ_INFECT(klass, obj);
+    if (OBJ_FROZEN(obj)) {
+	OBJ_FREEZE(klass);
+    }
+
     return klass;
 }
 

diff --git a/spec/frozen/tags/macruby/language/def_tags.txt b/spec/frozen/tags/macruby/language/def_tags.txt
@@ -1,5 +1,3 @@
 fails:A method definition in an eval creates a class method
 fails:Defining an 'initialize_copy' method should make it private
 fails:Defining an 'initialize_copy' method sets the method's visibility to private
-fails:A singleton method definition raises RuntimeError if frozen
-fails:A method definition inside a metaclass scope raises RuntimeError if frozen