 
 (defun straight--build-cache-file ()
   "Get the file containing straight.el's build cache."
-  (straight--file "build-cache.el"))
+  (straight--file
+   (or straight-build-cache-fixed-name
+       (concat straight-build-dir "-cache.el"))))
 
 (defun straight--links-dir (&rest segments)
   "Get a subdirectory of straight/links/.

package. This information is used to determine whether or not a
package needs to be rebuilt.

The value of this variable is persisted in the file
build-cache.el.")

(defvar straight--autoloads-cache nil
  "Hash table keeping track of autoloads extracted from packages, or nil.

      (straight--save-build-cache))))

(defun straight--save-build-cache ()
  "Write data from memory into the build cache file.
This uses the values of `straight--build-cache' and
`straight--eagerly-checked-packages'.

The name of the cache file is stored in
`straight-build-cache-file'."
  (unless straight-safe-mode
    (with-temp-buffer
      ;; Prevent mangling of the form being printed in the case that
