test/run.lisp @ 8a247663fec5

Remove optima

We only used it in one place.  Not worth adding an entire dependency (and
a bunch of them, if you include the quasiquoting stuff) just for that.
author Steve Losh <steve@stevelosh.com>
date Sat, 16 Jul 2016 19:23:51 +0000
parents 5c914fbcb042
children 8897604cb9dd
#+ecl (setf compiler:*user-cc-flags* "-Wno-shift-negative-value")

(declaim (optimize (debug 3) (safety 3) (speed 0)))


(let ((*standard-output* (make-broadcast-stream))
      ; (*error-output* (make-broadcast-stream))
      )
  (asdf:load-system 'bones :force t)
  (ql:quickload "bones-test"))

(defun done (exit-code)
  #+sbcl (sb-ext:exit :code exit-code)
  #+ccl (quit exit-code)
  #+ecl (quit exit-code))


(time (progn (1am:run) (terpri)))
(terpri)
(done 0)