From f8a834c0d24b1c57f14e9f86ec827aad73e4473e Mon Sep 17 00:00:00 2001 From: Aryadev Chavali Date: Fri, 14 Feb 2025 16:34:15 +0000 Subject: Rewrote --> to take a placeholder symbol as first argument Instead of exporting cantedraw.lib.macro._ and making anyone who wants to use the --> macro _require_ importing that specific symbol, let's just make it so the user has to supply a placeholder name before they do anything. This means each package provides its own placeholder symbol which lowers coupling. --- main.lisp | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'main.lisp') diff --git a/main.lisp b/main.lisp index af6312d..2bd3102 100644 --- a/main.lisp +++ b/main.lisp @@ -44,6 +44,7 @@ inp)) (defun start () - (--> (read-until-integers) - (cons '+ _) - (format t "~a = ~a~%" _ (eval _)))) + (--> var + (read-until-integers) + (cons '+ var) + (format t "~a = ~a~%" var (eval var)))) -- cgit v1.2.3-13-gbd6f