projects
/
clsql.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
b8b3819
)
Adding docstring warning on clear-con-pool
author
Nathan Bird
<nathan@acceleration.net>
Fri, 5 Mar 2010 22:05:21 +0000
(17:05 -0500)
committer
Nathan Bird
<nathan@acceleration.net>
Fri, 5 Mar 2010 22:05:21 +0000
(17:05 -0500)
sql/pool.lisp
patch
|
blob
|
history
diff --git
a/sql/pool.lisp
b/sql/pool.lisp
index 66cbaf76125d10b2a0ee600ae8044148635d3a44..8a891f41b49b4d930061348c63f0e63b123c0e0c 100644
(file)
--- a/
sql/pool.lisp
+++ b/
sql/pool.lisp
@@
-121,6
+121,8
@@
chance to do cleanup."
(database-execute-command "DISCARD ALL" database)))))
(defun clear-conn-pool (pool)
+ "Be careful this function will disconnect connections without regard
+to whether another thread is actively using them."
(with-process-lock ((conn-pool-lock pool) "Clear pool")
(mapc #'%pool-force-disconnect (all-connections pool))
(setf (all-connections pool) nil