X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=tests%2Futils.lisp;h=c93c91fea491fbfbea6a30a5226373e374074f24;hb=7a01154e40dd4516ece2ebe2267a11dec1f9a18f;hp=1928bf4207e60b664b0382583aa370987d4e2e0e;hpb=f716bb1161cf9e89a96945c4a444244f9d303691;p=clsql.git

diff --git a/tests/utils.lisp b/tests/utils.lisp
index 1928bf4..c93c91f 100644
--- a/tests/utils.lisp
+++ b/tests/utils.lisp
@@ -1,4 +1,4 @@
-;;;; -*- Mode: LISP; Syntax: ANSI-Common-Lisp; Base: 10 -*-
+;;; -*- Mode: LISP; Syntax: ANSI-Common-Lisp; Base: 10 -*-
 ;;;; *************************************************************************
 ;;;; FILE IDENTIFICATION
 ;;;;
@@ -79,6 +79,7 @@
 			       impl-version
 			       machine-type)
 	      form
+	    (declare (ignorable utime impl-version))
 	    (if failed-tests
 		(format output "~&~A: ~D of ~D tests failed (~A, ~A).~&"
 			(db-title db-type underlying-db-type)