diff --git a/source/clog-connection.lisp b/source/clog-connection.lisp
index e5a773a..257b42f 100644
--- a/source/clog-connection.lisp
+++ b/source/clog-connection.lisp
@@ -66,10 +66,12 @@ script."
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 (defun make-hash-table* (&rest args)
-  "Use concurrent hash tables"
+  "Use native concurrent hash tables"
+  ;; This covers sbcl ecl mazzano lw and ccl.
+  ;; (lw and ccl default hash is synchronized)
   #+(or sbcl ecl mezzano)
   (apply #'make-hash-table :synchronized t args)
-  #-(or sbcl ecl mezzano) (make-hash-table))
+  #-(or sbcl ecl mezzano) (apply #'make-hash-table args))
 
 (defvar *verbose-output* nil "Verbose server output (default false)")
 
diff --git a/source/clog-utilities.lisp b/source/clog-utilities.lisp
index d1b606b..2a57ca3 100644
--- a/source/clog-utilities.lisp
+++ b/source/clog-utilities.lisp
@@ -18,7 +18,7 @@
   ;; (lw and ccl default hash is synchronized)
   #+(or sbcl ecl mezzano)
   (apply #'make-hash-table :synchronized t args)
-  #-(or sbcl ecl mezzano) (make-hash-table))
+  #-(or sbcl ecl mezzano) (apply #'make-hash-table args))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; Implementation - clog-group