Brace expansion: Difference between revisions

m
Delete redundant AND
(Add Common Lisp implementation)
m (Delete redundant AND)
Line 550:
(push c result)
(setf escapep t))
((and (char= c #\{))
(multiple-value-bind (alternation next-index)
(parse-alternation string index)
68

edits