summaryrefslogtreecommitdiff
path: root/testsuite/tests/ghc-regress/haddock
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/ghc-regress/haddock')
-rw-r--r--testsuite/tests/ghc-regress/haddock/Makefile3
-rw-r--r--testsuite/tests/ghc-regress/haddock/haddock_examples/Hidden.hs4
-rw-r--r--testsuite/tests/ghc-regress/haddock/haddock_examples/Makefile3
-rw-r--r--testsuite/tests/ghc-regress/haddock/haddock_examples/Test.hs407
-rw-r--r--testsuite/tests/ghc-regress/haddock/haddock_examples/Visible.hs3
-rw-r--r--testsuite/tests/ghc-regress/haddock/haddock_examples/haddock.Test.stderr159
-rw-r--r--testsuite/tests/ghc-regress/haddock/haddock_examples/header.h5
-rw-r--r--testsuite/tests/ghc-regress/haddock/haddock_examples/test.T6
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/Makefile3
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/all.T33
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA001.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA001.stderr7
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA002.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA002.stderr7
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA003.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA003.stderr7
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA004.hs8
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA004.stderr7
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA005.hs4
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA005.stderr7
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA006.hs6
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA006.stderr6
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA007.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA007.stderr7
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA008.hs7
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA008.stderr7
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA009.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA009.stderr7
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA010.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA010.stderr7
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA011.hs8
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA011.stderr7
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA012.hs11
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA012.stderr11
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA013.hs13
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA013.stderr13
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA014.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA014.stderr8
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA015.hs14
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA015.stderr14
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA016.hs4
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA016.stderr6
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA017.hs2
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA017.stderr5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA018.hs4
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA018.stderr6
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA019.hs7
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA019.stderr7
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA020.hs15
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA020.stderr8
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA021.hs25
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA021.stderr11
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA022.hs11
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA022.stderr9
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA023.hs6
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA023.stderr10
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA024.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA024.stderr7
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA025.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA025.stderr7
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA026.hs6
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA026.stderr10
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA027.hs7
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA027.stderr11
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA028.hs6
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA028.stderr8
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA029.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA029.stderr6
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA030.hs10
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA030.stderr6
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA031.hs6
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA031.stderr9
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA032.hs8
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA032.stderr10
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA033.hs11
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA033.stderr11
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/Makefile3
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/all.T4
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/haddockB001.hs3
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/haddockB002.hs3
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/haddockB003.hs2
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/haddockB004.hs17
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/Makefile3
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/all.T33
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC001.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC002.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC003.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC004.hs8
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC005.hs4
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC006.hs6
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC007.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC008.hs7
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC009.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC010.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC011.hs8
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC012.hs11
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC013.hs14
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC014.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC015.hs14
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC016.hs4
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC017.hs2
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC018.hs4
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC019.hs7
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC020.hs15
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC021.hs25
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC022.hs11
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC023.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC024.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC025.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC026.hs6
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC027.hs21
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC028.hs6
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC029.hs5
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC030.hs10
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC031.hs6
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC032.hs8
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockSimplUtilsBug.hs44
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockSimplUtilsBug.stderr0
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/Makefile3
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/all.T4
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/haddockD001.hs3
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/haddockD002.hs3
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/haddockD003.hs2
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/haddockD004.hs17
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/Makefile3
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/all.T4
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE001.comp.stderr0
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE001.hs2
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE001.stderr2
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE002.hs6
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE002.stderr2
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE003.hs9
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE003.stderr2
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE004.hs3
-rw-r--r--testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE004.stderr2
135 files changed, 0 insertions, 1575 deletions
diff --git a/testsuite/tests/ghc-regress/haddock/Makefile b/testsuite/tests/ghc-regress/haddock/Makefile
deleted file mode 100644
index 9101fbd40a..0000000000
--- a/testsuite/tests/ghc-regress/haddock/Makefile
+++ /dev/null
@@ -1,3 +0,0 @@
-TOP=../../..
-include $(TOP)/mk/boilerplate.mk
-include $(TOP)/mk/test.mk
diff --git a/testsuite/tests/ghc-regress/haddock/haddock_examples/Hidden.hs b/testsuite/tests/ghc-regress/haddock/haddock_examples/Hidden.hs
deleted file mode 100644
index d30925b10e..0000000000
--- a/testsuite/tests/ghc-regress/haddock/haddock_examples/Hidden.hs
+++ /dev/null
@@ -1,4 +0,0 @@
--- #hide
-module Hidden where
-hidden :: Int -> Int
-hidden a = a
diff --git a/testsuite/tests/ghc-regress/haddock/haddock_examples/Makefile b/testsuite/tests/ghc-regress/haddock/haddock_examples/Makefile
deleted file mode 100644
index 1c39d1c1fe..0000000000
--- a/testsuite/tests/ghc-regress/haddock/haddock_examples/Makefile
+++ /dev/null
@@ -1,3 +0,0 @@
-TOP=../../../..
-include $(TOP)/mk/boilerplate.mk
-include $(TOP)/mk/test.mk
diff --git a/testsuite/tests/ghc-regress/haddock/haddock_examples/Test.hs b/testsuite/tests/ghc-regress/haddock/haddock_examples/Test.hs
deleted file mode 100644
index 8336cb543d..0000000000
--- a/testsuite/tests/ghc-regress/haddock/haddock_examples/Test.hs
+++ /dev/null
@@ -1,407 +0,0 @@
------------------------------------------------------------------------------
--- |
--- Module : Test
--- Copyright : (c) Simon Marlow 2002
--- License : BSD-style
---
--- Maintainer : libraries@haskell.org
--- Stability : provisional
--- Portability : portable
---
--- This module illustrates & tests most of the features of Haddock.
--- Testing references from the description: 'T', 'f', 'g', 'Visible.visible'.
---
------------------------------------------------------------------------------
-
--- This is plain comment, ignored by Haddock.
-
-module Test (
-
- -- Section headings are introduced with '-- *':
- -- * Type declarations
-
- -- Subsection headings are introduced with '-- **' and so on.
- -- ** Data types
- T(..), T2, T3(..), T4(..), T5(..), T6(..),
- N1(..), N2(..), N3(..), N4, N5(..), N6(..), N7(..),
-
- -- ** Records
- R(..), R1(..),
-
- -- | test that we can export record selectors on their own:
- p, q, u,
-
- -- * Class declarations
- C(a,b), D(..), E, F(..),
-
- -- | Test that we can export a class method on its own:
- a,
-
- -- * Function types
- f, g,
-
- -- * Auxiliary stuff
-
- -- $aux1
-
- -- $aux2
-
- -- $aux3
-
- -- $aux4
-
- -- $aux5
-
- -- $aux6
-
- -- $aux7
-
- -- $aux8
-
- -- $aux9
-
- -- $aux10
-
- -- $aux11
-
- -- $aux12
-
- -- | This is some inline documentation in the export list
- --
- -- > a code block using bird-tracks
- -- > each line must begin with > (which isn't significant unless it
- -- > is at the beginning of the line).
-
- -- * A hidden module
- module Hidden,
-
- -- * A visible module
- module Visible,
-
- {-| nested-style doc comments -}
-
- -- * Existential \/ Universal types
- Ex(..),
-
- -- * Type signatures with argument docs
- k, l, m, o,
-
- -- * A section
- -- and without an intervening comma:
- -- ** A subsection
-
-{-|
- > a literal line
-
- $ a non /literal/ line $
--}
-
- f',
- ) where
-
-import Hidden
-import Visible
-
--- | This comment applies to the /following/ declaration
--- and it continues until the next non-comment line
-data T a b
- = A Int (Maybe Float) -- ^ This comment describes the 'A' constructor
- | -- | This comment describes the 'B' constructor
- B (T a b, T Int Float) -- ^
-
--- | An abstract data declaration
-data T2 a b = T2 a b
-
--- | A data declaration with no documentation annotations on the constructors
-data T3 a b = A1 a | B1 b
-
--- A data declaration with no documentation annotations at all
-data T4 a b = A2 a | B2 b
-
--- A data declaration documentation on the constructors only
-data T5 a b
- = A3 a -- ^ documents 'A3'
- | B3 b -- ^ documents 'B3'
-
--- | Testing alternative comment styles
-data T6
- -- | This is the doc for 'A4'
- = A4
- | B4
- | -- ^ This is the doc for 'B4'
-
- -- | This is the doc for 'C4'
- C4
-
--- | A newtype
-newtype N1 a = N1 a
-
--- | A newtype with a fieldname
-newtype N2 a b = N2 {n :: a b}
-
--- | A newtype with a fieldname, documentation on the field
-newtype N3 a b = N3 {n3 :: a b -- ^ this is the 'n3' field
- }
-
--- | An abstract newtype - we show this one as data rather than newtype because
--- the difference isn\'t visible to the programmer for an abstract type.
-newtype N4 a b = N4 a
-
-newtype N5 a b = N5 {n5 :: a b -- ^ no docs on the datatype or the constructor
- }
-
-newtype N6 a b = N6 {n6 :: a b
- }
- -- ^ docs on the constructor only
-
--- | docs on the newtype and the constructor
-newtype N7 a b = N7 {n7 :: a b
- }
- -- ^ The 'N7' constructor
-
-
-class (D a) => C a where
- -- |this is a description of the 'a' method
- a :: IO a
- b :: [a]
- -- ^ this is a description of the 'b' method
- c :: a -- c is hidden in the export list
-
--- ^ This comment applies to the /previous/ declaration (the 'C' class)
-
-class D a where
- d :: T a b
- e :: (a,a)
--- ^ This is a class declaration with no separate docs for the methods
-
-instance D Int where
- d = undefined
- e = undefined
-
--- instance with a qualified class name
-instance Test.D Float where
- d = undefined
- e = undefined
-
-class E a where
- ee :: a
--- ^ This is a class declaration with no methods (or no methods exported)
-
--- This is a class declaration with no documentation at all
-class F a where
- ff :: a
-
--- | This is the documentation for the 'R' record, which has four fields,
--- 'p', 'q', 'r', and 's'.
-data R =
- -- | This is the 'C1' record constructor, with the following fields:
- C1 { p :: Int -- ^ This comment applies to the 'p' field
- , q :: forall a . a->a -- ^ This comment applies to the 'q' field
- , -- | This comment applies to both 'r' and 's'
- r,s :: Int
- }
- | C2 { t :: T1 -> (T2 Int Int)-> (T3 Bool Bool) -> (T4 Float Float) -> T5 () (),
- u,v :: Int
- }
- -- ^ This is the 'C2' record constructor, also with some fields:
-
--- | Testing different record commenting styles
-data R1
- -- | This is the 'C3' record constructor
- = C3 {
- -- | The 's1' record selector
- s1 :: Int
- -- | The 's2' record selector
- , s2 :: Int
- , s3 :: Int -- NOTE: In the original examples/Test.hs in Haddock, there is an extra "," here.
- -- Since GHC doesn't allow that, I have removed it in this file.
- -- ^ The 's3' record selector
- }
-
--- These section headers are only used when there is no export list to
--- give the structure of the documentation:
-
--- * This is a section header (level 1)
--- ** This is a section header (level 2)
--- *** This is a section header (level 3)
-
-{-|
-In a comment string we can refer to identifiers in scope with
-single quotes like this: 'T', and we can refer to modules by
-using double quotes: "Foo". We can add emphasis /like this/.
-
- * This is a bulleted list
-
- - This is the next item (different kind of bullet)
-
- (1) This is an ordered list
-
- 2. This is the next item (different kind of bullet)
-
-@
- This is a block of code, which can include other markup: 'R'
- formatting
- is
- significant
-@
-
-> this is another block of code
-
-We can also include URLs in documentation: <http://www.haskell.org/>.
--}
-
-f :: C a => a -> Int
-
--- | we can export foreign declarations too
-foreign import ccall "header.h" g :: Int -> IO CInt
-
--- | this doc string has a parse error in it: \'
-h :: Int
-h = 42
-
-
--- $aux1 This is some documentation that is attached to a name ($aux1)
--- rather than a source declaration. The documentation may be
--- referred to in the export list using its name.
---
--- @ code block in named doc @
-
--- $aux2 This is some documentation that is attached to a name ($aux2)
-
--- $aux3
--- @ code block on its own in named doc @
-
--- $aux4
---
--- @ code block on its own in named doc (after newline) @
-
-{- $aux5 a nested, named doc comment
-
- with a paragraph,
-
- @ and a code block @
--}
-
--- some tests for various arrangements of code blocks:
-
-{- $aux6
->test
->test1
-
-@ test2
- test3
-@
--}
-
-{- $aux7
-@
-test1
-test2
-@
--}
-
-{- $aux8
->test3
->test4
--}
-
-{- $aux9
-@
-test1
-test2
-@
-
->test3
->test4
--}
-
-{- $aux10
->test3
->test4
-
-@
-test1
-test2
-@
--}
-
--- This one is currently wrong (Haddock 0.4). The @...@ part is
--- interpreted as part of the bird-tracked code block.
-{- $aux11
-aux11:
-
->test3
->test4
-
-@
-test1
-test2
-@
--}
-
--- $aux12
--- > foo
---
--- > bar
---
-
--- | A data-type using existential\/universal types
-data Ex a
- = forall b . C b => Ex1 b
- | forall b . Ex2 b
- | forall b . C a => Ex3 b -- NOTE: I have added "forall b" here make GHC accept this file
- | Ex4 (forall a . a -> a)
-
--- | This is a function with documentation for each argument
-k :: T () () -- ^ This argument has type 'T'
- -> (T2 Int Int) -- ^ This argument has type 'T2 Int Int'
- -> (T3 Bool Bool -> T4 Float Float) -- ^ This argument has type @T3 Bool Bool -> T4 Float Float@
- -> T5 () () -- ^ This argument has a very long description that should
- -- hopefully cause some wrapping to happen when it is finally
- -- rendered by Haddock in the generated HTML page.
- -> IO () -- ^ This is the result type
-
--- This function has arg docs but no docs for the function itself
-l :: (Int, Int, Float) -- ^ takes a triple
- -> Int -- ^ returns an 'Int'
-
--- | This function has some arg docs
-m :: R
- -> N1 () -- ^ one of the arguments
- -> IO Int -- ^ and the return value
-
--- | This function has some arg docs but not a return value doc
-
--- can't use the original name ('n') with GHC
-newn :: R -- ^ one of the arguments, an 'R'
- -> N1 () -- ^ one of the arguments
- -> IO Int
-newn = undefined
-
-
--- | A foreign import with argument docs
-foreign import ccall unsafe "header.h"
- o :: Float -- ^ The input float
- -> IO Float -- ^ The output float
-
--- | We should be able to escape this: \#\#\#
-
--- p :: Int
--- can't use the above original definition with GHC
-newp :: Int
-newp = undefined
-
--- | a function with a prime can be referred to as 'f''
--- but f' doesn't get link'd 'f\''
-f' :: Int
-
-
--- Add some definitions here so that this file can be compiled with GHC
-
-data T1
-f = undefined
-f' = undefined
-type CInt = Int
-k = undefined
-l = undefined
-m = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/haddock_examples/Visible.hs b/testsuite/tests/ghc-regress/haddock/haddock_examples/Visible.hs
deleted file mode 100644
index cad719315f..0000000000
--- a/testsuite/tests/ghc-regress/haddock/haddock_examples/Visible.hs
+++ /dev/null
@@ -1,3 +0,0 @@
-module Visible where
-visible :: Int -> Int
-visible a = a
diff --git a/testsuite/tests/ghc-regress/haddock/haddock_examples/haddock.Test.stderr b/testsuite/tests/ghc-regress/haddock/haddock_examples/haddock.Test.stderr
deleted file mode 100644
index ddc289f161..0000000000
--- a/testsuite/tests/ghc-regress/haddock/haddock_examples/haddock.Test.stderr
+++ /dev/null
@@ -1,159 +0,0 @@
-[1 of 3] Compiling Visible ( Visible.hs, Visible.o )
-
-==================== Parser ====================
-module Visible where
-visible :: Int -> Int
-visible a = a
-
-
-[2 of 3] Compiling Hidden ( Hidden.hs, Hidden.o )
-
-==================== Parser ====================
-module Hidden where
-hidden :: Int -> Int
-hidden a = a
-
-
-[3 of 3] Compiling Test ( Test.hs, Test.o )
-
-==================== Parser ====================
-<document comment>
-module Test (
- <IEGroup: 1>, <IEGroup: 2>, T(..), T2, T3(..), T4(..), T5(..),
- T6(..), N1(..), N2(..), N3(..), N4, N5(..), N6(..), N7(..),
- <IEGroup: 2>, R(..), R1(..), <document comment>, p, q, u,
- <IEGroup: 1>, C(a, b), D(..), E, F(..), <document comment>, a,
- <IEGroup: 1>, f, g, <IEGroup: 1>, <IEDocNamed: aux1>,
- <IEDocNamed: aux2>, <IEDocNamed: aux3>, <IEDocNamed: aux4>,
- <IEDocNamed: aux5>, <IEDocNamed: aux6>, <IEDocNamed: aux7>,
- <IEDocNamed: aux8>, <IEDocNamed: aux9>, <IEDocNamed: aux10>,
- <IEDocNamed: aux11>, <IEDocNamed: aux12>, <document comment>,
- <IEGroup: 1>, module Hidden, <IEGroup: 1>, module Visible,
- <document comment>, <IEGroup: 1>, Ex(..), <IEGroup: 1>, k, l, m, o,
- <IEGroup: 1>, <IEGroup: 2>, <document comment>, f'
- ) where
-import Hidden
-import Visible
-<document comment>
-data T a b
- = <document comment> A Int Maybe Float |
- <document comment> B (T a b, T Int Float)
-<document comment>
-data T2 a b = T2 a b
-<document comment>
-data T3 a b = A1 a | B1 b
-data T4 a b = A2 a | B2 b
-data T5 a b = <document comment> A3 a | <document comment> B3 b
-<document comment>
-data T6
- = <document comment> A4 |
- <document comment> B4 |
- <document comment> C4
-<document comment>
-newtype N1 a = N1 a
-<document comment>
-newtype N2 a b = N2 {n :: a b}
-<document comment>
-newtype N3 a b = N3 {n3 :: a b <document comment>}
-<document comment>
-newtype N4 a b = N4 a
-newtype N5 a b = N5 {n5 :: a b <document comment>}
-newtype N6 a b = <document comment> N6 {n6 :: a b}
-<document comment>
-newtype N7 a b = <document comment> N7 {n7 :: a b}
-class D a => C a where { a :: IO a; b :: [a]; c :: a; }
-<document comment>
-class D a where { d :: T a b; e :: (a, a); }
-<document comment>
-instance D Int where
- { d = undefined
- e = undefined }
-instance Test.D Float where
- { d = undefined
- e = undefined }
-class E a where { ee :: a; }
-<document comment>
-class F a where { ff :: a; }
-<document comment>
-data R
- = <document comment>
- C1 {p :: Int <document comment>,
- q :: forall a. a -> a <document comment>,
- r :: Int <document comment>,
- s :: Int <document comment>} |
- <document comment>
- C2 {t :: T1
- -> (T2 Int Int) -> (T3 Bool Bool) -> (T4 Float Float) -> T5 () (),
- u :: Int,
- v :: Int}
-<document comment>
-data R1
- = <document comment>
- C3 {s1 :: Int <document comment>,
- s2 :: Int <document comment>,
- s3 :: Int <document comment>}
-<document comment>
-<document comment>
-<document comment>
-<document comment>
-f :: C a => a -> Int
-<document comment>
-foreign import ccall safe "static header.h g" g :: Int -> IO CInt
-<document comment>
-h :: Int
-h = 42
-<document comment>
-<document comment>
-<document comment>
-<document comment>
-<document comment>
-<document comment>
-<document comment>
-<document comment>
-<document comment>
-<document comment>
-<document comment>
-<document comment>
-<document comment>
-data Ex a
- = forall b. C b => Ex1 b |
- forall b. Ex2 b |
- forall b. C a => Ex3 b |
- Ex4 forall a. a -> a
-<document comment>
-k ::
- T () () <document comment>
- -> (T2 Int Int) <document comment>
- -> (T3 Bool Bool -> T4 Float Float) <document comment>
- -> T5 () () <document comment> -> IO () <document comment>
-l :: (Int, Int, Float) <document comment> -> Int <document comment>
-<document comment>
-m :: R -> N1 () <document comment> -> IO Int <document comment>
-<document comment>
-newn :: R <document comment> -> N1 () <document comment> -> IO Int
-newn = undefined
-<document comment>
-foreign import ccall unsafe "static header.h o" o
- :: Float <document comment> -> IO Float <document comment>
-<document comment>
-newp :: Int
-newp = undefined
-<document comment>
-f' :: Int
-data T1 =
-f = undefined
-f' = undefined
-type CInt = Int
-k = undefined
-l = undefined
-m = undefined
-
-
-
-Test.hs:32:9: Warning: `p' is exported by `p' and `R(..)'
-
-Test.hs:32:12: Warning: `q' is exported by `q' and `R(..)'
-
-Test.hs:32:15: Warning: `u' is exported by `u' and `R(..)'
-
-Test.hs:38:9: Warning: `a' is exported by `a' and `C(a, b)'
diff --git a/testsuite/tests/ghc-regress/haddock/haddock_examples/header.h b/testsuite/tests/ghc-regress/haddock/haddock_examples/header.h
deleted file mode 100644
index 0125eb3bfd..0000000000
--- a/testsuite/tests/ghc-regress/haddock/haddock_examples/header.h
+++ /dev/null
@@ -1,5 +0,0 @@
-
-/* These are used in Test.hs */
-extern int g(HsInt x);
-extern HsFloat o(HsFloat x);
-
diff --git a/testsuite/tests/ghc-regress/haddock/haddock_examples/test.T b/testsuite/tests/ghc-regress/haddock/haddock_examples/test.T
deleted file mode 100644
index 856bf73bfd..0000000000
--- a/testsuite/tests/ghc-regress/haddock/haddock_examples/test.T
+++ /dev/null
@@ -1,6 +0,0 @@
-test('haddock.Test',
- [omit_ways(['optasm', 'profasm']),
- extra_clean(['Test.hi', 'Test.o', 'Hidden.hi', 'Hidden.o',
- 'Visible.hi', 'Visible.o'])],
- multimod_compile,
- ['Test Hidden Visible', '-XRank2Types -XExistentialQuantification -haddock -ddump-parsed'])
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/Makefile b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/Makefile
deleted file mode 100644
index 1c39d1c1fe..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/Makefile
+++ /dev/null
@@ -1,3 +0,0 @@
-TOP=../../../..
-include $(TOP)/mk/boilerplate.mk
-include $(TOP)/mk/test.mk
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/all.T b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/all.T
deleted file mode 100644
index ed77310fd5..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/all.T
+++ /dev/null
@@ -1,33 +0,0 @@
-test('haddockA001', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA002', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA003', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA004', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA005', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA006', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA007', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA008', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA009', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA010', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA011', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA012', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA013', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA014', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA015', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA016', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA017', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA018', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA019', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA020', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA021', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA022', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA023', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA024', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA025', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA026', normal, compile, ['-haddock -ddump-parsed -XRank2Types'])
-test('haddockA027', normal, compile, ['-haddock -ddump-parsed -XRank2Types'])
-test('haddockA028', normal, compile, ['-haddock -ddump-parsed -XTypeOperators'])
-test('haddockA029', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA030', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA031', normal, compile, ['-haddock -ddump-parsed -XExistentialQuantification'])
-test('haddockA032', normal, compile, ['-haddock -ddump-parsed'])
-test('haddockA033', normal, compile, ['-haddock -ddump-parsed'])
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA001.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA001.hs
deleted file mode 100644
index 8710c20eee..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA001.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-
-module ShouldCompile where
-
-{- | blabla -}
-data Bla = Hej
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA001.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA001.stderr
deleted file mode 100644
index 679876f821..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA001.stderr
+++ /dev/null
@@ -1,7 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-<document comment>
-data Bla = Hej
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA002.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA002.hs
deleted file mode 100644
index e6ab145eb5..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA002.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-
-module ShouldCompile where
-
-{- | blabla -}
-main = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA002.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA002.stderr
deleted file mode 100644
index 8ad5a91566..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA002.stderr
+++ /dev/null
@@ -1,7 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-<document comment>
-main = undefined
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA003.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA003.hs
deleted file mode 100644
index 54af6d73b4..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA003.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-
-module ShouldCompile where
-
--- | blabla
-main = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA003.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA003.stderr
deleted file mode 100644
index 8ad5a91566..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA003.stderr
+++ /dev/null
@@ -1,7 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-<document comment>
-main = undefined
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA004.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA004.hs
deleted file mode 100644
index 4311798859..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA004.hs
+++ /dev/null
@@ -1,8 +0,0 @@
-
-module ShouldCompile where
-
--- | blabla öqewjlaskjfdasklöjfaslökj
--- aslfdjaskldaskldasjda
--- xxxxxx
--- end of the comment
-main = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA004.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA004.stderr
deleted file mode 100644
index 8ad5a91566..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA004.stderr
+++ /dev/null
@@ -1,7 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-<document comment>
-main = undefined
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA005.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA005.hs
deleted file mode 100644
index 4c854505ca..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA005.hs
+++ /dev/null
@@ -1,4 +0,0 @@
-hej = undefined
-
--- | 1l3i1j3 as
-main = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA005.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA005.stderr
deleted file mode 100644
index 8fced3ae43..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA005.stderr
+++ /dev/null
@@ -1,7 +0,0 @@
-
-==================== Parser ====================
-hej = undefined
-<document comment>
-main = undefined
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA006.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA006.hs
deleted file mode 100644
index 518c598b38..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA006.hs
+++ /dev/null
@@ -1,6 +0,0 @@
-{-^ wealwwwwwwwwwwww
-
-
--}
-main = return ()
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA006.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA006.stderr
deleted file mode 100644
index 43971dfd1d..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA006.stderr
+++ /dev/null
@@ -1,6 +0,0 @@
-
-==================== Parser ====================
-<document comment>
-main = return ()
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA007.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA007.hs
deleted file mode 100644
index c6098072bf..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA007.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-
-module ShouldCompile where
-
-{- |asd-}
-main=undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA007.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA007.stderr
deleted file mode 100644
index 8ad5a91566..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA007.stderr
+++ /dev/null
@@ -1,7 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-<document comment>
-main = undefined
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA008.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA008.hs
deleted file mode 100644
index ca17e8de4b..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA008.hs
+++ /dev/null
@@ -1,7 +0,0 @@
-
-module ShouldCompile where
-
-{-|
-main=undefined
--}
-main = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA008.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA008.stderr
deleted file mode 100644
index 8ad5a91566..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA008.stderr
+++ /dev/null
@@ -1,7 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-<document comment>
-main = undefined
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA009.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA009.hs
deleted file mode 100644
index 67ef8ff570..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA009.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-
-module ShouldCompile where
-
-{-$ aslkdjasasd asdkjasdlaj {-weqw -}-}
-main = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA009.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA009.stderr
deleted file mode 100644
index 8ad5a91566..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA009.stderr
+++ /dev/null
@@ -1,7 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-<document comment>
-main = undefined
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA010.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA010.hs
deleted file mode 100644
index 943b28e485..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA010.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-
-module ShouldCompile where
-
-{-| weoprjwer {- | qwoiejqwioe -}-}
-main = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA010.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA010.stderr
deleted file mode 100644
index 8ad5a91566..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA010.stderr
+++ /dev/null
@@ -1,7 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-<document comment>
-main = undefined
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA011.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA011.hs
deleted file mode 100644
index 5efa2db249..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA011.hs
+++ /dev/null
@@ -1,8 +0,0 @@
-
-module ShouldCompile where
-
--- aslkdjasldkjasldkaj
--- | awlkdajsads
--- asdasödlklas
---qww
-main=undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA011.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA011.stderr
deleted file mode 100644
index 8ad5a91566..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA011.stderr
+++ /dev/null
@@ -1,7 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-<document comment>
-main = undefined
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA012.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA012.hs
deleted file mode 100644
index c392d85211..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA012.hs
+++ /dev/null
@@ -1,11 +0,0 @@
-
-main=undefined
-
--- | vkfja
-hej=main
--- | ieasdkjahsdkjashd
-x = hej
-
-
--- | eroiewuroieuwr
-y = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA012.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA012.stderr
deleted file mode 100644
index 56736ccbca..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA012.stderr
+++ /dev/null
@@ -1,11 +0,0 @@
-
-==================== Parser ====================
-main = undefined
-<document comment>
-hej = main
-<document comment>
-x = hej
-<document comment>
-y = undefined
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA013.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA013.hs
deleted file mode 100644
index 224e38d360..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA013.hs
+++ /dev/null
@@ -1,13 +0,0 @@
-module ShouldCompile where
-
--- ^ bla
-main=undefined
-
--- ^ vkfja
-hej=main
--- ^ ieasdkjahsdkjashd
-x = hej
-
-
--- ^ eroiewuroieuwr
-y = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA013.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA013.stderr
deleted file mode 100644
index ea9837b3c8..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA013.stderr
+++ /dev/null
@@ -1,13 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-<document comment>
-main = undefined
-<document comment>
-hej = main
-<document comment>
-x = hej
-<document comment>
-y = undefined
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA014.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA014.hs
deleted file mode 100644
index 880264f60b..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA014.hs
+++ /dev/null
@@ -1,5 +0,0 @@
--- | a header
-module HeaderTest where
-
--- | bla bla
-x = 0
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA014.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA014.stderr
deleted file mode 100644
index f71f89a89e..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA014.stderr
+++ /dev/null
@@ -1,8 +0,0 @@
-
-==================== Parser ====================
-<document comment>
-module HeaderTest where
-<document comment>
-x = 0
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA015.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA015.hs
deleted file mode 100644
index b4b47be108..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA015.hs
+++ /dev/null
@@ -1,14 +0,0 @@
--- | a header
-module HeaderTest where
-
--- * A section
-x = 0
-
--- ** A subsection
-y = 1
-
--- *** A subsubsection
-main = print x
-
--- | bla bla
-z = 0
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA015.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA015.stderr
deleted file mode 100644
index 356d5b73bf..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA015.stderr
+++ /dev/null
@@ -1,14 +0,0 @@
-
-==================== Parser ====================
-<document comment>
-module HeaderTest where
-<document comment>
-x = 0
-<document comment>
-y = 1
-<document comment>
-main = print x
-<document comment>
-z = 0
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA016.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA016.hs
deleted file mode 100644
index ffe02923ea..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA016.hs
+++ /dev/null
@@ -1,4 +0,0 @@
--- #hide, prune, ignore-exports
-
--- |Module description
-module A where
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA016.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA016.stderr
deleted file mode 100644
index 1f436a7bec..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA016.stderr
+++ /dev/null
@@ -1,6 +0,0 @@
-
-==================== Parser ====================
-<document comment>
-module A where
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA017.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA017.hs
deleted file mode 100644
index 75d859a1c7..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA017.hs
+++ /dev/null
@@ -1,2 +0,0 @@
--- #hide, prune, ignore-exports
-module A where
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA017.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA017.stderr
deleted file mode 100644
index 3fd476b166..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA017.stderr
+++ /dev/null
@@ -1,5 +0,0 @@
-
-==================== Parser ====================
-module A where
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA018.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA018.hs
deleted file mode 100644
index c8b6f52d42..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA018.hs
+++ /dev/null
@@ -1,4 +0,0 @@
--- | module header bla bla
-
--- #hide, prune, ignore-exports
-module A where
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA018.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA018.stderr
deleted file mode 100644
index 1f436a7bec..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA018.stderr
+++ /dev/null
@@ -1,6 +0,0 @@
-
-==================== Parser ====================
-<document comment>
-module A where
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA019.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA019.hs
deleted file mode 100644
index 7e5e98be8d..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA019.hs
+++ /dev/null
@@ -1,7 +0,0 @@
-module A (
-
--- | bla bla
-
-{- | blabla -}
-
-) where
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA019.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA019.stderr
deleted file mode 100644
index 68e7b4f225..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA019.stderr
+++ /dev/null
@@ -1,7 +0,0 @@
-
-==================== Parser ====================
-module A (
- <document comment>, <document comment>
- ) where
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA020.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA020.hs
deleted file mode 100644
index 31b38da179..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA020.hs
+++ /dev/null
@@ -1,15 +0,0 @@
-module A (
-
--- | bla bla
-
-{- | blabla -}
-
-x,
-
--- ** qeöqwkeöwqlkeqöle
-
--- | qweljqwelkqjwelqjkq
-
-) where
-
-x = True
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA020.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA020.stderr
deleted file mode 100644
index 20c628006d..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA020.stderr
+++ /dev/null
@@ -1,8 +0,0 @@
-
-==================== Parser ====================
-module A (
- <document comment>, <document comment>, x, <IEGroup: 2>, <document comment>
- ) where
-x = True
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA021.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA021.hs
deleted file mode 100644
index ac12f30d6b..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA021.hs
+++ /dev/null
@@ -1,25 +0,0 @@
-module A (
-
--- | bla bla
-
-{- | blabla -}
-
-x,
-
--- ** qeöqwkeöwqlkeqöle
-
--- | qweljqwelkqjwelqjkq
-
-y,
-
-
--- | dkashdakj
-z
-
--- * asdjha
-
-) where
-
-x = True
-y = False
-z = True
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA021.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA021.stderr
deleted file mode 100644
index edf523dfa2..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA021.stderr
+++ /dev/null
@@ -1,11 +0,0 @@
-
-==================== Parser ====================
-module A (
- <document comment>, <document comment>, x, <IEGroup: 2>, <document comment>, y,
- <document comment>, z, <IEGroup: 1>
- ) where
-x = True
-y = False
-z = True
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA022.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA022.hs
deleted file mode 100644
index dcd90750e0..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA022.hs
+++ /dev/null
@@ -1,11 +0,0 @@
-
-main = print (test::Int)
- where
- -- | kjfhaskd
- test = 0
- -- | xzczn
- -- qwelkjqwelkqj
- test2 = 1
-
- -- | adlkjadajdldjad
- test3 = 2
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA022.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA022.stderr
deleted file mode 100644
index 6e6c5c6730..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA022.stderr
+++ /dev/null
@@ -1,9 +0,0 @@
-
-==================== Parser ====================
-main = print (test :: Int)
- where
- test = 0
- test2 = 1
- test3 = 2
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA023.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA023.hs
deleted file mode 100644
index e197a6b48f..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA023.hs
+++ /dev/null
@@ -1,6 +0,0 @@
-module ShouldCompile where
-
-test :: (Eq a) => [a] -- ^ doc1
- -> [a] {-^ doc2 -}
- -> [a] -- ^ doc3
-test xs ys = xs
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA023.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA023.stderr
deleted file mode 100644
index 2c4f5bc952..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA023.stderr
+++ /dev/null
@@ -1,10 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-test ::
- Eq a =>
- [a] <document comment>
- -> [a] <document comment> -> [a] <document comment>
-test xs ys = xs
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA024.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA024.hs
deleted file mode 100644
index 9e069c322c..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA024.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-module ShouldCompile where
-
-test2 :: a -- ^ doc1
- -> b {-^ doc2 -} -> a -- ^ doc 3
-test2 x y = x
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA024.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA024.stderr
deleted file mode 100644
index f0d269d0b1..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA024.stderr
+++ /dev/null
@@ -1,7 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-test2 :: a <document comment> -> b <document comment> -> a <document comment>
-test2 x y = x
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA025.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA025.hs
deleted file mode 100644
index c53ae7bb3e..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA025.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-module ShouldCompile where
-
-test2 :: a -- ^ doc1
- -> a
-test2 x = x
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA025.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA025.stderr
deleted file mode 100644
index 792da55155..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA025.stderr
+++ /dev/null
@@ -1,7 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-test2 :: a <document comment> -> a
-test2 x = x
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA026.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA026.hs
deleted file mode 100644
index cc2d8bfae5..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA026.hs
+++ /dev/null
@@ -1,6 +0,0 @@
-module ShouldCompile where
-
-test :: (Eq a) => [a] -- ^ doc1
- -> forall b . [b] {-^ doc2 -}
- -> [a] -- ^ doc3
-test xs ys = xs
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA026.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA026.stderr
deleted file mode 100644
index e352980fd4..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA026.stderr
+++ /dev/null
@@ -1,10 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-test ::
- Eq a =>
- [a] <document comment>
- -> forall b. [b] <document comment> -> [a] <document comment>
-test xs ys = xs
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA027.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA027.hs
deleted file mode 100644
index 1aa6e37d07..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA027.hs
+++ /dev/null
@@ -1,7 +0,0 @@
-module ShouldCompile where
-
-test :: [a] -- ^ doc1
- -> forall b. (Ord b) => [b] {-^ doc2 -}
- -> forall c. (Num c) => [c] -- ^ doc3
- -> [a]
-test xs ys zs = xs
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA027.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA027.stderr
deleted file mode 100644
index 67bf6528c0..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA027.stderr
+++ /dev/null
@@ -1,11 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-test ::
- [a] <document comment>
- -> forall b. Ord b =>
- [b] <document comment>
- -> forall c. Num c => [c] <document comment> -> [a]
-test xs ys zs = xs
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA028.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA028.hs
deleted file mode 100644
index 2f4b7c1bcb..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA028.hs
+++ /dev/null
@@ -1,6 +0,0 @@
-module ShouldCompile where
-
-test :: [a] -- ^ doc1
- -> a <--> b
- -> [a] -- ^ blabla
-test xs ys = xs
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA028.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA028.stderr
deleted file mode 100644
index d74422461e..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA028.stderr
+++ /dev/null
@@ -1,8 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-test ::
- [a] <document comment> -> (a <--> (b -> [a])) <document comment>
-test xs ys = xs
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA029.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA029.hs
deleted file mode 100644
index 2615e555f1..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA029.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-module ShouldCompile where
-
-data A
- -- | A comment that documents the first constructor
- = A | B | C | D
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA029.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA029.stderr
deleted file mode 100644
index aa48d998ef..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA029.stderr
+++ /dev/null
@@ -1,6 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-data A = <document comment> A | B | C | D
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA030.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA030.hs
deleted file mode 100644
index 82c3799d1f..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA030.hs
+++ /dev/null
@@ -1,10 +0,0 @@
-module ShouldCompile where
-
-data A
- -- | A comment that documents the first constructor
- = A
- -- | comment for B
- | {-^ comment for A -} B
- -- | comment for C
- | C
- | D
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA030.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA030.stderr
deleted file mode 100644
index c879d2244b..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA030.stderr
+++ /dev/null
@@ -1,6 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-data A = <document comment> A | <document comment> B | <document comment> C | D
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA031.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA031.hs
deleted file mode 100644
index 2d4b55f659..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA031.hs
+++ /dev/null
@@ -1,6 +0,0 @@
-module ShouldCompile where
-
-data A
- = A
- | {-| comment for B -} forall a. B a a
- | forall a. Num a => C a {-^ comment for C -}
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA031.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA031.stderr
deleted file mode 100644
index 75ac2945b8..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA031.stderr
+++ /dev/null
@@ -1,9 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-data A
- = A |
- <document comment> forall a. B a a |
- <document comment> forall a. Num a => C a
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA032.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA032.hs
deleted file mode 100644
index b772ec1de3..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA032.hs
+++ /dev/null
@@ -1,8 +0,0 @@
-module ShouldCompile where
-
-data R a = R {
- field1 :: a -- | comment for field2
- , field2 :: a
- , field3 :: a -- ^ comment for field3
- , {-| comment for field4 -} field4 :: a
-}
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA032.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA032.stderr
deleted file mode 100644
index 2b0e4d24af..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA032.stderr
+++ /dev/null
@@ -1,10 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-data R a
- = R {field1 :: a,
- field2 :: a <document comment>,
- field3 :: a <document comment>,
- field4 :: a <document comment>}
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA033.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA033.hs
deleted file mode 100644
index 6d3db6cdc6..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA033.hs
+++ /dev/null
@@ -1,11 +0,0 @@
-module ShouldCompile where
-
--- | dlkjasldkja
-f 0 = 1
--- | falkajflksjfa
-f 1 = 2
--- | slkdjasldkj
-f 3 = 6
--- | asldfaslödjas
-
--- | blabla
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA033.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA033.stderr
deleted file mode 100644
index c1760c11fe..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_haddock/haddockA033.stderr
+++ /dev/null
@@ -1,11 +0,0 @@
-
-==================== Parser ====================
-module ShouldCompile where
-<document comment>
-f 0 = 1
-f 1 = 2
-f 3 = 6
-<document comment>
-<document comment>
-
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/Makefile b/testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/Makefile
deleted file mode 100644
index 1c39d1c1fe..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/Makefile
+++ /dev/null
@@ -1,3 +0,0 @@
-TOP=../../../..
-include $(TOP)/mk/boilerplate.mk
-include $(TOP)/mk/test.mk
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/all.T b/testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/all.T
deleted file mode 100644
index 500a7e6bd1..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/all.T
+++ /dev/null
@@ -1,4 +0,0 @@
-test('haddockB001', normal, compile, [''])
-test('haddockB002', normal, compile, [''])
-test('haddockB003', normal, compile, [''])
-test('haddockB004', normal, compile, [''])
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/haddockB001.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/haddockB001.hs
deleted file mode 100644
index 10998fdb1d..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/haddockB001.hs
+++ /dev/null
@@ -1,3 +0,0 @@
-
-{- xc,zxcz -}
-main = putStrLn "hej"
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/haddockB002.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/haddockB002.hs
deleted file mode 100644
index f698fa0520..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/haddockB002.hs
+++ /dev/null
@@ -1,3 +0,0 @@
-{-{--}-}
-
-main=return()
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/haddockB003.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/haddockB003.hs
deleted file mode 100644
index 7c3f733483..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/haddockB003.hs
+++ /dev/null
@@ -1,2 +0,0 @@
-----------------------------------------------------------
-main = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/haddockB004.hs b/testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/haddockB004.hs
deleted file mode 100644
index cc9e07e6b2..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_flag_nohaddock/haddockB004.hs
+++ /dev/null
@@ -1,17 +0,0 @@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
------------------------------------------------------------------------------
---
--- Module : Foreign
--- Copyright : (c) The FFI task force 2001
--- License : BSD-style (see the file libraries/base/LICENSE)
---
--- Maintainer : ffi@haskell.org
--- Stability : provisional
--- Portability : portable
---
--- A collection of data types, classes, and functions for interfacing
--- with another programming language.
---
------------------------------------------------------------------------------
-
-module Hej where
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/Makefile b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/Makefile
deleted file mode 100644
index 1c39d1c1fe..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/Makefile
+++ /dev/null
@@ -1,3 +0,0 @@
-TOP=../../../..
-include $(TOP)/mk/boilerplate.mk
-include $(TOP)/mk/test.mk
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/all.T b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/all.T
deleted file mode 100644
index dbc7d17d9a..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/all.T
+++ /dev/null
@@ -1,33 +0,0 @@
-test('haddockC001', normal, compile, [''])
-test('haddockC002', normal, compile, [''])
-test('haddockC003', normal, compile, [''])
-test('haddockC004', normal, compile, [''])
-test('haddockC005', normal, compile, [''])
-test('haddockC006', normal, compile, [''])
-test('haddockC007', normal, compile, [''])
-test('haddockC008', normal, compile, [''])
-test('haddockC009', normal, compile, [''])
-test('haddockC010', normal, compile, [''])
-test('haddockC011', normal, compile, [''])
-test('haddockC012', normal, compile, [''])
-test('haddockC013', normal, compile, [''])
-test('haddockC014', normal, compile, [''])
-test('haddockC015', normal, compile, [''])
-test('haddockC016', normal, compile, [''])
-test('haddockC017', normal, compile, [''])
-test('haddockC018', normal, compile, [''])
-test('haddockC019', normal, compile, [''])
-test('haddockC020', normal, compile, [''])
-test('haddockC021', normal, compile, [''])
-test('haddockC022', normal, compile, [''])
-test('haddockC023', normal, compile, [''])
-test('haddockC024', normal, compile, [''])
-test('haddockC025', normal, compile, [''])
-test('haddockC026', normal, compile, ['-XRank2Types'])
-test('haddockC027', normal, compile, ['-XRank2Types'])
-test('haddockC028', normal, compile, ['-XTypeOperators'])
-test('haddockC029', normal, compile, [''])
-test('haddockC030', normal, compile, [''])
-test('haddockC031', normal, compile, ['-XExistentialQuantification'])
-test('haddockC032', normal, compile, [''])
-test('haddockSimplUtilsBug', normal, compile, [''])
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC001.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC001.hs
deleted file mode 100644
index 8710c20eee..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC001.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-
-module ShouldCompile where
-
-{- | blabla -}
-data Bla = Hej
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC002.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC002.hs
deleted file mode 100644
index e6ab145eb5..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC002.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-
-module ShouldCompile where
-
-{- | blabla -}
-main = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC003.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC003.hs
deleted file mode 100644
index 54af6d73b4..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC003.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-
-module ShouldCompile where
-
--- | blabla
-main = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC004.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC004.hs
deleted file mode 100644
index 4311798859..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC004.hs
+++ /dev/null
@@ -1,8 +0,0 @@
-
-module ShouldCompile where
-
--- | blabla öqewjlaskjfdasklöjfaslökj
--- aslfdjaskldaskldasjda
--- xxxxxx
--- end of the comment
-main = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC005.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC005.hs
deleted file mode 100644
index 4c854505ca..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC005.hs
+++ /dev/null
@@ -1,4 +0,0 @@
-hej = undefined
-
--- | 1l3i1j3 as
-main = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC006.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC006.hs
deleted file mode 100644
index 518c598b38..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC006.hs
+++ /dev/null
@@ -1,6 +0,0 @@
-{-^ wealwwwwwwwwwwww
-
-
--}
-main = return ()
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC007.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC007.hs
deleted file mode 100644
index 94ce040c20..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC007.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-
-module ShouldCompiler where
-
-{- |asd-}
-main=undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC008.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC008.hs
deleted file mode 100644
index ca17e8de4b..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC008.hs
+++ /dev/null
@@ -1,7 +0,0 @@
-
-module ShouldCompile where
-
-{-|
-main=undefined
--}
-main = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC009.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC009.hs
deleted file mode 100644
index 67ef8ff570..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC009.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-
-module ShouldCompile where
-
-{-$ aslkdjasasd asdkjasdlaj {-weqw -}-}
-main = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC010.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC010.hs
deleted file mode 100644
index 943b28e485..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC010.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-
-module ShouldCompile where
-
-{-| weoprjwer {- | qwoiejqwioe -}-}
-main = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC011.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC011.hs
deleted file mode 100644
index c6146d2369..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC011.hs
+++ /dev/null
@@ -1,8 +0,0 @@
-
-module ShouldCompile where
-
--- aslkdjasldkjasldkaj
--- | awlkdajsads
----asdasödlklas
---------------- qww
-main=undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC012.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC012.hs
deleted file mode 100644
index c392d85211..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC012.hs
+++ /dev/null
@@ -1,11 +0,0 @@
-
-main=undefined
-
--- | vkfja
-hej=main
--- | ieasdkjahsdkjashd
-x = hej
-
-
--- | eroiewuroieuwr
-y = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC013.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC013.hs
deleted file mode 100644
index 82f2561f86..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC013.hs
+++ /dev/null
@@ -1,14 +0,0 @@
-
-module ShouldCompile where
-
--- ^ bla
-main=undefined
-
--- ^ vkfja
-hej=main
--- ^ ieasdkjahsdkjashd
-x = hej
-
-
--- ^ eroiewuroieuwr
-y = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC014.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC014.hs
deleted file mode 100644
index 880264f60b..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC014.hs
+++ /dev/null
@@ -1,5 +0,0 @@
--- | a header
-module HeaderTest where
-
--- | bla bla
-x = 0
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC015.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC015.hs
deleted file mode 100644
index b4b47be108..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC015.hs
+++ /dev/null
@@ -1,14 +0,0 @@
--- | a header
-module HeaderTest where
-
--- * A section
-x = 0
-
--- ** A subsection
-y = 1
-
--- *** A subsubsection
-main = print x
-
--- | bla bla
-z = 0
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC016.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC016.hs
deleted file mode 100644
index ffe02923ea..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC016.hs
+++ /dev/null
@@ -1,4 +0,0 @@
--- #hide, prune, ignore-exports
-
--- |Module description
-module A where
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC017.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC017.hs
deleted file mode 100644
index 75d859a1c7..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC017.hs
+++ /dev/null
@@ -1,2 +0,0 @@
--- #hide, prune, ignore-exports
-module A where
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC018.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC018.hs
deleted file mode 100644
index c8b6f52d42..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC018.hs
+++ /dev/null
@@ -1,4 +0,0 @@
--- | module header bla bla
-
--- #hide, prune, ignore-exports
-module A where
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC019.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC019.hs
deleted file mode 100644
index 7e5e98be8d..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC019.hs
+++ /dev/null
@@ -1,7 +0,0 @@
-module A (
-
--- | bla bla
-
-{- | blabla -}
-
-) where
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC020.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC020.hs
deleted file mode 100644
index 31b38da179..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC020.hs
+++ /dev/null
@@ -1,15 +0,0 @@
-module A (
-
--- | bla bla
-
-{- | blabla -}
-
-x,
-
--- ** qeöqwkeöwqlkeqöle
-
--- | qweljqwelkqjwelqjkq
-
-) where
-
-x = True
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC021.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC021.hs
deleted file mode 100644
index ac12f30d6b..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC021.hs
+++ /dev/null
@@ -1,25 +0,0 @@
-module A (
-
--- | bla bla
-
-{- | blabla -}
-
-x,
-
--- ** qeöqwkeöwqlkeqöle
-
--- | qweljqwelkqjwelqjkq
-
-y,
-
-
--- | dkashdakj
-z
-
--- * asdjha
-
-) where
-
-x = True
-y = False
-z = True
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC022.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC022.hs
deleted file mode 100644
index dcd90750e0..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC022.hs
+++ /dev/null
@@ -1,11 +0,0 @@
-
-main = print (test::Int)
- where
- -- | kjfhaskd
- test = 0
- -- | xzczn
- -- qwelkjqwelkqj
- test2 = 1
-
- -- | adlkjadajdldjad
- test3 = 2
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC023.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC023.hs
deleted file mode 100644
index 9e069c322c..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC023.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-module ShouldCompile where
-
-test2 :: a -- ^ doc1
- -> b {-^ doc2 -} -> a -- ^ doc 3
-test2 x y = x
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC024.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC024.hs
deleted file mode 100644
index 9e069c322c..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC024.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-module ShouldCompile where
-
-test2 :: a -- ^ doc1
- -> b {-^ doc2 -} -> a -- ^ doc 3
-test2 x y = x
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC025.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC025.hs
deleted file mode 100644
index c53ae7bb3e..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC025.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-module ShouldCompile where
-
-test2 :: a -- ^ doc1
- -> a
-test2 x = x
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC026.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC026.hs
deleted file mode 100644
index cc2d8bfae5..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC026.hs
+++ /dev/null
@@ -1,6 +0,0 @@
-module ShouldCompile where
-
-test :: (Eq a) => [a] -- ^ doc1
- -> forall b . [b] {-^ doc2 -}
- -> [a] -- ^ doc3
-test xs ys = xs
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC027.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC027.hs
deleted file mode 100644
index c22be2fb87..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC027.hs
+++ /dev/null
@@ -1,21 +0,0 @@
-module ShouldCompile where
-
--- I bet this test is a mistake! From the layout it
--- looks as if 'test' takes three args, the latter two
--- of higher rank. But the parens around these args are
--- missing, so it parses as
--- test :: [a]
--- -> forall a. Ord a
--- => [b]
--- -> forall c. Num c
--- => [c]
--- -> [a]
---
--- But maybe that what was intended; I'm not sure
--- Anyway it should typecheck!
-
-test :: [a] -- ^ doc1
- -> forall b. (Ord b) => [b] {-^ doc2 -}
- -> forall c. (Num c) => [c] -- ^ doc3
- -> [a]
-test xs ys zs = xs
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC028.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC028.hs
deleted file mode 100644
index 3f8abc19d3..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC028.hs
+++ /dev/null
@@ -1,6 +0,0 @@
-module ShouldCompile where
-
-test :: [a] -- ^ doc1
- -> a <--> b
- -> [a] -- ^ doc3
-test xs ys = xs
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC029.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC029.hs
deleted file mode 100644
index 2615e555f1..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC029.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-module ShouldCompile where
-
-data A
- -- | A comment that documents the first constructor
- = A | B | C | D
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC030.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC030.hs
deleted file mode 100644
index 82c3799d1f..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC030.hs
+++ /dev/null
@@ -1,10 +0,0 @@
-module ShouldCompile where
-
-data A
- -- | A comment that documents the first constructor
- = A
- -- | comment for B
- | {-^ comment for A -} B
- -- | comment for C
- | C
- | D
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC031.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC031.hs
deleted file mode 100644
index 2d4b55f659..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC031.hs
+++ /dev/null
@@ -1,6 +0,0 @@
-module ShouldCompile where
-
-data A
- = A
- | {-| comment for B -} forall a. B a a
- | forall a. Num a => C a {-^ comment for C -}
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC032.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC032.hs
deleted file mode 100644
index b772ec1de3..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockC032.hs
+++ /dev/null
@@ -1,8 +0,0 @@
-module ShouldCompile where
-
-data R a = R {
- field1 :: a -- | comment for field2
- , field2 :: a
- , field3 :: a -- ^ comment for field3
- , {-| comment for field4 -} field4 :: a
-}
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockSimplUtilsBug.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockSimplUtilsBug.hs
deleted file mode 100644
index a62020f508..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockSimplUtilsBug.hs
+++ /dev/null
@@ -1,44 +0,0 @@
-module ShouldCompile where
-
-postInlineUnconditionally
- = case Just "Hey" of
- -- The point of examining occ_info here is that for *non-values*
- -- that occur outside a lambda, the call-site inliner won't have
- -- a chance (becuase it doesn't know that the thing
- -- only occurs once). The pre-inliner won't have gotten
- -- it either, if the thing occurs in more than one branch
- -- So the main target is things like
- -- let x = f y in
- -- case v of
- -- True -> case x of ...
- -- False -> case x of ...
- -- I'm not sure how important this is in practice
- Just a -- OneOcc => no work-duplication issue
- -> True -- Small enough to dup
- -- ToDo: consider discount on smallEnoughToInline if int_cxt is true
- --
- -- NB: Do NOT inline arbitrarily big things, even if one_br is True
- -- Reason: doing so risks exponential behaviour. We simplify a big
- -- expression, inline it, and simplify it again. But if the
- -- very same thing happens in the big expression, we get
- -- exponential cost!
- -- PRINCIPLE: when we've already simplified an expression once,
- -- make sure that we only inline it if it's reasonably small.
-
- _ -> False
-
--- Here's an example that we don't handle well:
--- let f = if b then Left (\x.BIG) else Right (\y.BIG)
--- in \y. ....case f of {...} ....
--- Here f is used just once, and duplicating the case work is fine (exprIsCheap).
--- But
--- * We can't preInlineUnconditionally because that woud invalidate
--- the occ info for b.
--- * We can't postInlineUnconditionally because the RHS is big, and
--- that risks exponential behaviour
--- * We can't call-site inline, because the rhs is big
--- Alas!
-
- where
- x = id
-
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockSimplUtilsBug.stderr b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockSimplUtilsBug.stderr
deleted file mode 100644
index e69de29bb2..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_haddock/haddockSimplUtilsBug.stderr
+++ /dev/null
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/Makefile b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/Makefile
deleted file mode 100644
index 1c39d1c1fe..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/Makefile
+++ /dev/null
@@ -1,3 +0,0 @@
-TOP=../../../..
-include $(TOP)/mk/boilerplate.mk
-include $(TOP)/mk/test.mk
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/all.T b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/all.T
deleted file mode 100644
index 89c205b3ce..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/all.T
+++ /dev/null
@@ -1,4 +0,0 @@
-test('haddockD001', normal, compile, [''])
-test('haddockD002', normal, compile, [''])
-test('haddockD003', normal, compile, [''])
-test('haddockD004', normal, compile, [''])
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/haddockD001.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/haddockD001.hs
deleted file mode 100644
index 10998fdb1d..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/haddockD001.hs
+++ /dev/null
@@ -1,3 +0,0 @@
-
-{- xc,zxcz -}
-main = putStrLn "hej"
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/haddockD002.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/haddockD002.hs
deleted file mode 100644
index f698fa0520..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/haddockD002.hs
+++ /dev/null
@@ -1,3 +0,0 @@
-{-{--}-}
-
-main=return()
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/haddockD003.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/haddockD003.hs
deleted file mode 100644
index 7c3f733483..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/haddockD003.hs
+++ /dev/null
@@ -1,2 +0,0 @@
-----------------------------------------------------------
-main = undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/haddockD004.hs b/testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/haddockD004.hs
deleted file mode 100644
index cc9e07e6b2..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_compile_noflag_nohaddock/haddockD004.hs
+++ /dev/null
@@ -1,17 +0,0 @@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
------------------------------------------------------------------------------
---
--- Module : Foreign
--- Copyright : (c) The FFI task force 2001
--- License : BSD-style (see the file libraries/base/LICENSE)
---
--- Maintainer : ffi@haskell.org
--- Stability : provisional
--- Portability : portable
---
--- A collection of data types, classes, and functions for interfacing
--- with another programming language.
---
------------------------------------------------------------------------------
-
-module Hej where
diff --git a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/Makefile b/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/Makefile
deleted file mode 100644
index 1c39d1c1fe..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/Makefile
+++ /dev/null
@@ -1,3 +0,0 @@
-TOP=../../../..
-include $(TOP)/mk/boilerplate.mk
-include $(TOP)/mk/test.mk
diff --git a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/all.T b/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/all.T
deleted file mode 100644
index bbe4c6edf2..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/all.T
+++ /dev/null
@@ -1,4 +0,0 @@
-#test('haddockE001', normal, compile_fail, ['-haddock'])
-#test('haddockE002', normal, compile_fail, ['-haddock'])
-#test('haddockE003', normal, compile_fail, ['-haddock'])
-test('haddockE004', normal, compile_fail, ['-haddock'])
diff --git a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE001.comp.stderr b/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE001.comp.stderr
deleted file mode 100644
index e69de29bb2..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE001.comp.stderr
+++ /dev/null
diff --git a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE001.hs b/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE001.hs
deleted file mode 100644
index b8d900190a..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE001.hs
+++ /dev/null
@@ -1,2 +0,0 @@
-main=undefined
--- | aksdjhaskdjhasdsakjhdajksda
diff --git a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE001.stderr b/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE001.stderr
deleted file mode 100644
index f1332ea124..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE001.stderr
+++ /dev/null
@@ -1,2 +0,0 @@
-
-haddockE001.hs:3:0: parse error (possibly incorrect indentation)
diff --git a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE002.hs b/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE002.hs
deleted file mode 100644
index 7c49f02e5a..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE002.hs
+++ /dev/null
@@ -1,6 +0,0 @@
-
-module ShouldFail where
-
--- | aksdjhaskdjhasdsakjhdajksd
-
-main=undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE002.stderr b/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE002.stderr
deleted file mode 100644
index cb1e257b3d..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE002.stderr
+++ /dev/null
@@ -1,2 +0,0 @@
-
-haddockE002.hs:6:0: parse error (possibly incorrect indentation)
diff --git a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE003.hs b/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE003.hs
deleted file mode 100644
index ee6aef2bf8..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE003.hs
+++ /dev/null
@@ -1,9 +0,0 @@
-
-module ShouldFail where
-
--- aslkdjasldkjasldkaj
--- | awlkdajsads
--- asdasödlklas
----qww
------------------
-main=undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE003.stderr b/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE003.stderr
deleted file mode 100644
index 6965356fad..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE003.stderr
+++ /dev/null
@@ -1,2 +0,0 @@
-
-haddockE003.hs:9:0: parse error (possibly incorrect indentation)
diff --git a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE004.hs b/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE004.hs
deleted file mode 100644
index d73fe8f796..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE004.hs
+++ /dev/null
@@ -1,3 +0,0 @@
-
--- | awlkdajsads
-main=undefined
diff --git a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE004.stderr b/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE004.stderr
deleted file mode 100644
index 3462c61a8c..0000000000
--- a/testsuite/tests/ghc-regress/haddock/should_fail_flag_haddock/haddockE004.stderr
+++ /dev/null
@@ -1,2 +0,0 @@
-
-haddockE004.hs:3:1: parse error on input `main'