advent-of-code-2023

commit d9f8611de3a468f5420181d3ce5e56f53cea9dbd
parent e13fadabbc3961d0288b7b894ed49eabe8c7c194
Author: Lukas Henkel <lh@entf.net>
Date:   Mon,  4 Dec 2023 19:00:02 +0100

Support any number of cards

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

1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/day-4.lisp b/src/day-4.lisp
@@ -7,7 +7,7 @@
   (loop with winning-numbers = nil
         with my-numbers = nil
         with divider? = nil
-        for i from 8 below (length line)
+        for i from (1+ (position #\: line)) below (length line)
         for char = (aref line i)
         do (cond
              ((char= char #\Space))