Work at SourceForge, help us to make it a better place! We have an immediate need for a Support Technician in our San Francisco or Denver office.

Close

Diff of /src/code/target-package.lisp [a97406] .. [71bc8b] Maximize Restore

  Switch to side-by-side view

--- a/src/code/target-package.lisp
+++ b/src/code/target-package.lisp
@@ -75,7 +75,7 @@
 
 (defmacro with-package-names ((names &key) &body body)
   `(let ((,names *package-names*))
-     (with-locked-hash-table (,names)
+     (with-locked-system-table (,names)
        ,@body)))
 
 ;;;; PACKAGE-HASHTABLE stuff