1.0.10.46: Inline the local functions in MAYBE-REHASH

        * Fixes small hash-table speed regression introduced in
          1.0.10.14 (and hidden by the other improvements in that
          commit).
        * 15-30% speedup over .14 on common hash operations.

diff --git a/src/code/target-hash-table.lisp b/src/code/target-hash-table.lisp
index 06f62d2..f35ff7a 100644 (file)
--- a/src/code/target-hash-table.lisp
+++ b/src/code/target-hash-table.lisp
@@ -481,6 +481,7 @@ multiple threads accessing the same hash-table without locking."
                 (zerop (hash-table-next-free-kv hash-table))))
          (rehash-without-growing-p ()
            (hash-table-needs-rehash-p hash-table)))
+    (declare (inline rehash-p rehash-without-growing-p))
     (cond ((rehash-p)
            ;; Use recursive spinlocks since for weak tables the
            ;; spinlock has already been acquired. GC must be inhibited

diff --git a/version.lisp-expr b/version.lisp-expr
index e7ea859..2502575 100644 (file)
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"1.0.10.45"
+"1.0.10.46"