;; This file should be run as follows:
;;   sbcl --load build.lisp --eval '(<BUILD FUNCTION>)'
;; where <BUILD FUNCTION> is either `cli' or `web'

#-sbcl (error "Only SBCL is supported right now")

(sb-ext:disable-debugger)

(require :asdf)

(defun cli ()
  "Build the CLI application executable."
  (asdf:load-system :truth-table/cli)
  (require :truth-table/cli)
  (sb-ext:save-lisp-and-die
   "truth-table"
   :executable t
   :save-runtime-options t
   :toplevel (intern "TOPLEVEL" :truth-table/cli)))

(defun web ()
  "Build the web server executable."
  (asdf:load-system :truth-table/web)
  (require :truth-table/web)
  (sb-ext:save-lisp-and-die
   "truth-table-webserver"
   :executable t
   :save-runtime-options t
   :toplevel (intern "TOPLEVEL" :truth-table/web)))