diff --git a/src/Perl6/Metamodel/ClassHOW.nqp b/src/Perl6/Metamodel/ClassHOW.nqp index e6e80f33f95..518ec81c5fc 100644 --- a/src/Perl6/Metamodel/ClassHOW.nqp +++ b/src/Perl6/Metamodel/ClassHOW.nqp @@ -29,6 +29,8 @@ class Perl6::Metamodel::ClassHOW has @!fallbacks; has $!composed; + method composed() { $!composed } + my $archetypes := Perl6::Metamodel::Archetypes.new( :nominal(1), :inheritable(1), :augmentable(1) ); method archetypes() {