Adjust Bob so we can use quickload the project to get all dependencies

This commit is contained in:
2025-02-14 20:39:00 +00:00
parent fba391a6e8
commit d328bfbbdf
2 changed files with 9 additions and 5 deletions

View File

@@ -18,16 +18,18 @@
;;; Code: ;;; Code:
(pushnew (truename (uiop:getcwd))
ql:*local-project-directories*)
(defpackage bob (defpackage bob
(:use :cl) (:use :cl)
(:export :build :load-all)) (:export :build :load-all))
(in-package :bob) (in-package :bob)
(asdf:load-asd (merge-pathnames "cantedraw.asd" (uiop:getcwd))) (defun load-all ()
(ql:quickload :cantedraw :verbose t))
(defun build () (defun build ()
(load-all)
(asdf:make :cantedraw)) (asdf:make :cantedraw))
(defun load-all ()
(asdf:load-system :cantedraw))

4
build
View File

@@ -1,5 +1,7 @@
#!/usr/bin/env sh #!/usr/bin/env sh
set -xe set -xe
sbcl --load "./bob.lisp" \
sbcl --non-interactive \
--load "./bob.lisp" \
--eval "(bob:build)" --eval "(bob:build)"