summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthew Pickering <matthewtpickering@gmail.com>2021-04-07 10:26:08 +0100
committerMarge Bot <ben+marge-bot@smart-cactus.org>2021-04-08 08:07:11 -0400
commite0d861d4f9848428b15435e1b8718090179073af (patch)
tree5e5d3150a0e887d68a222b37fbd5d639e7b47208
parent42d88003b0815f4e975fd80e34422000c3100c6c (diff)
downloadhaskell-e0d861d4f9848428b15435e1b8718090179073af.tar.gz
T11545 now also passes due to modifications in demand analysis
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'])