diff options
Diffstat (limited to '')
-rwxr-xr-x | tests/run-tests.scm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/tests/run-tests.scm b/tests/run-tests.scm index ded94cc5..e01fcb0b 100755 --- a/tests/run-tests.scm +++ b/tests/run-tests.scm @@ -33,11 +33,11 @@ ;; Load tests (define (read-multiple) -(let loop ((done '())) - (let ((sexp (read))) - (if (eof-object? sexp) - (reverse done) - (loop (cons sexp done)))))) + (let loop ((done '())) + (let ((sexp (read))) + (if (eof-object? sexp) + (reverse done) + (loop (cons sexp done)))))) ;; TODO test-group fails if called before any test begin, since |