adventofcode2022

My solutions for Advent of Code 2022
Log | Files | Refs

day08.lisp (379B)

      1 (in-package #:adventofcode2022/test)
      2 
      3 (define-constant +testdata-day08+ "30373
      4 25512
      5 65332
      6 33549
      7 35390"
      8   :test 'equal)
      9 
     10 (def-test day08-task1 ()
     11   (is-true
     12    (= 21
     13       (run-task 8 1
     14                 (make-string-input-stream +testdata-day08+)))))
     15 
     16 (def-test day08-task2 ()
     17   (is-true
     18    (= 8
     19       (run-task 8 2
     20                 (make-string-input-stream +testdata-day08+)))))