adventofcode2022

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

day22.lisp (412B)

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