quicklisp-to-nix: make it possible to run with Nix sandboxing enabled

This commit is contained in:
Michael Raskin
2017-09-04 21:39:07 +02:00
parent dd74844fff
commit e0771b0a04
2 changed files with 3 additions and 4 deletions
@@ -310,10 +310,8 @@ Arguments:
(defun dump-image ()
"Make an executable"
(with-quicklisp (dir) ()
(declare (ignore dir))
(dolist (system *required-systems*)
(funcall (sym :ql :quickload) system)))
(dolist (system *required-systems*)
(asdf:make system))
(register-emb "nix-package" (merge-pathnames #p"nix-package.emb" (this-file)))
(register-emb "invocation" (merge-pathnames #p"invocation.emb" (this-file)))
(register-emb "parasitic-invocation" (merge-pathnames #p"parasitic-invocation.emb" (this-file)))