(in-package #:cl-user)
(eval-when (:compile-toplevel :load-toplevel :execute)
- (defpackage #:clsql-classic-sys
- (:nicknames #:clsql-classic)
- (:use #:cl #:clsql-base-sys)
+ (defpackage #:clsql-classic
+ (:use #:cl #:clsql-base)
(:import-from
#:clsql-base
.
#:database
#:database-name
- #:closed-database
+ #:database-type
+ #:is-database-open
#:database-name-from-spec
;; utils.lisp