648534165021609b42d0701b03794a7078098cf3
[ghc-hetmet.git] / ghc / tests / deSugar / should_compile / ds037.hs
1 --!!! AbsBinds with tyvars, no dictvars, but some dict binds
2 --
3 module ShouldSucceed where
4
5 f x y = (fst (g y x), x+(1::Int))
6 g x y = (fst (f x y), y+(1::Int))