tests: Use sequential test runner if only one test is given.
authorJustus Winter <justus@g10code.com>
Mon, 19 Dec 2016 16:23:56 +0000 (17:23 +0100)
committerJustus Winter <justus@g10code.com>
Mon, 19 Dec 2016 16:23:56 +0000 (17:23 +0100)
* tests/openpgp/run-tests.scm: Use sequential test runner if only one
test is given.
--

This allows one to set the environment variable TESTFLAGS to
'--parallel' and enjoy faster test execution times without interfering
with stdio when one works on a single test.

Signed-off-by: Justus Winter <justus@g10code.com>
tests/openpgp/run-tests.scm

index 4146411..546d7d4 100644 (file)
 ;; Set objdir so that the tests can locate built programs.
 (setenv "objdir" (getcwd) #f)
 
-(let* ((runner (if (member "--parallel" *args*)
+(let* ((tests (filter (lambda (arg) (not (string-prefix? arg "--"))) *args*))
+       (runner (if (and (member "--parallel" *args*)
+                       (> (length tests) 1))
                   run-tests-parallel
-                  run-tests-sequential))
-       (tests (filter (lambda (arg) (not (string-prefix? arg "--"))) *args*)))
+                  run-tests-sequential)))
   (runner (test::scm "setup.scm" "setup.scm")
          (map (lambda (t) (test::scm t t)) tests)))