+cl-xptest (1.1.1-3) unstable; urgency=low
+
+ * Use format-control for openmcl (closes: 182112)
+
+ -- Kevin M. Rosenberg <kmr@debian.org> Sat, 22 Feb 2003 22:51:37 -0700
+
cl-xptest (1.1-2) unstable; urgency=low
* Remove 'load-compiled-op from .asd file
;;;; Author: Craig Brozefsky <craig@onshore.com>
;;;; Put in public domain by onShore, Inc
;;;;
-;;;; $Id: xptestsuite.lisp,v 1.1 2002/10/22 18:46:20 kevin Exp $
+;;;; $Id: xptestsuite.lisp,v 1.2 2003/02/23 05:51:55 kevin Exp $
(in-package :xp-test)
(defun failure (format-str &rest args)
"Signal a test failure and exit the test."
(signal 'test-failure
- #+(or cmu allegro) :format-control
- #-(or cmu allegro) :format-string
+ #+(or cmu allegro openmcl) :format-control
+ #-(or cmu allegro openmcl) :format-string
format-str
:format-arguments args))