Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Shayne Fletcher
Glasgow Haskell Compiler
Commits
3e7ab539
Commit
3e7ab539
authored
Apr 12, 2008
by
Ian Lynagh
Browse files
(F)SLIT -> (f)sLit in DriverPipeline
parent
8407d75d
Changes
1
Hide whitespace changes
Inline
Side-by-side
compiler/main/DriverPipeline.hs
View file @
3e7ab539
...
...
@@ -305,11 +305,11 @@ link LinkBinary dflags batch_attempt_linking hpt
Right
t
->
any
(
t
<
)
other_times
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
else
do
debugTraceMsg
dflags
1
(
ptext
SLIT
(
"Linking"
)
<+>
text
exe_file
debugTraceMsg
dflags
1
(
ptext
(
sLit
"Linking"
)
<+>
text
exe_file
<+>
text
"..."
)
-- Don't showPass in Batch mode; doLink will do that for us.
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment