From 8adf66a7fe3ae111bf05a42a8d4f5683b74d4ca3 Mon Sep 17 00:00:00 2001 From: Peter Tillemans Date: Fri, 13 Dec 2024 12:32:25 +0100 Subject: [PATCH] some tweaks to aoc template --- org-generate.org | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/org-generate.org b/org-generate.org index ee6f149..51c3834 100644 --- a/org-generate.org +++ b/org-generate.org @@ -52,7 +52,7 @@ written in lower case. The code looks for these case sensitively. (defun parse-input (lines) (mapcar #'parse-line lines)) - (defparameter input-text (first (test-input 2024 {{day}}))) + (defparameter input-text (test-input 2024 {{day}})) (defparameter input-data (parse-input input-text)) (defparameter sample-text (aoc:split-lines "")) @@ -60,10 +60,10 @@ written in lower case. The code looks for these case sensitively. (parse-input sample-text)) (defun part1 (data) - nil) + (length data)) (defun part2 (data) - nil) + (length data)) (defun solve-day () (format t "part1: ~A~%" (part1 input-data))