I before E except after C: Difference between revisions
m
→{{header|Perl 6}}: lists needed flattening
m (Uset 'stem' instead of 'split') |
SqrtNegInf (talk | contribs) m (→{{header|Perl 6}}: lists needed flattening) |
||
Line 1,478:
class CollectWords::Actions {
method TOP($/) {
make $<word>».ast.flat.Bag;
}
method word($/) {
if $<with_c> + $<no_c> {
make
} else {
make ();
Line 1,572:
class CollectWords::Actions {
method TOP($/) {
make $<word>».ast
}
method word($/) {
if $<with_c> + $<no_c> {
make
} else {
make ();
|