[parenscript-devel] Convenient syntax for array literals
19 Apr
2008
19 Apr
'08
12:01 a.m.
Here's a neat little ps macro for easy creation of array literals, including nested arrays: (ps ([] 1 2 3)) => "[1, 2, 3];" (ps ([] 1 (2 3))) => "[1, [2, 3]];" (ps ([] (1 2) ("a" "b"))) => "[[1, 2], ['a', 'b']];" Daniel (defpsmacro [] (&rest args) `(array ,@(mapcar (lambda (arg) (if (and (consp arg) (not (equal '[] (car arg)))) (cons '[] arg) arg)) args)))
6136
Age (days ago)
6136
Last active (days ago)
0 comments
1 participants
participants (1)
-
Daniel Gackle