blob: e31ff87c3325cb02e6b040eaa543cde781985515 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
==================== Parser ====================
module T11768 where
class C a b
class D a
newtype DWrapper a = DWrap a
instance D (DWrapper a)
data Foo
= Foo
deriving -- | Documenting a single type
Eq
data Bar
= Bar
deriving (-- | Documenting one of multiple types
Eq,
Ord)
deriving anyclass (forall a. C a {-^ Documenting forall type -})
deriving D {-^ Documenting deriving via -} via DWrapper Bar
<document comment>
deriving instance Read Bar
|