@@ -54,7 +54,7 @@ compile :: PSCMakeOptions -> IO ()
5454compile (PSCMakeOptions inputGlob inputForeignGlob outputDir opts usePrefix) = do
5555 input <- concat <$> mapM glob inputGlob
5656 when (null input) $ do
57− putStrLn "psc-make: No input files."
57+ hPutStrLn stderr "psc-make: No input files."
5858 exitFailure
5959 moduleFiles <- readInput (InputOptions input)
6060 inputForeign <- concat <$> mapM glob inputForeignGlob
@@ -71,7 +71,7 @@ compile (PSCMakeOptions inputGlob inputForeignGlob outputDir opts usePrefix) = d
7171 e <- runMake opts $ P.make makeActions ms
7272 case e of
7373 Left errs -> do
74− putStrLn (P.prettyPrintMultipleErrors (P.optionsVerboseErrors opts) errs)
74+ hPutStrLn stderr (P.prettyPrintMultipleErrors (P.optionsVerboseErrors opts) errs)
7575 exitFailure
7676 Right (_, warnings') -> do
7777 when (P.nonEmpty warnings') $