1.1--- a/x.lisp	Sun Jun 16 02:22:07 2024 +0000
     1.2+++ b/x.lisp	Sun Jun 16 18:26:21 2024 -0400
     1.3@@ -9,7 +9,9 @@
     1.4 (in-package :cl-user)
     1.5 #-(or sbcl cl) (error "unsupported Lisp compiler")
     1.6 #-quicklisp
     1.7-(let ((quicklisp-init "~/.stash/quicklisp/setup.lisp"))
     1.8+(let ((quicklisp-init (or (probe-file #p"~/.stash/quicklisp/setup.lisp")
     1.9+                          (probe-file #p"/usr/local/share/lisp/quicklisp/setup.lisp")
    1.10+                          (probe-file #p "~/quicklisp/setup.lisp"))))
    1.11   (when (probe-file quicklisp-init)
    1.12     (load quicklisp-init)))
    1.13 (require 'sb-rotate-byte)