Dynamically set core image path

This commit is contained in:
Marcus Kammer 2023-12-10 11:53:09 +01:00
parent aed6caa7fc
commit e5e82d81c3
Signed by: marcuskammer
GPG key ID: C374817BE285268F

View file

@ -15,8 +15,9 @@
;; shell$ sbcl
;; * (mapc 'require '(sb-bsd-sockets sb-posix sb-introspect sb-cltl2 asdf))
;; * (save-lisp-and-die "sbcl.core-for-slime")
(setq slime-lisp-implementations
'((sbcl ("sbcl" "--core" "/home/marcus/sbcl.core-for-slime"))))
(let ((image-path (expand-file-name "~/sbcl.core-for-slime")))
(setq slime-lisp-implementations
`((sbcl ("sbcl" "--core" ,image-path)))))
(defvar mk/hyperspec-dir-locations
'("d:/visua/projects/personal/lisp-docs/HyperSpec-7-0/HyperSpec/"