Use := instead of = so we're not re-interning a symbol in cl-loop

This commit is contained in:
2025-02-14 14:44:37 +00:00
parent a1a9ae008a
commit 8bd7900946
2 changed files with 2 additions and 2 deletions

View File

@@ -38,7 +38,7 @@ Also includes transformer where symbols are considered unary functions i.e.
nil
(let ((assignment-forms
(loop :for f :in forms
:for canon-f = (if (symbolp f) (list f 'lib.macros:_) f)
:for canon-f := (if (symbolp f) (list f 'lib.macros:_) f)
:collect `(lib.macros:_ ,canon-f))))
`(let* ,assignment-forms
lib.macros:_))))