ghc/tests/rename/should_compile/rn029.hs

   1 -- !!! Checking that lazy name clashing works.
   2 module ShouldSucceed where
   3
   4 import List ( reverse, sort )
   5
   6 sort :: Int     -- Clashes with List.sort,
   7 sort = 4        -- but never used, so OK
   8
   9
  10 reverse :: Int  -- Clashes with List.reverse,
  11 reverse = 3     -- but the only uses are qualified
  12
  13 x = ShouldSucceed.reverse
  14
  15 y = List.reverse
  16
  17