handle error in test setup

jbouwman · Dec 25, 2024 · 24a8c53 · 24a8c53
1 parent 88a760e
commit 24a8c53
Showing 1 changed file with 5 additions and 4 deletions.
diff --git a/etc/test.lisp b/etc/test.lisp
@@ -1,8 +1,9 @@
+(require :asdf)
+
+(load "epsilon.asd")
+
 (handler-case
-    (progn
-      (require :asdf)
-      (load "epsilon.asd")
-      (asdf:load-system "epsilon/tests"))
+    (asdf:load-system "epsilon/tests")
   (error (condition)
     (format *error-output "~A~%" condition)
     (sb-debug:print-backtrace :stream *error-output*)))