updated test script

This commit is contained in:
carlos alquezar 2019-05-27 20:23:16 +02:00
parent 5b16336b1c
commit 9d1da86a8a

View File

@ -2,9 +2,18 @@
(DECLAIM (OPTIMIZE (speed 3) (space 0) (debug 3))) (DECLAIM (OPTIMIZE (speed 3) (space 0) (debug 3)))
(require 'asdf) (require :asdf)
(require :kenzo)
(asdf:operate 'asdf:load-op 'kenzo-test) (require :ecl-quicklisp)
(ql:quickload "fiveam")
(push #P"./" asdf:*central-registry*)
(require :kenzo-test)
(setf fiveam:*debug-on-error* t
fiveam:*debug-on-failure* t)
(setf *debugger-hook*
(lambda (c h)
(declare (ignore c h))
(uiop:quit -1)))
(fiveam:run! :kenzo) (fiveam:run! :kenzo)
#+(or ecl ccl) (quit) #+(or ecl ccl) (quit)