X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=tests%2Ftest-init.lisp;h=1a274d918ef108621617f2d5a7cded81973348f5;hb=72c5d9d0555b01290409dc2607935db823fa1f10;hp=ebbcf8396d9d35e9da24ea762d09e9e681dafbc8;hpb=c4da3cfcbb955395d8a556e1f89aadad696302b7;p=clsql.git diff --git a/tests/test-init.lisp b/tests/test-init.lisp index ebbcf83..1a274d9 100644 --- a/tests/test-init.lisp +++ b/tests/test-init.lisp @@ -4,28 +4,11 @@ ;;;; Authors: Marcus Pearce , Kevin Rosenberg ;;;; Created: 30/03/2004 ;;;; Updated: $Id$ -;;;; ====================================================================== -;;;; -;;;; Description ========================================================== -;;;; ====================================================================== ;;;; ;;;; Initialisation utilities for running regression tests on CLSQL. ;;;; ;;;; ====================================================================== -;;; This test suite looks for a configuration file named ".clsql-test.config" -;;; located in the users home directory. -;;; -;;; This file contains a single a-list that specifies the connection -;;; specs for each database type to be tested. For example, to test all -;;; platforms, a sample "test.config" may look like: -;;; -;;; ((:mysql ("localhost" "a-mysql-db" "user1" "secret")) -;;; (:aodbc ("my-dsn" "a-user" "pass")) -;;; (:postgresql ("localhost" "another-db" "user2" "dont-tell")) -;;; (:postgresql-socket ("pg-server" "a-db-name" "user" "secret-password")) -;;; (:sqlite ("path-to-sqlite-db"))) - (in-package #:clsql-tests) (defvar *rt-connection*) @@ -321,7 +304,7 @@ ******************************************************************* " db-type) (db-type-ensure-system db-type) - (rt:rem-all-tests) + (regression-test:rem-all-tests) (ignore-errors (destroy-database spec :database-type db-type)) (ignore-errors (create-database spec :database-type db-type)) (dolist (test (append *rt-connection* *rt-fddl* *rt-fdml*