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 | |
| parent | f6326c7783bcc115ef74131e7eef12105468cf45 (diff) | |
Add: igorable names in let-parameters
| -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) |