diff --git a/.gitmodules b/.gitmodules index dc65084440ddcb9eb6497d146bf741c5c4d1a8f2..0fee3d7e4b186a16ac29ddd4a5ab7525241020a9 100644 --- a/.gitmodules +++ b/.gitmodules @@ -34,3 +34,6 @@ [submodule "ext/cl-scripting"] path = ext/cl-scripting url = https://github.com/fare/cl-scripting.git +[submodule "ext/cl-launch"] + path = ext/cl-launch + url = https://gitlab.common-lisp.net/xcvb/cl-launch.git diff --git a/ext/cl-launch b/ext/cl-launch new file mode 160000 index 0000000000000000000000000000000000000000..4a4ec3d8643a04dfcdc742284d0c965bc40adb37 --- /dev/null +++ b/ext/cl-launch @@ -0,0 +1 @@ +Subproject commit 4a4ec3d8643a04dfcdc742284d0c965bc40adb37 diff --git a/tools/asdf-tools b/tools/asdf-tools index 48f6366aed80cf64111104a3310cc54ca08d9db0..794f01e4689b17f12c59f70999f72154dd123405 100755 --- a/tools/asdf-tools +++ b/tools/asdf-tools @@ -14,6 +14,16 @@ ;;; ASDF3 is loaded, now use it! (eval-when (:compile-toplevel :load-toplevel :execute) + ;; For bootstrap purposes, avoid having to extract cl-launch.asd into ext/cl-launch/ + (let ((cl-launch-dir (uiop:subpathname (uiop:current-lisp-file-pathname) "../ext/cl-launch/"))) + (when (uiop:probe-file* (uiop:subpathname cl-launch-dir "dispatch.lisp")) + (asdf:register-preloaded-system + :cl-launch/dispatch + :class :package-inferred-system + :source-file nil + :pathname cl-launch-dir + :components '((cl-source-file "lisp" :pathname "dispatch.lisp"))))) + ;; Load either with or without quicklisp #-quicklisp (asdf:load-system :asdf-tools :verbose nil) #+quicklisp