X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=test-suite%2Facl-compat-tester.cl;h=08c51601ae22331cb029eb847c18d4bc9537abb4;hb=2073ba6b66571d3da57523dbdcb30ed6ffb4b161;hp=1ce4fef398550944e99ddd3fbd6f2b382c4aeaf4;hpb=a9c9179635656d100361bcd513e971f2d71c7ac8;p=clsql.git diff --git a/test-suite/acl-compat-tester.cl b/test-suite/acl-compat-tester.cl index 1ce4fef..08c5160 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.2 2002/04/19 20:25:20 marc.battyani Exp $ (defpackage :util.test @@ -50,6 +50,7 @@ (in-package :util.test) +#-lispworks (unless (find-class 'break nil) (define-condition break (simple-condition) ()))