[elephant-cvs] CVS elephant/src

[rread]

Update of /project/elephant/cvsroot/elephant/src
In directory common-lisp:/tmp/cvs-serv22618/src

Modified Files:
	RUNTEST.lisp 
Added Files:
	BerkeleyDB-tests.lisp MigrationTests.lisp SQLDB-tests.lisp 
Log Message:
Clearer test usage and system-specific test invocation patterns


--- /project/elephant/cvsroot/elephant/src/RUNTEST.lisp	2006/01/24 15:42:30	1.3
+++ /project/elephant/cvsroot/elephant/src/RUNTEST.lisp	2006/01/24 18:25:00	1.4
@@ -1,3 +1,6 @@
+;; This file is now obsolete...
+;; Please use SQLDB-test.lisp or BerkeleyDB-tests.lisp
+
 (asdf:operate 'asdf:load-op :elephant)
 (asdf:operate 'asdf:load-op :ele-clsql)
 (asdf:oos 'asdf:load-op :clsql-postgresql-socket)

--- /project/elephant/cvsroot/elephant/src/BerkeleyDB-tests.lisp	2006/01/24 18:25:01	NONE
+++ /project/elephant/cvsroot/elephant/src/BerkeleyDB-tests.lisp	2006/01/24 18:25:01	1.1
(asdf:operate 'asdf:load-op :elephant)
(asdf:operate 'asdf:load-op :ele-bdb)
(asdf:operate 'asdf:load-op :elephant-tests)

(in-package "ELEPHANT-TESTS")

;; The primary and secondary test-paths are 
;; use for the migration tests.
;; 
(setq *test-path-primary* *testdb-path*)
(setq *test-path-secondary* nil)

(do-all-tests-spec *test-path-primary*)
--- /project/elephant/cvsroot/elephant/src/MigrationTests.lisp	2006/01/24 18:25:01	NONE
+++ /project/elephant/cvsroot/elephant/src/MigrationTests.lisp	2006/01/24 18:25:01	1.1
;; This file is an example of how to perform the 
;; migration tests.  You will have to modify it 
;; slightly depending on the systems that want to test...
;; You can test migration even between two BDB respositories if you wish
(asdf:operate 'asdf:load-op :elephant)
(asdf:operate 'asdf:load-op :ele-clsql)
(asdf:operate 'asdf:load-op :clsql-postgresql-socket)
(asdf:operate 'asdf:load-op :ele-bdb)
(asdf:operate 'asdf:load-op :elephant-tests)


;; For sqlite-3..
;; (asdf:operate 'asdf:load-op :ele-sqlite3)


(in-package "ELEPHANT-TESTS")


;; The primary and secondary test-paths are 
;; use for the migration tests.

;; This this configuration for testing between BDB and SQL....
(setq *test-path-primary* *testpg-path*)
;; (setq *test-path-primary* *testsqlite3-path*)
(setq *test-path-secondary* *testdb-path*)


;; This this configuration for testing from one BDB repository to another...
(setq *test-path-primary* *testdb-path*)
;; (setq *test-path-primary* *testsqlite3-path*)
(setq *test-path-secondary* *testdb-path2*)

(do-migrate-test-spec *test-path-primary*)
--- /project/elephant/cvsroot/elephant/src/SQLDB-tests.lisp	2006/01/24 18:25:01	NONE
+++ /project/elephant/cvsroot/elephant/src/SQLDB-tests.lisp	2006/01/24 18:25:01	1.1
(asdf:operate 'asdf:load-op :elephant)
(asdf:operate 'asdf:load-op :ele-clsql)
(asdf:operate 'asdf:load-op :elephant-tests)

;; For postgres use this...
(asdf:oos 'asdf:load-op :clsql-postgresql-socket)
;; For sqllite3... use this...
;; (asdf:operate 'asdf:load-op :ele-sqlite3)

(in-package "ELEPHANT-TESTS")

;; The primary and secondary test-paths are 
;; use for the migration tests.
;; You may have to change these from the defaults set in
;; elephant-tests.lisp to point to your database.
(setq *test-path-primary* *testpg-path*)

;; This is an alternative
;; (setq *test-path-primary* *testsqlite3-path*)

(setq *test-path-secondary* nil)

(do-all-tests-spec *test-path-primary*)