day20.lisp (375B)
1 (in-package #:adventofcode2022/test) 2 3 (define-constant +testdata-day20+ "1 4 2 5 -3 6 3 7 -2 8 0 9 4" 10 :test 'equal) 11 12 (def-test day20-task1 () 13 (is-true 14 (= 3 15 (run-task 20 1 16 (make-string-input-stream +testdata-day20+))))) 17 18 (def-test day20-task2 () 19 (is-true 20 (= 1623178306 21 (run-task 20 2 22 (make-string-input-stream +testdata-day20+)))))