diff options
author | Colin Okay <colin@cicadas.surf> | 2022-11-07 13:44:22 -0600 |
---|---|---|
committer | Colin Okay <colin@cicadas.surf> | 2022-11-07 13:44:22 -0600 |
commit | 6f4d010a6487a11617ef831d780d4053178bd333 (patch) | |
tree | c62c54ae27627faf14b38af007e0d3819d56c280 /macros.lisp | |
parent | f6326c7783bcc115ef74131e7eef12105468cf45 (diff) |
Add: igorable names in let-parameters
Diffstat (limited to 'macros.lisp')
-rw-r--r-- | macros.lisp | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/macros.lisp b/macros.lisp index 93f1e47..46ac4da 100644 --- a/macros.lisp +++ b/macros.lisp @@ -28,6 +28,7 @@ of each NAME, or NIL if there is no such parameter." (let ,(loop for name in names for string-name = (symbol-name name) collect `(,name (cdr (assoc ,string-name ,params :test #'string-equal)))) + (declare (ignorable ,@names)) ,@body)))) (defmacro map-parameters ((&rest params) &body body) |