+ ((name :initarg :name :reader database-name)
+ (connection-spec :initarg :connection-spec :reader connection-spec
+ :documentation "Require to use connection pool")
+ (transaction-level :accessor transaction-level))
+ (:default-initargs :name nil :connection-spec nil :transaction-level 0)