day12.lisp (397B)
1 (in-package #:adventofcode2022/test) 2 3 (define-constant +testdata-day12+ "Sabqponm 4 abcryxxl 5 accszExk 6 acctuvwj 7 abdefghi" 8 :test 'equal) 9 10 (def-test day12-task1 () 11 (is-true 12 (= 31 13 (run-task 12 1 14 (make-string-input-stream +testdata-day12+))))) 15 16 (def-test day12-task2 () 17 (is-true 18 (= 29 19 (run-task 12 2 20 (make-string-input-stream +testdata-day12+)))))