blob: ebcb52c8ffd000a8ac92c73e7129750c143d8c9a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
use 5.038;
use feature 'class';
no warnings 'experimental';
class A {
}
class C
: isa(A)
{
method with_sig_and_attr
: lvalue
($top,$down)
{
return $top-$down;
}
}
class D {
field $decorated :param :reader(get_decoration);
field $no_attributes = not_an(attribute)
}
say "done!";
|
