(ql:quickload :fussy)

(defun run ()
  (fussy::start)
  (loop (sleep 10)))

(save-lisp-and-die "fussy" :toplevel 'run :executable t)