Testsuite: delete Windows line endings [skip ci] (#11631)
[ghc.git] / testsuite / tests / th / T2700.hs
1 {-# LANGUAGE TemplateHaskell #-}
2
3 module T2700 where
4 import Language.Haskell.TH
5 import System.IO
6
7 $( do { d <- sigD (mkName "foo") [t| (Int -> Bool) -> Bool |]
8 ; runIO (hPutStrLn stderr (pprint d))
9 ; return [] }
10 )