summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthew Pickering <matthewtpickering@gmail.com>2022-01-18 11:03:38 +0000
committerMarge Bot <ben+marge-bot@smart-cactus.org>2022-02-03 14:44:17 -0500
commitcae1fb1732deef1b8269de96a88ef053148bb4d8 (patch)
tree611976e4cfa709af821338c98b5433090cdf25f0
parentb0e1ef4a31899b0b20adcf0473f0814c2479e1e6 (diff)
downloadhaskell-cae1fb1732deef1b8269de96a88ef053148bb4d8.tar.gz
Frontend01 passes with static GHC
-rw-r--r--testsuite/tests/plugins/all.T3
-rw-r--r--testsuite/tests/th/T20791.hs7
-rw-r--r--testsuite/tests/th/all.T1
3 files changed, 1 insertions, 10 deletions
diff --git a/testsuite/tests/plugins/all.T b/testsuite/tests/plugins/all.T
index 928bc494eb..a194f9d923 100644
--- a/testsuite/tests/plugins/all.T
+++ b/testsuite/tests/plugins/all.T
@@ -119,8 +119,7 @@ test('T10294a',
makefile_test, [])
test('frontend01', [extra_files(['FrontendPlugin.hs']),
- only_ways([config.ghc_plugin_way]),
- unless(have_dynamic(), expect_broken(10301))],
+ only_ways([config.ghc_plugin_way]) ],
makefile_test, [])
test('T11244',
diff --git a/testsuite/tests/th/T20791.hs b/testsuite/tests/th/T20791.hs
deleted file mode 100644
index 450079e413..0000000000
--- a/testsuite/tests/th/T20791.hs
+++ /dev/null
@@ -1,7 +0,0 @@
-{-# LANGUAGE TemplateHaskell #-}
-module T20791 where
-
-import Control.Monad.IO.Class
-
-main = $(liftIO $ (print ()) >> [| print () |])
-
diff --git a/testsuite/tests/th/all.T b/testsuite/tests/th/all.T
index 6ed8ff95ef..1e9ece046a 100644
--- a/testsuite/tests/th/all.T
+++ b/testsuite/tests/th/all.T
@@ -543,4 +543,3 @@ test('T17820e', normal, compile_fail, [''])
test('T20590', normal, compile, ['-v0 -ddump-splices -dsuppress-uniques'])
test('T20773', only_ways(['ghci']), ghci_script, ['T20773.script'])
test('T20884', normal, compile_fail, [''])
-test('T20791', [ unless(ghc_dynamic(), expect_broken(20791)) ], compile, [''])