day-1.lisp (359B)
1 (defpackage #:aoc-test/day-1 2 (:use #:cl #:lisp-unit2)) 3 (in-package #:aoc-test/day-1) 4 5 (define-test test-day-1 6 () 7 (assert= 142 8 (aoc:run-day 1 "1abc2 9 pqr3stu8vwx 10 a1b2c3d4e5f 11 treb7uchet")) 12 13 (assert= 281 14 (nth-value 1 (aoc:run-day 1 "two1nine 15 eightwothree 16 abcone2threexyz 17 xtwone3four 18 4nineeightseven2 19 zoneight234 20 7pqrstsixteen"))))