ciel/build-image.lisp
2023-09-26 12:57:36 +02:00

22 lines
701 B
Common Lisp

(in-package :cl-user)
(ql:quickload "deploy") ;; not used to build the image, but used in the .asd.
(ql:quickload "cl+ssl") ;; only because of Deploy's parameters.
;; (asdf:load-asd "./ciel.asd")
;; Bug on CI, needs an absolute pathname.
(let ((pathname (merge-pathnames "ciel.asd" (uiop:getcwd))))
(uiop:format! t "~&--- loading this asd absolute pathname: ~S~&" pathname)
(asdf:load-asd pathname))
(ql:quickload "swank")
(ql:quickload "ciel")
(in-package :ciel-user)
;; XXX: we would like to read our ~/.cielrc init file when resuming the core
;; in Slime.
;; Currently we load it only when starting the terminal REPL.
;; See the :toplevel option.
(sb-ext:save-lisp-and-die "ciel-core")