mirrors/clog
1
Fork 0
mirror of https://github.com/rabbibotton/clog.git synced 2025-12-06 10:40:45 -08:00
Code Issues Projects Releases Wiki Activity

comment on what implementations covered

Browse source
This commit is contained in:
David Botton 2022-02-11 08:48:30 -05:00
parent abbc5aefbf
commit bcbc7c46b8
1 changed files with 2 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

2
source/clog-utilities.lisp
View file

@ -14,6 +14,8 @@
(defun make-hash-table* (&rest args) (defun make-hash-table* (&rest args)
"Use native 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) #+(or sbcl ecl mezzano)
(apply #'make-hash-table :synchronized t args) (apply #'make-hash-table :synchronized t args)
#-(or sbcl ecl mezzano) (make-hash-table)) #-(or sbcl ecl mezzano) (make-hash-table))