X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=tests%2Ftest-init.lisp;h=2ad787bdc6d48d5781cda33d2ae265e534125f12;hb=67a4ab3576b630b8d34a6476ec8c1e9dfa913800;hp=d1de92e94668eda0afacc5dc61e6148c2a2472af;hpb=71c68c68c83c7dce7fb5e6243baa365f28f70ebe;p=clsql.git

diff --git a/tests/test-init.lisp b/tests/test-init.lisp
index d1de92e..2ad787b 100644
--- a/tests/test-init.lisp
+++ b/tests/test-init.lisp
@@ -216,7 +216,9 @@
 
          (%do-tests test-forms db-type)
 
-           (format *report-stream* "~&Tests skipped:")
+         (format *report-stream* "~&~D of ~D Tests skipped:"
+                 (length skip-tests)
+                 (length test-forms))
            (if skip-tests
                (let ((max-test-name (length (symbol-name (caar skip-tests)))))
                  (dolist (skipped (cdr skip-tests))
@@ -388,7 +390,7 @@
   *default-database*)
 
 (defun rl ()
-  (rapid-load :postgresql))
+  (rapid-load :postgresql-socket3))
 
 (defun rlm ()
   (rapid-load :mysql))