summaryrefslogtreecommitdiff
path: root/testsuite/tests/ghci
diff options
context:
space:
mode:
authorMatthew Pickering <matthewtpickering@gmail.com>2021-08-23 13:30:44 +0100
committerMarge Bot <ben+marge-bot@smart-cactus.org>2021-12-03 10:12:04 -0500
commit81082cf410fdcdbf10627f5334cc1dba1a9a2e06 (patch)
tree49bb8038aab46f97ea2414ffc60652800614d4c2 /testsuite/tests/ghci
parent0e274c39bf836d5bb846f5fa08649c75f85326ac (diff)
downloadhaskell-81082cf410fdcdbf10627f5334cc1dba1a9a2e06.tar.gz
Revert "Data.List specialization to []"
This reverts commit bddecda1a4c96da21e3f5211743ce5e4c78793a2. This implements the first step in the plan formulated in #20025 to improve the communication and migration strategy for the proposed changes to Data.List. Requires changing the haddock submodule to update the test output.
Diffstat (limited to 'testsuite/tests/ghci')
-rw-r--r--testsuite/tests/ghci/scripts/T10663.script4
-rw-r--r--testsuite/tests/ghci/scripts/T14828.stdout2
-rw-r--r--testsuite/tests/ghci/scripts/T20473a.script2
-rw-r--r--testsuite/tests/ghci/scripts/T20473b.script2
-rw-r--r--testsuite/tests/ghci/scripts/ghci008.stdout4
5 files changed, 7 insertions, 7 deletions
diff --git a/testsuite/tests/ghci/scripts/T10663.script b/testsuite/tests/ghci/scripts/T10663.script
index 406d0ca7ee..30f003050b 100644
--- a/testsuite/tests/ghci/scripts/T10663.script
+++ b/testsuite/tests/ghci/scripts/T10663.script
@@ -1,2 +1,2 @@
-import Data.List; xs = sort [2, 1]
-xs \ No newline at end of file
+import Data.List (sort); xs = sort [2, 1]
+xs
diff --git a/testsuite/tests/ghci/scripts/T14828.stdout b/testsuite/tests/ghci/scripts/T14828.stdout
index aeab49d226..90ba8f3c13 100644
--- a/testsuite/tests/ghci/scripts/T14828.stdout
+++ b/testsuite/tests/ghci/scripts/T14828.stdout
@@ -8,5 +8,5 @@ pure :: Applicative f => a -> f a
pure = (_t4::Applicative f => a -> f a)
mempty = (_t5::Monoid a => a)
mappend = (_t6::Monoid a => a -> a -> a)
-foldl' = (_t7::(b -> a -> b) -> b -> [a] -> b)
+foldl' = (_t7::Foldable t => (b -> a -> b) -> b -> t a -> b)
f = (_t8::(forall a. a -> a) -> b -> b)
diff --git a/testsuite/tests/ghci/scripts/T20473a.script b/testsuite/tests/ghci/scripts/T20473a.script
index d84edb4129..73e2355564 100644
--- a/testsuite/tests/ghci/scripts/T20473a.script
+++ b/testsuite/tests/ghci/scripts/T20473a.script
@@ -1,5 +1,5 @@
:{
-import Data.List
+import Data.List (sort)
xs :: [Int]
xs = sort [2,1]
diff --git a/testsuite/tests/ghci/scripts/T20473b.script b/testsuite/tests/ghci/scripts/T20473b.script
index 4fb53badf3..e43ac8b6f7 100644
--- a/testsuite/tests/ghci/scripts/T20473b.script
+++ b/testsuite/tests/ghci/scripts/T20473b.script
@@ -1,2 +1,2 @@
-import Data.List; import Data.Function
+import Data.List (sort); import Data.Function
on (==) sort [1,2] [2,1]
diff --git a/testsuite/tests/ghci/scripts/ghci008.stdout b/testsuite/tests/ghci/scripts/ghci008.stdout
index 812dffc36a..3f62f3f7f2 100644
--- a/testsuite/tests/ghci/scripts/ghci008.stdout
+++ b/testsuite/tests/ghci/scripts/ghci008.stdout
@@ -40,5 +40,5 @@ class (RealFrac a, Floating a) => RealFloat a where
-- Defined in ‘GHC.Float’
instance RealFloat Float -- Defined in ‘GHC.Float’
instance RealFloat Double -- Defined in ‘GHC.Float’
-Data.List.isPrefixOf :: Eq a => [a] -> [a] -> Bool
- -- Defined in ‘Data.List’
+base-4.13.0.0:Data.OldList.isPrefixOf :: Eq a => [a] -> [a] -> Bool
+ -- Defined in ‘base-4.13.0.0:Data.OldList’