ghc/tests/reader/should_fail/read007.stdout

   1
   2 ==================== Parser ====================
   3 module ShouldFail where
   4 f :: {- implicit forall -} Int -> IO Int
   5 f x = do
   6         (2 + 2) <- 2
   7         return x
   8
   9