Merge pull request #677 from krekoten/class_new

Class#new superclass check and naming

spec/tags/core/module/name_tags.txt

@@ -1,7 +1,6 @@
 fails:Module#name is nil for a nested module created with the module keyword
-fails:Module#name is set when assigning to a constant
-fails:Module#name is not modified when assigning to a new constant after it has been accessed
 fails:Module#name is set with a conditional assignment to a nested constant
 fails:Module#name is set with a conditional assignment to a constant
 fails:Module#name preserves the encoding in which the class was defined
 fails:Module#name is set when the anonymous outer module name is set
+fails:Module#name is nil when assigned to a constant in an anonymous module

topaz/interpreter.py

@@ -202,6 +202,8 @@ def STORE_CONSTANT(self, space, bytecode, frame, pc, idx):
         w_value = frame.pop()
         w_scope = frame.pop()
         space.set_const(w_scope, name, w_value)
+        if isinstance(w_value, W_ModuleObject) and w_value.name is None:
+            w_value.name = space.buildname(name, w_scope)
         frame.push(w_value)
 
     def DEFINED_CONSTANT(self, space, bytecode, frame, pc, idx):

topaz/objects/classobject.py

@@ -84,7 +84,16 @@ def method_removed(self, space, w_name):
     @classdef.singleton_method("allocate")
     def singleton_method_allocate(self, space, w_superclass=None):
         if w_superclass is not None:
-            assert isinstance(w_superclass, W_ClassObject)
+            if not isinstance(w_superclass, W_ClassObject):
+                raise space.error(
+                    space.w_TypeError,
+                    "superclass must be a Class (%s given)" % space.obj_to_s(space.getclass(w_superclass))
+                )
+            if w_superclass.is_singleton:
+                raise space.error(
+                    space.w_TypeError,
+                    "can't make subclass of singleton class"
+                )
         else:
             w_superclass = space.w_object
         return space.newclass(None, w_superclass)