adventofcode2022

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

day03.lisp (501B)

      1 (in-package #:adventofcode2022/test)
      2 
      3 (define-constant +testdata-day03+ "vJrwpWtwJgWrhcsFMMfFFhFp
      4 jqHRNqRjqzjGDLGLrsFMfFZSrLrFZsSL
      5 PmmdzqPrVvPwwTWBwg
      6 wMqvLMZHhHMvwLHjbvcjnnSBnvTQFn
      7 ttgJtRGJQctTZtZT
      8 CrZsJsPPZsGzwwsLwLmpwMDw"
      9   :test 'equal)
     10 
     11 (def-test day03-task1 ()
     12   (is-true
     13    (= 157
     14       (run-task 3 1
     15                 (make-string-input-stream +testdata-day03+)))))
     16 
     17 (def-test day03-task2 ()
     18   (is-true
     19    (= 70
     20       (run-task 3 2
     21                 (make-string-input-stream +testdata-day03+)))))