Macro (alist-val) to access the actual value of a key in an alist

lib.macros.lisp

@@ -83,3 +83,7 @@ arguments `LAMBDA-LIST' with body `BODY'."
 sequentially"
   `(lambda (x)
      (->> x ,@forms)))
+
+(defmacro alist-val (key alist)
+  "Helper macro for getting the value of KEY in ALIST."
+  `(cdr (assoc ,key ,alist)))

packages.lisp

@@ -22,7 +22,7 @@
   (:export
    :_ :--> :->>
    :-> :fn
-   :while
+   :while :alist-val
    :$))
 
 (defpackage lib.functions