X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=tests%2Fbenchmarks.lisp;h=16e3e78f8b34cdc2ccc6f0db411302b09ace9654;hb=e74641f3be973e28b30605777bcd6ad4ec493867;hp=66dfb3e75934e2d859691627f34e2990b8eaaa63;hpb=0cd2c5c91b32a5cf24a72291d922806b95a383c6;p=clsql.git

diff --git a/tests/benchmarks.lisp b/tests/benchmarks.lisp
index 66dfb3e..16e3e78 100644
--- a/tests/benchmarks.lisp
+++ b/tests/benchmarks.lisp
@@ -42,7 +42,8 @@
 
 (defun do-benchmarks-for-backend (db-type spec count)
   (test-connect-to-database db-type spec)
-  (write-report-banner "Benchmarks" db-type *report-stream*)
+  (write-report-banner "Benchmarks" db-type *report-stream*
+		       (database-name-from-spec spec db-type))
 
   (create-view-from-class 'bench)
   (benchmark-init)