summaryrefslogtreecommitdiff
path: root/build-aux
diff options
context:
space:
mode:
Diffstat (limited to 'build-aux')
-rw-r--r--build-aux/test-driver.scm16
1 files changed, 8 insertions, 8 deletions
diff --git a/build-aux/test-driver.scm b/build-aux/test-driver.scm
index 25aaf44..0daad1d 100644
--- a/build-aux/test-driver.scm
+++ b/build-aux/test-driver.scm
@@ -18,8 +18,8 @@
;;; <http://www.gnu.org/licenses/>.
(use-modules (ice-9 getopt-long)
- (srfi srfi-26)
- (srfi srfi-64))
+ (srfi srfi-26)
+ (srfi srfi-64))
;; Currently, only log-file and trs-file are understood. Everything
;; else is ignored.
@@ -35,11 +35,11 @@
(let ((runner (test-runner-simple)))
(test-runner-on-test-end! runner
(lambda (runner)
- (format trs-port ":test-result: ~A ~A~%"
- (string-upcase
- (symbol->string
- (test-result-kind runner)))
- (test-runner-test-name runner))))
+ (format trs-port ":test-result: ~A ~A~%"
+ (string-upcase
+ (symbol->string
+ (test-result-kind runner)))
+ (test-runner-test-name runner))))
runner))
@@ -48,4 +48,4 @@
(call-with-output-file (option-ref opts 'trs-file #f)
(lambda (trs-port)
(test-with-runner (my-gnu-runner trs-port)
- (load-from-path (option-ref opts 'test-name #f))))))
+ (load-from-path (option-ref opts 'test-name #f))))))