feat: raise error for escalate to actions

ivixvi · Jan 4, 2025 · aa75a5e · aa75a5e
1 parent a1b92d0
commit aa75a5e
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/tests/main.lisp b/tests/main.lisp
@@ -8,4 +8,6 @@
   (testing "hello common lisp"
     (ok (string= (greeting:hello "common lisp") "Hello common lisp! f"))))
 
-(defun run-test () (rove:run :greeting/tests))
+(defun run-test ()
+  (unless (rove:run :greeting/tests)
+    (error "Tests failed")))