Declare type of attribute to use with class.

rakudo · May 24, 2011 · ca8a1d2 · ca8a1d2
1 parent 6918b7c
commit ca8a1d2
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/Perl6/Metamodel/EXPORTHOW.pm b/src/Perl6/Metamodel/EXPORTHOW.pm
@@ -4,5 +4,6 @@ my module EXPORTHOW {
     ($?PACKAGE.WHO)<package>      := Perl6::Metamodel::PackageHOW;
     ($?PACKAGE.WHO)<module>       := Perl6::Metamodel::ModuleHOW;
     ($?PACKAGE.WHO)<class>        := Perl6::Metamodel::ClassHOW;
+    ($?PACKAGE.WHO)<class-attr>   := Attribute;
     ($?PACKAGE.WHO)<native>       := Perl6::Metamodel::NativeHOW;
 }