Testsuite: delete Windows line endings [skip ci] (#11631)
[ghc.git] / testsuite / tests / th / T5410.hs
1 {-# LANGUAGE TemplateHaskell #-}
2 module Main where
3
4 $([d| instance Show (a -> b) where
5 showsPrec _ _ = showString "<function>"
6 |])
7
8 main = print id