day-1.lisp (295B)
1 (defpackage #:aoc-test/day-1 2 (:use #:cl #:lisp-unit2) 3 (:import-from aoc/day-1)) 4 (in-package #:aoc-test/day-1) 5 6 (define-test test-day-1 7 () 8 (multiple-value-bind (task-1 task-2) 9 (aoc:run-day 1 "3 4 10 4 3 11 2 5 12 1 3 13 3 9 14 3 3") 15 (assert= 11 task-1) 16 (assert= 31 task-2)))