[project @ 2001-08-04 06:19:54 by ken]
[ghc-hetmet.git] / ghc / tests / typecheck / should_compile / tc019.hs
1 module ShouldSucceed where
2
3 (al:am) = [y+1 | (y,z) <- [(1,2)]]