diff options
author | Gabor Greif <ggreif@gmail.com> | 2016-12-21 11:17:48 +0100 |
---|---|---|
committer | Gabor Greif <ggreif@gmail.com> | 2016-12-21 11:50:43 +0100 |
commit | 9a29b65bda8aed4c5fdbff25866ddf2dd1583210 (patch) | |
tree | fbe88f3156578af4c0b8109443038a3d70c595d6 /testsuite/driver/runtests.py | |
parent | 574abb7173d85ee527161cbe36fc0f9535372f0f (diff) | |
download | haskell-9a29b65bda8aed4c5fdbff25866ddf2dd1583210.tar.gz |
Suppress duplicate .T files
As per http://stackoverflow.com/questions/7961363/removing-duplicates-in-lists
use the set() function to zap duplicates from the obtained list of .T files.
I am using
$ python3 --version
Python 3.5.1
and strangely findTFiles() returns some .T files twice:
-- BEFORE
Found 376 .T files...
...
====> Scanning ../../libraries/array/tests/all.T
====> Scanning ../../libraries/array/tests/all.T
*** framework failure for T2120(duplicate) There are multiple tests with this name
*** framework failure for largeArray(duplicate) There are multiple tests with this name
*** framework failure for array001(duplicate) There are multiple tests with this name
*** framework failure for T9220(duplicate) There are multiple tests with this name
*** framework failure for T229(duplicate) There are multiple tests with this name
...
-- AFTER
Found 365 .T files...
...
====> Scanning ../../libraries/array/tests/all.T
...
Even more strangely 'find' begs to differ:
$ find libraries testsuite/tests -name "*.T" | sort | uniq | wc -l
368
Diffstat (limited to 'testsuite/driver/runtests.py')
-rw-r--r-- | testsuite/driver/runtests.py | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/testsuite/driver/runtests.py b/testsuite/driver/runtests.py index 28b393a0f9..a30763cc04 100644 --- a/testsuite/driver/runtests.py +++ b/testsuite/driver/runtests.py @@ -255,7 +255,7 @@ print('Timeout is ' + str(config.timeout)) if config.rootdirs == []: config.rootdirs = ['.'] -t_files = list(findTFiles(config.rootdirs)) +t_files = set(findTFiles(config.rootdirs)) print('Found', len(t_files), '.T files...') |