diff options
author | Aryadev Chavali <aryadev@aryadevchavali.com> | 2025-02-14 21:41:21 +0000 |
---|---|---|
committer | Aryadev Chavali <aryadev@aryadevchavali.com> | 2025-02-14 21:46:43 +0000 |
commit | f127e1e955b638a8397a27adda2dd51c101c37ae (patch) | |
tree | 9405b55ecff1668ea1b05167889c9c818c2f20e9 /bob.lisp | |
parent | f0e7c9f3f07b57a8a02191ea0a8d86432ab0ebea (diff) | |
download | cantedraw-f127e1e955b638a8397a27adda2dd51c101c37ae.tar.gz cantedraw-f127e1e955b638a8397a27adda2dd51c101c37ae.tar.bz2 cantedraw-f127e1e955b638a8397a27adda2dd51c101c37ae.zip |
Update gitignore, add requirements to README, rework bob and build
Diffstat (limited to 'bob.lisp')
-rw-r--r-- | bob.lisp | 13 |
1 files changed, 9 insertions, 4 deletions
@@ -13,11 +13,12 @@ ;;; Commentary: -;; Little bit of code scaffolding that makes it easy to load or build the -;; system. Named after "Bob the Builder". +;; Code scaffolding to make loading/building the system easy. Named after "Bob +;; the Builder". ;;; Code: +;; Try and push the current directory into the quicklisp project directories. (pushnew (truename (uiop:getcwd)) ql:*local-project-directories*) @@ -27,9 +28,13 @@ (in-package :bob) +(defun init () + (ql:quickload :cantedraw)) + (defun load-all () - (ql:quickload :cantedraw :verbose t)) + (init) + (asdf:load-system :cantedraw)) (defun build () - (load-all) + (init) (asdf:make :cantedraw)) |