blob: 304e0c2ebd98120ff97c004959b81ea1be0e8415 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
|
{-# LANGUAGE Haskell2010 #-}
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
}
|