Rosetta Code

I before E except after C: Difference between revisions

← Older editNewer edit →
Content deleted Content added
m Uset 'stem' instead of 'split'
SqrtNegInf (talk | contribs)
2,392 edits
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 (flat $<with_c>».ast, $<no_c>».ast);
} else {
make ();
Line 1,572:
class CollectWords::Actions {
method TOP($/) {
make $<word>».ast».flat.Bag;
}
 
method word($/) {
if $<with_c> + $<no_c> {
make (flat $<with_c>».ast xx $<freq>, $<no_c>».ast xx $<freq>);
} else {
make ();
Retrieved from "https://rosettacode.org/wiki/I_before_E_except_after_C"