Jump to content

Brace expansion: Difference between revisions

Brace expansion (view source)

Revision as of 11:23, 7 October 2016

2 bytes added ,  7 years ago
m
→‎{{header|PicoLisp}}: Use '0' instead of 'T'
(Added PicoLisp)
m (→‎{{header|PicoLisp}}: Use '0' instead of 'T')
Line 1,774:
("{" (recurse) Lst)
("}" NIL)
("," (link T0) Lst) # Replace commata with 'T0'
(T (link @) Lst) ) ) )
(if (= "}" @) # Was closing brace
(if (memqmember T0 L) # Has comma(ta)
(link (split L T0))
(chain (list "{") (replace L T0 ",") (list "}")))
(chain (list "{") (replace L T0 ",")) ) ) ) )
(T (link @)) ) ) )
(recur (Lst)
Anonymous user
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/239498"
Cookies help us deliver our services. By using our services, you agree to our use of cookies.
More information