advent-of-code-2023

commit 7f482c9b9a0cdd1130670ee18b70fbcbb45fca97
parent 26d88425d50f7ac6e88bdc6ac4a56b086936c237
Author: Lukas Henkel <lh@entf.net>
Date:   Fri,  1 Dec 2023 07:58:07 +0100

No point in using the input reader util here

Diffstat:
M
src/day-1.lisp
 | 
2
+-

1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/day-1.lisp b/src/day-1.lisp
@@ -57,7 +57,7 @@
         thereis (reverse-alpha-digit-at line i)))
 
 (defun day-1 (input)
-  (loop for line in (read-input input)
+  (loop for line = (read-line input nil)
         while line
         sum (+ (* (or (first-digit line) 0) 10)
                (or (last-digit line) 0)) into task-1