# HG changeset patch # User ellis # Date 1686880900 14400 # Node ID aa37feddcfb2df266d41751877c076c84c7188d6 # Parent 7e640cebeada808c56e668eecd6539d5e04ccef5 tweaks diff -r 7e640cebeada -r aa37feddcfb2 makefile --- a/makefile Thu Jun 15 21:42:39 2023 -0400 +++ b/makefile Thu Jun 15 22:01:40 2023 -0400 @@ -1,6 +1,6 @@ -M?=release -L?=sbcl -C?=default.cfg +MODE?=release +LISP?=sbcl +CFG?=default.cfg L_C=$(L) --no-userinit L_D=$(L) --load demo.asd --eval '(ql:quickload "demo")' L_S=$(L) --script @@ -12,7 +12,7 @@ deps:; clean:;rm -rf *.fasl;cargo clean fmt:$(RS);cargo fmt -build:$(RS) $(CL);cargo build --$(M);$(L_D) +build:$(RS) $(CL);cargo build --$(MODE);$(L_D) --eval '(asdf:make "demo")' \ --eval '(quit)' docs:$(RS);cargo doc diff -r 7e640cebeada -r aa37feddcfb2 tools/prepare-image.lisp --- a/tools/prepare-image.lisp Thu Jun 15 21:42:39 2023 -0400 +++ b/tools/prepare-image.lisp Thu Jun 15 22:01:40 2023 -0400 @@ -4,9 +4,9 @@ #+sbcl (require 'sb-introspect) -(when (probe-file "scripts/asdf.lisp") +(when (probe-file "tools/asdf.lisp") (format t "Compiling asdf..~%") - (let ((output (compile-file "scripts/asdf.lisp" :verbose nil :print nil))) + (let ((output (compile-file "tools/asdf.lisp" :verbose nil :print nil))) (load output)) (provide "asdf")) @@ -108,6 +108,7 @@ #+nil (ql:update-all-dists :prompt nil) +;; is the package name already loaded as a feature? uhh look it up (pushnew :demo *features*) (defun update-project-directories (cwd)