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

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
......
Markdown is supported
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