blob: a6c0751927a8e181e43d96b055cf013f61c779a2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
module Main where
-- Previously GHC was printing this warning:
--
-- Main.hs:5:1: Warning:
-- The import of ‘A.has’ from module ‘A’ is redundant
--
-- Main.hs:6:1: Warning:
-- The import of ‘B.has’ from module ‘B’ is redundant
import A (A (has))
import B (B (has))
data Blah = Blah
instance A Blah where
has = Blah
instance B Blah where
has = Blah
main :: IO ()
main = return ()
|