diff options
Diffstat (limited to 'lib/macros.lisp')
| -rw-r--r-- | lib/macros.lisp | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lib/macros.lisp b/lib/macros.lisp index e82d566..d925ac5 100644 --- a/lib/macros.lisp +++ b/lib/macros.lisp @@ -37,8 +37,9 @@ Also includes transformer where symbols are considered unary functions i.e. (if (null forms) nil (let ((assignment-forms - (loop :for f :in forms - :for canon-f := (if (symbolp f) + (loop :for i :from 0 + :for f :in forms + :for canon-f := (if (and (> i 0) (symbolp f)) (list f placeholder) f) :collect `(,placeholder ,canon-f)))) |