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