From 02ff1a3fb3f687160b3164680fd655da56c0eae9 Mon Sep 17 00:00:00 2001 From: Aryadev Chavali Date: Fri, 14 Feb 2025 16:11:54 +0000 Subject: Prefix all packages with `cantedraw` This is mostly a sanity check in-case anyone else decides to load this system for use in their own package - don't want to conflict with their names. --- lib.macros.lisp | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) (limited to 'lib.macros.lisp') diff --git a/lib.macros.lisp b/lib.macros.lisp index bd1c239..f2435d4 100644 --- a/lib.macros.lisp +++ b/lib.macros.lisp @@ -17,7 +17,7 @@ ;;; Code: -(in-package :lib.macros) +(in-package :cantedraw.lib.macros) (defmacro --> (&rest forms) "Lexically bind current form as `_' for use in the next form, returning the @@ -38,10 +38,12 @@ 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) - :collect `(lib.macros:_ ,canon-f)))) + :for canon-f := (if (symbolp f) + (list f 'cantedraw.lib.macros:_) + f) + :collect `(cantedraw.lib.macros:_ ,canon-f)))) `(let* ,assignment-forms - lib.macros:_)))) + cantedraw.lib.macros:_)))) (defmacro ->> (&rest forms) "Make current form the last argument of the next form, returning the last -- cgit v1.2.3-13-gbd6f