X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;ds=sidebyside;f=sql%2Fexpressions.lisp;fp=sql%2Fexpressions.lisp;h=4a6eb6384e6642469f320ce9f4efaa757582cdf3;hb=bab5e8056e3850cd9fb0582f73955aee5abf010b;hp=bee6faffafa22dfc543255d3892890a2ce4736cd;hpb=084aa8d0bcfd2e07d0f7b267f27440191d699268;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*)