projects
/
clsql.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
r1798: Initial support for pooled connections
[clsql.git]
/
sql
/
classes.cl
diff --git
a/sql/classes.cl
b/sql/classes.cl
index 8ba8c265b1fe4e3e0097867cad547cad7cc2de0a..7a3f336a7cc6a61237b37a487e21350e4135341f 100644
(file)
--- a/
sql/classes.cl
+++ b/
sql/classes.cl
@@
-8,7
+8,7
@@
;;;; Original code by Pierre R. Mai
;;;; Date Started: Feb 2002
;;;;
;;;; Original code by Pierre R. Mai
;;;; Date Started: Feb 2002
;;;;
-;;;; $Id: classes.cl,v 1.
1 2002/03/29 08:13:02
kevin Exp $
+;;;; $Id: classes.cl,v 1.
2 2002/04/27 20:58:11
kevin Exp $
;;;;
;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
;;;; and Copyright (c) 1999-2001 by Pierre R. Mai
;;;;
;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
;;;; and Copyright (c) 1999-2001 by Pierre R. Mai
@@
-23,7
+23,9
@@
(defclass database ()
(defclass database ()
- ((name :initarg :name :reader database-name))
+ ((name :initarg :name :reader database-name)
+ (connection-spec :initarg :connection-spec :reader connection-spec
+ :documentation "Require to use connection pool"))
(:documentation
"This class is the supertype of all databases handled by CLSQL."))
(:documentation
"This class is the supertype of all databases handled by CLSQL."))