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

lib.functions.lisp

@@ -42,7 +42,7 @@ each member is STEP distance apart."
 where key x in A has associations {y in LST : INDICATOR(y) = x}."
   (loop :with assoc-list := nil
         :for element :in lst
-        :for key = (funcall indicator element)
+        :for key := (funcall indicator element)
         :if (assoc key assoc-list :test key-eq)
           :do (->> (alist-val key assoc-list)
                    (cons element)

lib.macros.lisp

@@ -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:_))))