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.