diff options
author | Sylvain Henry <sylvain@haskus.fr> | 2020-04-22 17:04:53 +0200 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2020-05-05 03:23:31 -0400 |
commit | 7bc3a65b467c4286377b9bded277d5a2f69160b3 (patch) | |
tree | 1e5ec8bf7f03ef4c6622798d3701d686373a7b06 /testsuite/tests/simplCore/should_compile | |
parent | 1d8f80cd64edd1ea6a5d4c4aa2e09ad0d077ae1b (diff) | |
download | haskell-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.hs | 5 | ||||
-rw-r--r-- | testsuite/tests/simplCore/should_compile/T7944.hs | 6 |
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 |