Comma quibbling: Difference between revisions
→{{header|TXR}}: Handle empty list by making destructuring match for last optional.
m (→{{header|TXR}}) |
(→{{header|TXR}}: Handle empty list by making destructuring match for last optional.) |
||
Line 3,150:
<lang txrlisp>(defun quib (list)
(tree-bind (: last . lead) (reverse list)
`{@{(nreverse lead) ", "}@(if lead " and ")@last}`))</lang>
| |||