X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql%2Fexpressions.lisp;h=4a6eb6384e6642469f320ce9f4efaa757582cdf3;hb=30186614582039bdc3d3f86bc5165ef300c5d3e0;hp=bee6faffafa22dfc543255d3892890a2ce4736cd;hpb=d86f73be9a261b9c071ab905aeff5d1ee30a3f31;p=clsql.git

diff --git a/sql/expressions.lisp b/sql/expressions.lisp
index bee6faf..4a6eb63 100644
--- a/sql/expressions.lisp
+++ b/sql/expressions.lisp
@@ -139,11 +139,9 @@
 
 
 (defvar *output-hash*
-  #+sbcl
-  (make-hash-table :test #'equal :synchronized T :weakness :key-and-value)
-  #-sbcl
-  (make-hash-table :test #'equal )
-  "For caching generated SQL strings.")
+      (make-weak-hash-table :test #'equal)
+  "For caching generated SQL strings, set to NIL to disable."
+  )
 
 (defmethod output-sql :around ((sql t) database)
   (if (null *output-hash*)