projects
/
xptest.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
r4616: Auto commit for Debian build
[xptest.git]
/
xptestsuite.lisp
diff --git
a/xptestsuite.lisp
b/xptestsuite.lisp
index 440f6bc9a036f66b0ee8be57a37862a987fa04cf..b2414b3e017f9398bf6fc2175c3111f7726d0564 100644
(file)
--- a/
xptestsuite.lisp
+++ b/
xptestsuite.lisp
@@
-7,7
+7,7
@@
;;;; Author: Craig Brozefsky <craig@onshore.com>
;;;; Put in public domain by onShore, Inc
;;;;
;;;; Author: Craig Brozefsky <craig@onshore.com>
;;;; Put in public domain by onShore, Inc
;;;;
-;;;; $Id: xptestsuite.lisp,v 1.
3 2003/04/19 16:16:16
kevin Exp $
+;;;; $Id: xptestsuite.lisp,v 1.
4 2003/04/23 22:24:27
kevin Exp $
(in-package #:cl-user)
(in-package #:cl-user)
@@
-270,7
+270,8
@@
or failed or errored out."
(format stream "Errors:~%")
(mapcar #'(lambda (fail) (format stream " ~A" fail))
(test-errors result))))))
(format stream "Errors:~%")
(mapcar #'(lambda (fail) (format stream " ~A" fail))
(test-errors result))))))
- (format stream "~%~%"))
+ ;(format stream "~%~%") ; debian bug #190398
+ )
(defmethod report-result ((results list) &key (stream t) (verbose nil))
(dolist (foo results)
(defmethod report-result ((results list) &key (stream t) (verbose nil))
(dolist (foo results)