Author: jonathan
Date: Thu Aug  7 14:01:45 2008
New Revision: 30105

Modified:
   trunk/languages/perl6/src/builtins/guts.pir

Log:
[rakudo] Make classes declared as Foo::Bar work (that is, more than one level 
deep namespace). Resolves RT#57388, and makes another 5 spectests pass.

Modified: trunk/languages/perl6/src/builtins/guts.pir
==============================================================================
--- trunk/languages/perl6/src/builtins/guts.pir (original)
+++ trunk/languages/perl6/src/builtins/guts.pir Thu Aug  7 14:01:45 2008
@@ -226,7 +226,8 @@
     class = new 'Class'
     goto created
   named:
-    class = newclass name
+    $P0 = split '::', name
+    class = newclass $P0
   created:
 
     # Set resolve list to include all methods of the class.

Reply via email to