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
Glasgow Haskell Compiler
GHC
Commits
35a341d4
Commit
35a341d4
authored
Apr 06, 2013
by
Gabor Greif
💬
Browse files
Rewrite usingInconsistentPicReg as a table for clarity
No change in functionality intended
parent
c0fb187b
Changes
1
Show whitespace changes
Inline
Side-by-side
compiler/cmm/CmmPipeline.hs
View file @
35a341d4
...
...
@@ -184,11 +184,11 @@ cpsTop hsc_env proc =
||
not
(
tablesNextToCode
dflags
)
||
-- Note [inconsistent-pic-reg]
usingInconsistentPicReg
usingInconsistentPicReg
=
(
platformArch
platform
==
ArchX86
||
platformArch
platform
==
ArchPPC
)
&&
platformOS
platform
==
OSDarwin
&&
gopt
Opt_PIC
dflags
usingInconsistentPicReg
=
case
(
platformArch
platform
,
platformOS
platform
,
gopt
Opt_PIC
dflags
)
of
(
ArchX86
,
OSDarwin
,
pic
)
->
pic
(
ArchPPC
,
OSDarwin
,
pic
)
->
pic
_
->
False
{- Note [inconsistent-pic-reg]
...
...
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