[project @ 1997-05-26 05:54:39 by sof]
[ghc-hetmet.git] / ghc / compiler / tests / rename / rn004.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,[])