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