From 346210b1b2130112dd5f894c1d40afb37c1c51a5 Mon Sep 17 00:00:00 2001 From: Maxim Cournoyer Date: Sat, 16 Jan 2021 22:32:20 -0500 Subject: build: test-driver.scm: Enable colored test results by default. The Automake parallel test harness does its own smart detection of the terminal color capability and always provides the --color-tests argument to the driver. This change defaults the --color-tests argument to true when the test driver is run on its own (not via Automake). * build-aux/test-driver.scm (main): Set the default value of the --color-tests argument to true when it's not explicitly provided. --- build-aux/test-driver.scm | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'build-aux') diff --git a/build-aux/test-driver.scm b/build-aux/test-driver.scm index eee3f1e08c..fe7e9c8807 100644 --- a/build-aux/test-driver.scm +++ b/build-aux/test-driver.scm @@ -163,14 +163,17 @@ void port, which means no TRS output is logged." (let ((log (and=> (option 'log-file #f) (cut open-file <> "w0"))) (trs (and=> (option 'trs-file #f) (cut open-file <> "wl"))) (out (duplicate-port (current-output-port) "wl")) - (test-name (option 'test-name #f))) + (test-name (option 'test-name #f)) + (color-tests (if (assoc 'color-tests opts) + (option->boolean opts 'color-tests) + #t))) (when log (redirect-port log (current-output-port)) (redirect-port log (current-warning-port)) (redirect-port log (current-error-port))) (test-with-runner (test-runner-gnu test-name - #:color? (option->boolean opts 'color-tests) + #:color? color-tests #:brief? (option->boolean opts 'brief) #:out-port out #:trs-port trs) (load-from-path test-name)) -- cgit v1.2.3