path: root/testsuite/tests/ghci.debugger/Test4.hs

data T a b = T (a -> b)

f g y = () where x = T g