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
2d91e04b
Commit
2d91e04b
authored
Jan 04, 2012
by
Simon Marlow
Browse files
Fix for unregisterised compilation: isStrangeTypeGlobal CCCS = True
Needed by #5357
parent
3478213a
Changes
1
Hide whitespace changes
Inline
Side-by-side
compiler/cmm/PprC.hs
View file @
2d91e04b
...
...
@@ -757,12 +757,14 @@ isStrangeTypeReg (CmmLocal _) = False
isStrangeTypeReg
(
CmmGlobal
g
)
=
isStrangeTypeGlobal
g
isStrangeTypeGlobal
::
GlobalReg
->
Bool
isStrangeTypeGlobal
CCCS
=
True
isStrangeTypeGlobal
CurrentTSO
=
True
isStrangeTypeGlobal
CurrentNursery
=
True
isStrangeTypeGlobal
BaseReg
=
True
isStrangeTypeGlobal
r
=
isFixedPtrGlobalReg
r
strangeRegType
::
CmmReg
->
Maybe
SDoc
strangeRegType
(
CmmGlobal
CCCS
)
=
Just
(
ptext
(
sLit
"struct CostCentreStack_ *"
))
strangeRegType
(
CmmGlobal
CurrentTSO
)
=
Just
(
ptext
(
sLit
"struct StgTSO_ *"
))
strangeRegType
(
CmmGlobal
CurrentNursery
)
=
Just
(
ptext
(
sLit
"struct bdescr_ *"
))
strangeRegType
(
CmmGlobal
BaseReg
)
=
Just
(
ptext
(
sLit
"struct StgRegTable_ *"
))
...
...
Simon Marlow
@simonmar
mentioned in issue
#5357 (closed)
·
Jul 30, 2011
mentioned in issue
#5357 (closed)
mentioned in issue #5357
Toggle commit list
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