Commit 3b3fd568 authored by Simon Marlow's avatar Simon Marlow
Browse files

The "Linking" message should go through compilationProgressMessage

Currently it is appearing on stderr, whereas the rest of the messages
from --make go to stdout, this change fixes that.
parent 13607ad8
......@@ -329,8 +329,8 @@ link' dflags batch_attempt_linking hpt
return Succeeded
else do
debugTraceMsg dflags 1 (ptext (sLit "Linking") <+> text exe_file
<+> text "...")
compilationProgressMsg dflags $ showSDoc $
(ptext (sLit "Linking") <+> text exe_file <+> text "...")
-- Don't showPass in Batch mode; doLink will do that for us.
let link = case ghcLink dflags of
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment