From 8bd79009460615d122cd289228d64d16adf704d6 Mon Sep 17 00:00:00 2001
From: Aryadev Chavali <aryadev@aryadevchavali.com>
Date: Fri, 14 Feb 2025 14:44:37 +0000
Subject: Use := instead of = so we're not re-interning a symbol in cl-loop

---
 lib.functions.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib.functions.lisp')

diff --git a/lib.functions.lisp b/lib.functions.lisp
index e56c224..48f50bc 100644
--- a/lib.functions.lisp
+++ b/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)
-- 
cgit v1.2.3-13-gbd6f