diff options
| author | David Thompson <dthompson@vistahigherlearning.com> | 2021-03-19 09:47:34 -0400 |
|---|---|---|
| committer | David Thompson <dthompson@vistahigherlearning.com> | 2021-03-19 09:47:34 -0400 |
| commit | d128b2d1f213f4df1e524a059603d8b739debdd5 (patch) | |
| tree | bced39f268f1cdecdc22172c144d6255acc456ca | |
| parent | 2917dbf5e132c1196bfbda3508743884293a5775 (diff) | |
tests: Fix test-end*
| -rw-r--r-- | tests/utils.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/tests/utils.scm b/tests/utils.scm index 9f10784..4921682 100644 --- a/tests/utils.scm +++ b/tests/utils.scm @@ -19,4 +19,6 @@ #:export (test-end*)) (define (test-end* name) - (exit (= (test-runner-fail-count (test-end name)) 0))) + (let ((runner (test-runner-current))) + (test-end name) + (exit (= (test-runner-fail-count runner) 0)))) |