summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthew Pickering <matthewtpickering@gmail.com>2021-04-07 10:26:08 +0100
committerMatthew Pickering <matthewtpickering@gmail.com>2021-04-07 10:26:08 +0100
commit28291a58f67427fafeea6a70b0139619bf8148fd (patch)
tree5ee9b35fe3f9415d8910882fdaa94233695910c0
parented75d219b1685ae5e585e2dfa407f61ce8bd872c (diff)
downloadhaskell-wip/jsaddle-leaks.tar.gz
T11545 now also passes due to modifications in demand analysiswip/jsaddle-leaks
Fixes #11545
-rw-r--r--testsuite/tests/perf/compiler/T11545.hs2
-rw-r--r--testsuite/tests/perf/compiler/all.T2
2 files changed, 2 insertions, 2 deletions
diff --git a/testsuite/tests/perf/compiler/T11545.hs b/testsuite/tests/perf/compiler/T11545.hs
index d35e21c2e8..d139de70f4 100644
--- a/testsuite/tests/perf/compiler/T11545.hs
+++ b/testsuite/tests/perf/compiler/T11545.hs
@@ -1,6 +1,6 @@
module T11545 where
-data A = A A A A A A A A A A A A A A A A A A A A A A A A A A A A A A A A A deriving (Eq)
+data A = A A A A A A A A A A A A A A A A A A A A A A A A A A A A A A A A A A A A A A A A A A deriving (Eq)
data QuadTree a = QuadTree !Int [a] (QuadTree a) (QuadTree a) (QuadTree a) (QuadTree a)
diff --git a/testsuite/tests/perf/compiler/all.T b/testsuite/tests/perf/compiler/all.T
index b09c418698..651c9a2128 100644
--- a/testsuite/tests/perf/compiler/all.T
+++ b/testsuite/tests/perf/compiler/all.T
@@ -454,5 +454,5 @@ test ('T9198',
[''])
test('T11545',
- [ expect_broken(11545) ],
+ [ normal ],
compile, ['-O +RTS -M50M -RTS'])