From b7c241a91a77592f8ec89cb76c2a7ed359b60ab1 Mon Sep 17 00:00:00 2001
From: "Kevin M. Rosenberg" <kevin@rosenberg.net>
Date: Mon, 17 May 2004 02:57:10 +0000
Subject: [PATCH] r9387:         * test/test-utils.lisp: Add oracle to specs
 and list of backends

---
 ChangeLog        |  1 +
 tests/utils.lisp | 11 ++++++-----
 2 files changed, 7 insertions(+), 5 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 6148842..322ab28 100644
--- 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 c93c91f..bacc9ff 100644
--- 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"))
 
 
-- 
2.34.1