e4881c6a | (defpackage :fwoar.build (:use :cl) (:export make)) (in-package :fwoar.build) |
5d168e1a | #.(progn (ql:quickload :alexandria) nil) |
e4881c6a | (defmacro eval-always (&body body) `(eval-when (:compile-toplevel :load-toplevel :execute) ,@body)) (defmacro stepwise (&body body) `(progn ,@(mapcar (lambda (x) `(eval-always ,@x)) body))) |
36330a16 | ;; #.(progn ;; (load "~/quicklisp/setup.lisp") ;; nil) |
e4881c6a | (stepwise ((defun load-compile (pn) (load (compile-file pn)))) |
36330a16 | ((ql:quickload :cffi-grovel)) |
e4881c6a | ((princ (mapcar 'load-compile |
36330a16 | (remove #\. (directory (merge-pathnames "*.asd" *load-pathname*)) :key 'pathname-name :test 'alexandria:starts-with))) |
e4881c6a | (terpri)) |
36330a16 | ((ql:quickload :daydreamer)) |
98dd2e66 | |
36330a16 | ((asdf:operate :static-program-op :daydreamer)) |
a39907ca | #+nil |
36330a16 | ((asdf/driver:symbol-call :daydreamer.cli :dump)) |
5d168e1a | ((sb-ext:quit))) |