Constrained genericity: Difference between revisions

m
→‎{{header|Perl 6}}: Fix broken example.
m (→‎{{header|Perl 6}}: Fix broken example.)
Line 955:
 
=={{header|Perl 6}}==
{{works with|Rakudo|20102016.09.1701}}
 
{{broken|Perl 6}}
<lang perl6>subset Eatable of Any where { .^can('eat') };
 
class Cake { method eat() {...} }
 
role FoodBox[Eatable ::T] {
has T %.foodbox;
}
 
10,333

edits