blob: c218faad0e34d033412643bea742c5fab4174dd6 (
plain)
1
2
3
4
5
6
7
8
|
module T7336 ( U, T ) where
data U = MkU deriving Show
-- Want to report MkU as unused
data T = MkT deriving Read
-- But MkT is not unused; we might
-- parse a string to generate it
|