diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2017-03-24 12:27:35 -0400 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2017-03-26 18:09:52 -0400 |
| commit | aecbfb908a11991eb23b790a440efe4697ffb86a (patch) | |
| tree | 7ebf84893a2ae60fa123184d05d3064ba7b48de5 /testsuite | |
| parent | 94ec48f8a25d5a381a5d42016baa0333c186a442 (diff) | |
| download | haskell-aecbfb908a11991eb23b790a440efe4697ffb86a.tar.gz | |
testsuite: Allow join007 to pass on 32-bit machines
The output of the test overflows. Given that the result is stable
regardless of whether it overflows, I just made the expected output
word-size dependent.
Diffstat (limited to 'testsuite')
| -rw-r--r-- | testsuite/tests/perf/join_points/join007.hs | 2 | ||||
| -rw-r--r-- | testsuite/tests/perf/join_points/join007.stdout-ws-32 | 1 | ||||
| -rw-r--r-- | testsuite/tests/perf/join_points/join007.stdout-ws-64 (renamed from testsuite/tests/perf/join_points/join007.stdout) | 0 |
3 files changed, 3 insertions, 0 deletions
diff --git a/testsuite/tests/perf/join_points/join007.hs b/testsuite/tests/perf/join_points/join007.hs index aa2f68c0bc..59cc99b6e1 100644 --- a/testsuite/tests/perf/join_points/join007.hs +++ b/testsuite/tests/perf/join_points/join007.hs @@ -39,4 +39,6 @@ enumFromToS lo hi = Stream next lo test :: Int -> Int -> Int test lo hi = sumS (filterS even (enumFromToS lo hi)) +-- Note that this overflows on 32-bit machines and therefore we have two stdout +-- files main = print $ test 1 10000000 diff --git a/testsuite/tests/perf/join_points/join007.stdout-ws-32 b/testsuite/tests/perf/join_points/join007.stdout-ws-32 new file mode 100644 index 0000000000..d4692e3b98 --- /dev/null +++ b/testsuite/tests/perf/join_points/join007.stdout-ws-32 @@ -0,0 +1 @@ +-999630016 diff --git a/testsuite/tests/perf/join_points/join007.stdout b/testsuite/tests/perf/join_points/join007.stdout-ws-64 index 0a7ad1072c..0a7ad1072c 100644 --- a/testsuite/tests/perf/join_points/join007.stdout +++ b/testsuite/tests/perf/join_points/join007.stdout-ws-64 |