1 (defpackage :log/tests 2 (:use :cl :std :rt :log)) 3 4 (in-package :log/tests) 5 6 (defsuite :log) 7 (in-suite :log) 8 9 (deftest log () 10 "Test logging features" 11 (is (debug! "test" *log-level*)))