diff options
-rw-r--r-- | testsuite/tests/saks/should_compile/saks028.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/testsuite/tests/saks/should_compile/saks028.hs b/testsuite/tests/saks/should_compile/saks028.hs index 9d15db593c..51c1e52c6b 100644 --- a/testsuite/tests/saks/should_compile/saks028.hs +++ b/testsuite/tests/saks/should_compile/saks028.hs @@ -3,6 +3,7 @@ module SAKS_028 where +import System.IO import Data.Kind import Language.Haskell.TH hiding (Type) @@ -10,5 +11,5 @@ type Functor' :: (Type -> Type) -> Constraint class Functor' f do sig <- reifyType ('' Functor') - runIO $ putStrLn $ pprint sig + runIO $ hPutStrLn stderr $ pprint sig return [] |