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))