;; a.scm

(use test)

(test-group "A"
  (abort "error"))

;; b.scm

(use test)

(test-group "B"
  (test-assert #t))

;; run.scm

(use test)

(load "a.scm")
(load "b.scm")

(test-exit)

;; Running csi -s run.scm displays error from a.scm but exits with code 0