diff options
author | Joachim Breitner <mail@joachim-breitner.de> | 2021-03-10 15:28:48 -0500 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2021-03-10 16:58:50 -0500 |
commit | 115cd3c85a8c38f1fe2a10d4ee515f92c96dd5a2 (patch) | |
tree | 19214707fa15f127d05ae515c74cff7e85776a7c /testsuite/tests/simplCore | |
parent | 30ccf9ed1f592531dac9f3d750278fac6303c3e4 (diff) | |
download | haskell-115cd3c85a8c38f1fe2a10d4ee515f92c96dd5a2.tar.gz |
Use GHC2021 as default language
Diffstat (limited to 'testsuite/tests/simplCore')
10 files changed, 13 insertions, 4 deletions
diff --git a/testsuite/tests/simplCore/should_compile/T14270a.hs b/testsuite/tests/simplCore/should_compile/T14270a.hs index b69de35eec..1cf422f709 100644 --- a/testsuite/tests/simplCore/should_compile/T14270a.hs +++ b/testsuite/tests/simplCore/should_compile/T14270a.hs @@ -1,3 +1,4 @@ +{-# LANGUAGE Haskell2010 #-} {-# LANGUAGE TypeApplications, ScopedTypeVariables, GADTs, RankNTypes, PolyKinds, KindSignatures #-} {-# OPTIONS_GHC -O2 #-} -- We are provoking a bug in GHC.Core.Opt.SpecConstr diff --git a/testsuite/tests/simplCore/should_compile/T16038/A.hs b/testsuite/tests/simplCore/should_compile/T16038/A.hs index 3e5137bf94..5bff464334 100644 --- a/testsuite/tests/simplCore/should_compile/T16038/A.hs +++ b/testsuite/tests/simplCore/should_compile/T16038/A.hs @@ -1,3 +1,4 @@ +{-# LANGUAGE Haskell2010 #-} module A where import B diff --git a/testsuite/tests/simplCore/should_compile/T16038/A.hs-boot b/testsuite/tests/simplCore/should_compile/T16038/A.hs-boot index 48f6768e39..bad91fcdd0 100644 --- a/testsuite/tests/simplCore/should_compile/T16038/A.hs-boot +++ b/testsuite/tests/simplCore/should_compile/T16038/A.hs-boot @@ -1,3 +1,4 @@ +{-# LANGUAGE Haskell2010 #-} module A where data HsExpr i diff --git a/testsuite/tests/simplCore/should_compile/T16038/B.hs b/testsuite/tests/simplCore/should_compile/T16038/B.hs index 9eb315a419..98ab2d7ee6 100644 --- a/testsuite/tests/simplCore/should_compile/T16038/B.hs +++ b/testsuite/tests/simplCore/should_compile/T16038/B.hs @@ -1,3 +1,4 @@ +{-# LANGUAGE Haskell2010 #-} module B where import {-# SOURCE #-} A (HsExpr) diff --git a/testsuite/tests/simplCore/should_compile/T16979b.hs b/testsuite/tests/simplCore/should_compile/T16979b.hs index d2b5712674..92c6d28a07 100644 --- a/testsuite/tests/simplCore/should_compile/T16979b.hs +++ b/testsuite/tests/simplCore/should_compile/T16979b.hs @@ -1,3 +1,4 @@ +{-# LANGUAGE Haskell2010 #-} {-# LANGUAGE AllowAmbiguousTypes #-} {-# LANGUAGE DataKinds #-} {-# LANGUAGE DeriveGeneric #-} diff --git a/testsuite/tests/simplCore/should_compile/T5329.hs b/testsuite/tests/simplCore/should_compile/T5329.hs index f681103578..3c14ee8132 100644 --- a/testsuite/tests/simplCore/should_compile/T5329.hs +++ b/testsuite/tests/simplCore/should_compile/T5329.hs @@ -1,3 +1,4 @@ +{-# LANGUAGE Haskell2010 #-} {-# OPTIONS_GHC -fno-warn-redundant-constraints #-} {-# LANGUAGE UnicodeSyntax #-} {-# LANGUAGE EmptyDataDecls #-} diff --git a/testsuite/tests/simplCore/should_compile/T8331.stderr b/testsuite/tests/simplCore/should_compile/T8331.stderr index 1c51037481..0fbd7a577c 100644 --- a/testsuite/tests/simplCore/should_compile/T8331.stderr +++ b/testsuite/tests/simplCore/should_compile/T8331.stderr @@ -7,7 +7,7 @@ = (useAbstractMonad1 @s) `cast` (<Int>_R %<'Many>_N ->_R <Int>_R %<'Many>_N ->_R Sym (N:ST[0] <s>_N <Int>_R) - ; Sym (N:ReaderT[0] <Int>_R <ST s>_R <Int>_N) + ; Sym (N:ReaderT[0] <*>_N <Int>_R <ST s>_R <Int>_N) :: Coercible (Int -> Int -> STRep s Int) (Int -> ReaderT Int (ST s) Int)) diff --git a/testsuite/tests/simplCore/should_compile/rule2.hs b/testsuite/tests/simplCore/should_compile/rule2.hs index 2b091de5e9..97b50b92d9 100644 --- a/testsuite/tests/simplCore/should_compile/rule2.hs +++ b/testsuite/tests/simplCore/should_compile/rule2.hs @@ -1,3 +1,4 @@ +{-# LANGUAGE Haskell2010 #-} {-# LANGUAGE RankNTypes #-} {-# OPTIONS_GHC -ddump-simpl-stats #-} diff --git a/testsuite/tests/simplCore/should_run/T5315.hs b/testsuite/tests/simplCore/should_run/T5315.hs index 5b2ff39346..6af1fa2332 100644 --- a/testsuite/tests/simplCore/should_run/T5315.hs +++ b/testsuite/tests/simplCore/should_run/T5315.hs @@ -1,3 +1,4 @@ +{-# LANGUAGE Haskell2010 #-} {-# LANGUAGE UnicodeSyntax #-} {-# LANGUAGE EmptyDataDecls #-} {-# LANGUAGE TypeOperators #-} diff --git a/testsuite/tests/simplCore/should_run/runST.hs b/testsuite/tests/simplCore/should_run/runST.hs index dc06c243cf..0357778ce2 100644 --- a/testsuite/tests/simplCore/should_run/runST.hs +++ b/testsuite/tests/simplCore/should_run/runST.hs @@ -1,3 +1,4 @@ +{-# LANGUAGE Haskell2010 #-} import Control.Monad.ST import Data.STRef @@ -7,7 +8,7 @@ import Data.STRef main = let f () = runST $ do - ref <- newSTRef 0 - modifySTRef ref (+1) - readSTRef ref + ref <- newSTRef 0 + modifySTRef ref (+1) + readSTRef ref in print (f () + f ()) |