From: Luca Capello <luca@pca.it>
Date: Sun, 21 Oct 2007 20:10:56 +0000 (+0200)
Subject: add an (eval-when ...) when defining a test suite
X-Git-Url: http://repo.macrolet.net/gitweb/?p=fiveam.git;a=commitdiff_plain;h=7df749a8a0381171ab005a3f284385ce39757277

add an (eval-when ...) when defining a test suite
---

diff --git a/t/suite.lisp b/t/suite.lisp
index 9db6578..50b1a6f 100644
--- a/t/suite.lisp
+++ b/t/suite.lisp
@@ -2,7 +2,8 @@
 
 (in-package :it.bese.fiveam)
 
-(unless (get-test :it.bese)
-  (def-suite :it.bese))
+(eval-when (:compile-toplevel :load-toplevel :execute)
+  (unless (get-test :it.bese)
+    (def-suite :it.bese)))
 
 (def-suite :it.bese.fiveam :in :it.bese)