diff options
| author | Simon Peyton Jones <simonpj@microsoft.com> | 2018-05-01 12:16:28 +0100 |
|---|---|---|
| committer | Simon Peyton Jones <simonpj@microsoft.com> | 2018-05-01 13:18:40 +0100 |
| commit | d4cc74f1a5d1aafc8a2fde3c80019e2ef88d146b (patch) | |
| tree | 4deb03b4b415b41c16d798b9dd836ccb946fa7bd /testsuite/tests/profiling | |
| parent | 07cc6039dccff82790bf1d84a81e26df234ad899 (diff) | |
| download | haskell-d4cc74f1a5d1aafc8a2fde3c80019e2ef88d146b.tar.gz | |
Preserve join-point arity in CoreOpt
Trac #15108 showed that the simple optimiser in CoreOpt
was accidentally eta-reducing a join point, so it didn't meet
its arity invariant.
This patch fixes it. See Note [Preserve join-binding arity].
Diffstat (limited to 'testsuite/tests/profiling')
| -rw-r--r-- | testsuite/tests/profiling/should_compile/all.T | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/testsuite/tests/profiling/should_compile/all.T b/testsuite/tests/profiling/should_compile/all.T index 7d51a9c51e..999fa538fd 100644 --- a/testsuite/tests/profiling/should_compile/all.T +++ b/testsuite/tests/profiling/should_compile/all.T @@ -7,4 +7,4 @@ test('T2410', [only_ways(['normal']), req_profiling], compile, ['-O2 -prof -fpro test('T5889', [only_ways(['normal']), req_profiling, extra_files(['T5889/A.hs', 'T5889/B.hs'])], multimod_compile, ['A B', '-O -prof -fno-prof-count-entries -v0']) test('T12790', [only_ways(['normal']), req_profiling], compile, ['-O -prof']) test('T14931', [only_ways(['normal']), req_profiling], run_command, ['$MAKE -s --no-print-directory T14931']) -test('T15108', [only_ways(['normal']), req_profiling, expect_broken(15108)], compile, ['-O -prof -fprof-auto']) +test('T15108', [only_ways(['normal']), req_profiling], compile, ['-O -prof -fprof-auto']) |