(sb-ext:disable-debugger)
(sb-alien:alien-funcall
 (sb-alien:extern-alien "disable_lossage_handler"
                        (function sb-alien:void)))

(defmacro eval-always (&body body)
  `(eval-when (:compile-toplevel :load-toplevel :execute)
     ,@body))

(eval-always
  (load "~/quicklisp/setup.lisp")
  (compile-file "./zmq-hub.asd")
  (load "./zmq-hub"))

(eval-always (ql:quickload :swank))

(eval-always (ql:quickload :zmq-hub))

(save-lisp-and-die "fwoar-hub"
                   :executable t
                   :compression 9
                   :toplevel #'zmq-hub.main:toplevel)