blob: 82dd81e5678621e8671eee9a079a0a383713c79d (
plain) (
tree)
|
|
{-# LANGUAGE QuantifiedConstraints #-}
module QuantifiedConstraints where
class Foo a where
fooed :: a
needsParensAroundContext :: (forall x. Foo (f x)) => f Int
needsParensAroundContext = fooed
needsNoParensAroundContext :: Foo (f Int) => f Int
needsNoParensAroundContext = fooed
|