git.fiddlerwoaroof.com
Browse code

fix: make github workflow test more failures

Ed L authored on 01/09/2023 18:58:20
Showing 1 changed files
... ...
@@ -62,6 +62,8 @@ jobs:
62 62
           sbcl --disable-debugger --no-userinit \
63 63
                --load "$HOME/quicklisp/setup.lisp" \
64 64
                --eval "(mapcar 'asdf:load-asd (directory \"*.asd\"))" \
65
-               --eval "(handler-case (asdf:test-system :data-lens) (error (c) (format t \"~a\" c) (uiop:quit 42)))" \
66
-               --eval "(handler-case (asdf:test-system :data-lens/transducers) (error (c) (format t \"~a\" c) (uiop:quit 43)))" \
65
+               --eval "(handler-case (ql:quickload :data-lens) (error (c) (format t \"~a\" c) (uiop:quit 42)))" \
66
+               --eval "(handler-case (ql:quickload :data-lens/transducers) (error (c) (format t \"~a\" c) (uiop:quit 43)))" \
67
+               --eval "(handler-case (asdf:test-system :data-lens) (error (c) (format t \"~a\" c) (uiop:quit 44)))" \
68
+               --eval "(handler-case (asdf:test-system :data-lens/transducers) (error (c) (format t \"~a\" c) (uiop:quit 45)))" \
67 69
                --quit