[project @ 2001-01-29 08:42:54 by simonpj]
[ghc-hetmet.git] / ghc / tests / deSugar / should_compile / ds047.hs
1 -- !!! Nullary rec-pats for constructors that hasn't got any labelled
2 -- !!! fields is legal Haskell, and requires extra care in the desugarer.
3 module ShouldCompile where
4
5 data X = X Int [Int]
6
7 f :: X -> Int
8 f (X _ []) = 0
9 f X{}      = 1