1 (defpackage #:aoc-test/day-7
2   (:use #:cl #:lisp-unit2)
3   (:import-from #:aoc/day-7))
4 (in-package #:aoc-test/day-7)
5 
6 (define-test test-day-7
7     ()
8   (multiple-value-bind (task-1 task-2)
9       (aoc:run-day 7 "190: 10 19
10 3267: 81 40 27
11 83: 17 5
12 156: 15 6
13 7290: 6 8 6 15
14 161011: 16 10 13
15 192: 17 8 14
16 21037: 9 7 18 13
17 292: 11 6 16 20")
18     (assert= 3749 task-1)
19     (assert= 11387 task-2)))