more fragment tests

lib/virtual/compiler/basic_expressions.rb

@@ -37,8 +37,8 @@ module Virtual
         to
       end
 
-      def self.compile_module expression , method
-        clazz = Space.space.get_class_by_name name
+      def self.compile_modulename expression , method
+        clazz = Parfait::Space.object_space.get_class_by_name expression.name
         raise "uups #{clazz}.#{name}" unless clazz
         to = Return.new(Reference , clazz )
         method.source.add_code Set.new( clazz , to )

lib/virtual/compiler/function_expression.rb

@@ -7,10 +7,10 @@ module Virtual
         p.name
       end
       if expression.receiver
-        #Do something clever instead of
+        # compiler will always return slot. with known value or not
         r = Compiler.compile(expression.receiver, method )
-        if( r.is_a? Parfait::Class )
-          class_name = r.name
+        if( r.value.is_a? Parfait::Class )
+          class_name = r.value.name
         else
           raise "unimplemented #{r}"
         end

lib/virtual/compiler/module_expression.rb

@@ -7,7 +7,7 @@ module Virtual
 
     def self.compile_class expression , method
       clazz = Parfait::Space.object_space.get_class_by_name! expression.name
-      puts "Created class #{clazz.name.inspect}"
+      puts "Compiling class #{clazz.name.inspect}"
       expression_value = nil
       expression.expressions.each do |expr|
         # check if it's a function definition and add