ghc/tests/rename/should_fail/rnfail004.hs

   1 --!!! multiple definitions, but hidden in patterns
   2 module Foo where
   3
   4 f x = x
   5   where
   6     a           = []
   7     (b,c,a)     = ([],[],d)
   8     [d,b,_]     = ([],a,[])