From 9d1da86a8aaee87bde358d7eb3834aec51c09adc Mon Sep 17 00:00:00 2001
From: carlos alquezar <alquezar@unizar.es>
Date: Mon, 27 May 2019 20:23:16 +0200
Subject: [PATCH] updated test script

---
 run-kenzo-test.lisp | 15 ++++++++++++---
 1 file changed, 12 insertions(+), 3 deletions(-)

diff --git a/run-kenzo-test.lisp b/run-kenzo-test.lisp
index 6489768..4c53980 100644
--- a/run-kenzo-test.lisp
+++ b/run-kenzo-test.lisp
@@ -2,9 +2,18 @@
 
 (DECLAIM (OPTIMIZE (speed 3) (space 0) (debug 3)))
 
-(require 'asdf)
-
-(asdf:operate 'asdf:load-op 'kenzo-test)
+(require :asdf)
+(require :kenzo)
+(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)
 
 #+(or ecl ccl) (quit)