(ql:quickload '(:uiop :with-user-abort))

(load "truth-table.lisp")

#+sbcl
(progn
  (sb-ext:disable-debugger)
  (sb-ext:save-lisp-and-die
   "truth-table"
   :toplevel 'truth-table:toplevel
   :save-runtime-options t
   :executable t))

#-sbcl
(error "I only know how to build under SBCL")