(format t "updating quicklisp, do we have cl-epoch?~%")
(ql:update-dist "quicklisp")
(ql:system-apropos "cl-epoch")
(format t "loading murja ~%")
(ql:quickload :aggressive-murja)
(ql:quickload :aggressive-murja/tests)
(unless (fiveam:run! 'murja.tests:main-suite)
(sb-ext:exit :code 666))