Brace expansion: Difference between revisions
→{{header|Perl 6}}: belated GLR fix, removed failing edge cases
SqrtNegInf (talk | contribs) (→{{header|Perl 6}}: belated GLR fix, removed failing edge cases) |
|||
Line 1,998:
sub crosswalk($/) {
|[X~] flat '', $0.map: -> $/ { ([$<meta><alts><alt>.&alternatives]) or ~$/ }
}
Line 2,024:
It{{em,alic}iz,erat}e{d,}, please.
{,{,gotta have{ ,\, again\, }}more }cowbell!
a{b{1,2}c
a{1,2}b}c
a{1,{2},3}b
more{ darn{ cowbell,},}
ab{c,d\,e{f,g\h},i\,j{k,l\,m}n,o\,p}qr
Line 2,034 ⟶ 2,032:
a{b,{{c}}
{a{\}b,c}d
END</lang>
{{out}}
Line 2,075 ⟶ 2,072:
a{2}b
a3b
more{ darn{ cowbell,},}
Line 2,101 ⟶ 2,094:
{a{\}b,c}d
{a\}bd
{acd</pre>
=={{header|Phix}}==
| |||