2024-09-04 03:14:57 -07:00
|
|
|
;; This file should be run as follows:
|
2024-09-05 14:46:05 -07:00
|
|
|
;; sbcl --load build.lisp --eval '(cli)'
|
2024-09-04 03:14:57 -07:00
|
|
|
;; where <BUILD FUNCTION> is either `cli' or `web'
|
2024-09-03 17:50:58 -07:00
|
|
|
|
2024-09-04 03:14:57 -07:00
|
|
|
#-sbcl (error "Only SBCL is supported right now")
|
2024-09-03 17:50:58 -07:00
|
|
|
|
2024-09-04 03:14:57 -07:00
|
|
|
(require :asdf)
|
|
|
|
|
|
|
|
|
|
(defun cli ()
|
|
|
|
|
"Build the CLI application executable."
|
2024-09-05 14:46:05 -07:00
|
|
|
(sb-ext:disable-debugger)
|
2026-02-13 03:29:26 -08:00
|
|
|
#+quicklisp
|
|
|
|
|
(ql:quickload :truth-table/cli)
|
|
|
|
|
#-quicklisp
|
2024-09-04 03:14:57 -07:00
|
|
|
(asdf:load-system :truth-table/cli)
|
|
|
|
|
(require :truth-table/cli)
|
2024-09-03 17:50:58 -07:00
|
|
|
(sb-ext:save-lisp-and-die
|
|
|
|
|
"truth-table"
|
2024-09-04 03:14:57 -07:00
|
|
|
:executable t
|
2024-09-03 17:50:58 -07:00
|
|
|
:save-runtime-options t
|
2024-09-04 03:14:57 -07:00
|
|
|
:toplevel (intern "TOPLEVEL" :truth-table/cli)))
|
2026-02-13 03:24:48 -08:00
|
|
|
|
|
|
|
|
(defun web ()
|
|
|
|
|
"Build web CLI application executable."
|
|
|
|
|
(sb-ext:disable-debugger)
|
2026-02-13 03:29:26 -08:00
|
|
|
#+quicklisp
|
|
|
|
|
(ql:quickload :truth-table/web)
|
|
|
|
|
#-quicklisp
|
2026-02-13 03:24:48 -08:00
|
|
|
(asdf:load-system :truth-table/web)
|
|
|
|
|
(require :truth-table/web)
|
|
|
|
|
(sb-ext:save-lisp-and-die
|
|
|
|
|
"truth-table-web-server"
|
|
|
|
|
:executable t
|
|
|
|
|
:save-runtime-options t
|
|
|
|
|
:toplevel (intern "TOPLEVEL" :truth-table/web)))
|
