Commit 3e7ab539 authored by Ian Lynagh's avatar Ian Lynagh
Browse files

(F)SLIT -> (f)sLit in DriverPipeline

parent 8407d75d
...@@ -305,11 +305,11 @@ link LinkBinary dflags batch_attempt_linking hpt ...@@ -305,11 +305,11 @@ link LinkBinary dflags batch_attempt_linking hpt
Right t -> any (t <) other_times Right t -> any (t <) other_times
if not (dopt Opt_ForceRecomp dflags) && not linking_needed if not (dopt Opt_ForceRecomp dflags) && not linking_needed
then do debugTraceMsg dflags 2 (text exe_file <+> ptext SLIT("is up to date, linking not required.")) then do debugTraceMsg dflags 2 (text exe_file <+> ptext (sLit "is up to date, linking not required."))
return Succeeded return Succeeded
else do else do
debugTraceMsg dflags 1 (ptext SLIT("Linking") <+> text exe_file debugTraceMsg dflags 1 (ptext (sLit "Linking") <+> text exe_file
<+> text "...") <+> text "...")
-- Don't showPass in Batch mode; doLink will do that for us. -- Don't showPass in Batch mode; doLink will do that for us.
......
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