blob: 14440e8d6994d51e7dd5c8a48475e910fa3c1821 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
|
module Bug195 where
data T = A { someField :: () -- ^ Doc for someField of A
, someOtherField :: () -- ^ Doc for someOtherField of A
}
| B { someField :: () -- ^ Doc for someField of B
, someOtherField :: () -- ^ Doc for someOtherField of B
}
| C { someField :: () -- ^ Doc for someField of C
, someOtherField :: () -- ^ Doc for someOtherField of C
}
|