Test suite on windows: normalize output to Unix line endings.
authorJoachim Breitner <mail@joachim-breitner.de>
Thu, 15 Oct 2015 18:14:35 +0000 (18:14 +0000)
committerJoachim Breitner <mail@joachim-breitner.de>
Thu, 15 Oct 2015 18:14:35 +0000 (18:14 +0000)
tests/test.hs

index 8f50b3c..935b3ac 100644 (file)
@@ -82,7 +82,7 @@ run cmd args stdin = do
    (ex,stdout,stderr) <- readProcessWithExitCode cmd args stdin
    unless (B.null stderr) $ throwIO $ StderrException stderr
    case ex of
-     ExitSuccess   -> return stdout
+     ExitSuccess   -> return (B.filter (not . (==13)) stdout) -- windows compat
      ExitFailure r -> throwIO $ ExitCodeException r
 
 data StderrException = StderrException B.ByteString