ghc-exactprint-1.9.0.0: tests/examples/pre-ghc910/ForAll.hs

{-# LANGUAGE RankNTypes #-}
module ForAll where

import Data.Data

foo ::  (forall a. Data a => a -> a) -> forall a. Data a => a -> a
foo a = a