r9387: * test/test-utils.lisp: Add oracle to specs and list of backends

diff --git a/ChangeLog b/ChangeLog
index 6148842220a673010325cb98a0995b24e19f2924..322ab28eeedaca9444cc3285ea3ef53f0e811e6d 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,4 +1,5 @@
 16 May 2004 Kevin Rosenberg (kevin@rosenberg.net)
+       * test/test-utils.lisp: Add oracle to specs and list of backends
        * doc/TODO: New file
        * test/test-fdml.lisp: Added FDML/SELECT/34 to test
        run-time instantiation of variables in reader macros.

diff --git a/tests/utils.lisp b/tests/utils.lisp
index c93c91fea491fbfbea6a30a5226373e374074f24..bacc9ff92d18af91254862a2ebbb771e2c645735 100644 (file)
--- a/tests/utils.lisp
+++ b/tests/utils.lisp
@@ -24,17 +24,18 @@
                 :type "config"))
 
 (defvar +all-db-types+
-  #-clisp '(:postgresql :postgresql-socket :mysql :sqlite :odbc 
-           #+allegro :aodbc)
-  #+clisp '(:sqlite))
+    #-clisp '(:postgresql :postgresql-socket :mysql :sqlite :odbc :oracle
+             #+allegro :aodbc)
+    #+clisp '(:sqlite))
 
 (defclass conn-specs ()
   ((aodbc :accessor aodbc-spec :initform nil)
-   (odbc :accessor odbc-spec :initform nil)
    (mysql :accessor mysql-spec :initform nil)
    (postgresql :accessor postgresql-spec :initform nil)
    (postgresql-socket :accessor postgresql-socket-spec :initform nil)
-   (sqlite :accessor sqlite-spec :initform nil))
+   (sqlite :accessor sqlite-spec :initform nil)
+   (odbc :accessor odbc-spec :initform nil)
+   (oracle :accessor oracle-spec :initform nil))
   (:documentation "Connection specs for CLSQL testing"))