From: Kevin M. Rosenberg <kevin@rosenberg.net>
Date: Fri, 23 Apr 2004 02:34:40 +0000 (+0000)
Subject: r9134: add machine-type to report
X-Git-Tag: v3.8.6~587
X-Git-Url: http://git.kpe.io/?p=clsql.git;a=commitdiff_plain;h=e02d79979cb676b5e8d96b16456922afe77f4f74

r9134: add machine-type to report
---

diff --git a/tests/utils.lisp b/tests/utils.lisp
index f6f4e51..f73edbc 100644
--- a/tests/utils.lisp
+++ b/tests/utils.lisp
@@ -88,12 +88,14 @@
 			       machine-type)
 	      form
 	    (if failed-tests
-		(format output "~&~A: ~D of ~D tests failed (~A).~&"
+		(format output "~&~A: ~D of ~D tests failed (~A, ~A).~&"
 			(db-title db-type underlying-db-type)
 			(length failed-tests)
 			total-tests
+			machine-type
 			impl-type)
-		(format output "~&~A: All ~D tests passed (~A).~%"
+		(format output "~&~A: All ~D tests passed (~A, ~A).~%"
 			(db-title db-type underlying-db-type)
 			total-tests
+			machine-type
 			impl-type))))))))