gistfile1.txt

# Remove the is repr('HashAttrStore') to see normal Perl 6 semantics
# (it prints nothing as the $!a is separately stored per class). With
# it in, this prints 42.

class Foo is repr('HashAttrStore') {
    has $!a;
    method foo() { $!a := 42 }
}
class Bar is repr('HashAttrStore') is Foo {
    has $!a;
    method bar() { say($!a) }
}

my $x := Bar.new();
$x.foo();
$x.bar();