summaryrefslogtreecommitdiff
path: root/Build
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-12-09 15:22:53 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-12-09 15:22:53 -0400
commitee1131f01a2fa517fd3795c339799be96a6e4ca0 (patch)
tree2b301c3e430efd9a7405e46104700000b781858a /Build
parent5d317483e788ee3bfd644b46d5ef16870129d168 (diff)
record output to file
Diffstat (limited to 'Build')
-rw-r--r--Build/EvilLinker.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/Build/EvilLinker.hs b/Build/EvilLinker.hs
index 8166d0e83..4e165d360 100644
--- a/Build/EvilLinker.hs
+++ b/Build/EvilLinker.hs
@@ -116,6 +116,7 @@ getOutput cmd params env = do
putStrLn $ unwords [cmd, show params]
out@(s, ok) <- processTranscript' cmd params env Nothing
putStrLn $ unwords [cmd, "finished", show ok, "output size:", show (length s)]
+ writeFile (cmd ++ ".out") s
return out
runParser' :: Parser a -> String -> String -> a