From 9bae7485134afc50fae8fa2d3e5896673869079b Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Sun, 23 Feb 2003 05:51:55 +0000 Subject: [PATCH] r4097: Auto commit for Debian build --- debian/changelog | 6 ++++++ xptestsuite.lisp | 6 +++--- 2 files changed, 9 insertions(+), 3 deletions(-) diff --git a/debian/changelog b/debian/changelog index f5b5956..48dbe88 100644 --- a/debian/changelog +++ b/debian/changelog @@ -1,3 +1,9 @@ +cl-xptest (1.1.1-3) unstable; urgency=low + + * Use format-control for openmcl (closes: 182112) + + -- Kevin M. Rosenberg Sat, 22 Feb 2003 22:51:37 -0700 + cl-xptest (1.1-2) unstable; urgency=low * Remove 'load-compiled-op from .asd file diff --git a/xptestsuite.lisp b/xptestsuite.lisp index 0ac9f49..238b4bf 100644 --- a/xptestsuite.lisp +++ b/xptestsuite.lisp @@ -7,7 +7,7 @@ ;;;; Author: Craig Brozefsky ;;;; 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) @@ -48,8 +48,8 @@ setup method did for this instance." (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)) -- 2.34.1