day-3.lisp (348B)
1 (defpackage #:aoc-test/day-3 2 (:use #:cl #:lisp-unit2)) 3 (in-package #:aoc-test/day-3) 4 5 (define-test test-day-3 6 () 7 (multiple-value-bind (task-1 task-2) 8 (aoc:run-day 3 "467..114.. 9 ...*...... 10 ..35..633. 11 ......#... 12 617*...... 13 .....+.58. 14 ..592..... 15 ......755. 16 ...$.*.... 17 .664.598..") 18 (assert= 4361 task-1) 19 (assert= 467835 task-2)))