Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
jberryman
GHC
Commits
70eb132b
Commit
70eb132b
authored
Jul 17, 2001
by
simonpj
Browse files
[project @ 2001-07-17 15:48:40 by simonpj]
Add comment and use backslash consistently
parent
0f894d81
Changes
1
Hide whitespace changes
Inline
Side-by-side
ghc/compiler/main/SysTools.lhs
View file @
70eb132b
...
...
@@ -241,8 +241,16 @@ initSysTools minusB_args
-- pick up whatever happens to be lying around in the path,
-- possibly including those from a cygwin install on the target,
-- which is exactly what we're trying to avoid.
; let gcc_path | am_installed = installed_bin ("gcc -B
" ++ "
\"" ++
(
installed "gcc-lib
/") ++ "
\"")
; let gcc_path | am_installed = installed_bin ("gcc -B\"" ++ installed "gcc-lib
\\
\"")
| otherwise = cGCC
-- The trailing "\\" is absolutely essential; gcc seems
-- to construct file names simply by concatenating to this
-- -B path with no extra slash.
-- We use "\\" rather than "/" because gcc_path is in NATIVE format
-- (see comments with declarations of global variables)
--
-- The quotes round the -B argument are in case TopDir has spaces in it
perl_path | am_installed = installed_bin cGHC_PERL
| otherwise = cGHC_PERL
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new 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