X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=test-suite%2Facl-compat-tester.cl;h=14b6bc92fe0e5174b2c05367bffeb3174fe8fec5;hb=63a47d658e3cbc2095d2c7ecb33e34c152de4955;hp=1ce4fef398550944e99ddd3fbd6f2b382c4aeaf4;hpb=3a8f6acbee70de1c5420b2aefc6b2b85eedefe17;p=clsql.git diff --git a/test-suite/acl-compat-tester.cl b/test-suite/acl-compat-tester.cl index 1ce4fef..14b6bc9 100644 --- a/test-suite/acl-compat-tester.cl +++ b/test-suite/acl-compat-tester.cl @@ -24,7 +24,7 @@ ;; Place, Suite 330, Boston, MA 02111-1307 USA ;; ;;;; from the original ACL 6.1 sources: -;; $Id: acl-compat-tester.cl,v 1.1 2002/04/08 02:46:43 kevin Exp $ +;; $Id: acl-compat-tester.cl,v 1.3 2002/04/20 22:55:02 kevin Exp $ (defpackage :util.test @@ -50,6 +50,7 @@ (in-package :util.test) +#+cmu (unless (find-class 'break nil) (define-condition break (simple-condition) ()))