Print backtrace on clasp CI errors

ruricolist · May 4, 2024 · adfa123 · adfa123
1 parent fd23737
commit adfa123
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/.github/workflows/ci.yml b/.github/workflows/ci.yml
@@ -37,9 +37,9 @@ jobs:
         env:
           HOME: /home/app
         run: |
-          clasp --eval "(handler-case (ql:quickload :serapeum) (error () (uiop:quit 1)))" --quit
+          clasp --eval "(handler-case (ql:quickload :serapeum) (error () (uiop:print-backtrace) (uiop:quit 1)))" --quit
       - name: Test Serapeum
         env:
           HOME: /home/app
         run: |
-          clasp --eval "(handler-case (asdf:test-system :serapeum) (error () (uiop:quit 1)))" --quit
+          clasp --eval "(handler-case (asdf:test-system :serapeum) (error () (uiop:print-backtrace) (uiop:quit 1)))" --quit