Shut up warnings about unknown *SUITE* variable.

[fiveam.git] / src / test.lisp

diff --git a/src/test.lisp b/src/test.lisp
index e874dc8..877a847 100644 (file)
--- a/src/test.lisp
+++ b/src/test.lisp
@@ -46,6 +46,8 @@ named KEY in the *TEST* hash table."
       (ensure-list name)
     `(def-test ,name (,@args) ,@body)))
 
+(declaim (special *suite*))
+
 (defmacro def-test (name (&key (suite nil suite-p)
                                fixture
                                (compile-at :run-time)