The following example assumes that the
sql
package has been loaded, and that the
:odbc
database type has been initialized. It connects to two databases,
scott
and
personnel
, and then prints out the connected databases.
(setf *default-database-type* :odbc)
(connect "scott")
(connect "personnel" :database-type :odbc)
(print *connected-databases*)