summaryrefslogtreecommitdiff
path: root/testsuite/tests/deSugar/should_compile/ds037.hs
blob: d5fc1300f37cf3ef3be488bb97095bf04f1e123b (plain)
1
2
3
4
5
6
-- !!! AbsBinds with tyvars, no dictvars, but some dict binds
--
module ShouldCompile where

f x y = (fst (g y x), x+(1::Int))
g x y = (fst (f x y), y+(1::Int))