projects
/
ghc-hetmet.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
f7c31d8926c76a785645588c04fac1a4ddd3d51e
[ghc-hetmet.git]
/
ghc
/
compiler
/
tests
/
typecheck
/
should_succeed
/
tc075.hs
1
module ShouldSucceed where
2
3
--!!! giving methods in a pattern binding (for no v good reason...)
4
5
data Foo = MkFoo Int
6
7
instance Eq Foo where
8
((==), (/=)) = (\x -> \y -> True, \x -> \y -> False)