diff options
| author | Joachim Breitner <mail@joachim-breitner.de> | 2014-07-22 10:37:56 +0200 |
|---|---|---|
| committer | Joachim Breitner <mail@joachim-breitner.de> | 2014-07-22 10:37:56 +0200 |
| commit | 1c126cfb4a9067d4ac5987d9371f6920328f6f29 (patch) | |
| tree | 5492f65fe27a1c48443263d7b945fa297c0cfa0a /testsuite/tests/perf/should_run/all.T | |
| parent | 7aabfa6292c2469cf3250e006869273fb1b356ce (diff) | |
| download | haskell-wip/T9339.tar.gz | |
Make last a good consumerwip/T9339
simply by implementing it as foldl. This fixes #9339. Thanks to David
Feuer for bringing it up.
Diffstat (limited to 'testsuite/tests/perf/should_run/all.T')
| -rw-r--r-- | testsuite/tests/perf/should_run/all.T | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/testsuite/tests/perf/should_run/all.T b/testsuite/tests/perf/should_run/all.T index a9d7c0325d..924f7f15b8 100644 --- a/testsuite/tests/perf/should_run/all.T +++ b/testsuite/tests/perf/should_run/all.T @@ -379,3 +379,12 @@ test('T9203', only_ways(['normal'])], compile_and_run, ['-O2']) + +test('T9339', + [stats_num_field('bytes allocated', + [ (wordsize(64), 80050760, 5) ]), + # w/o fusing last: 320005080 + # 2014-07-22: 80050760 + only_ways(['normal'])], + compile_and_run, + ['-O2']) |