90a97f894cf22aa33e061530e0c3ae9c78d32cc4
[ghc-hetmet.git] / 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,[])