summaryrefslogtreecommitdiff
path: root/testsuite/tests/simplCore/should_compile
diff options
context:
space:
mode:
authorSylvain Henry <sylvain@haskus.fr>2020-04-22 17:04:53 +0200
committerMarge Bot <ben+marge-bot@smart-cactus.org>2020-05-05 03:23:31 -0400
commit7bc3a65b467c4286377b9bded277d5a2f69160b3 (patch)
tree1e5ec8bf7f03ef4c6622798d3701d686373a7b06 /testsuite/tests/simplCore/should_compile
parent1d8f80cd64edd1ea6a5d4c4aa2e09ad0d077ae1b (diff)
downloadhaskell-7bc3a65b467c4286377b9bded277d5a2f69160b3.tar.gz
Remove SpecConstrAnnotation (#13681)
This has been deprecated since 2013. Use GHC.Types.SPEC instead. Make GHC.Exts "not-home" for haddock Metric Decrease: haddock.base
Diffstat (limited to 'testsuite/tests/simplCore/should_compile')
-rw-r--r--testsuite/tests/simplCore/should_compile/T5550.hs5
-rw-r--r--testsuite/tests/simplCore/should_compile/T7944.hs6
2 files changed, 2 insertions, 9 deletions
diff --git a/testsuite/tests/simplCore/should_compile/T5550.hs b/testsuite/tests/simplCore/should_compile/T5550.hs
index 025da505f3..25788c09e3 100644
--- a/testsuite/tests/simplCore/should_compile/T5550.hs
+++ b/testsuite/tests/simplCore/should_compile/T5550.hs
@@ -1,9 +1,6 @@
module T5550 where
-import GHC.Exts ( SpecConstrAnnotation(..) )
-
-data SPEC = SPEC | SPEC2
-{-# ANN type SPEC ForceSpecConstr #-}
+import GHC.Types
loop :: SPEC -> [Int] -> [Int] -> [Int]
loop SPEC z [] = z
diff --git a/testsuite/tests/simplCore/should_compile/T7944.hs b/testsuite/tests/simplCore/should_compile/T7944.hs
index bb62427e0a..7f9acbf0c7 100644
--- a/testsuite/tests/simplCore/should_compile/T7944.hs
+++ b/testsuite/tests/simplCore/should_compile/T7944.hs
@@ -1,10 +1,6 @@
module T7944 where
-import GHC.Exts
-
--- Force specialisation of "go"
-data SPEC = SPEC | SPEC2
-{-# ANN type SPEC ForceSpecConstr #-}
+import GHC.Types
-- This is more or less just an ordinary fold
go :: SPEC -> [a] -> IntMap a -> IntMap a