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
Alexis King
GHC
Commits
d7d56f58
Commit
d7d56f58
authored
Jan 03, 2012
by
Simon Marlow
Browse files
Fix the C backend after making CCCS an STG register
parent
0095702d
Changes
2
Hide whitespace changes
Inline
Side-by-side
compiler/cmm/PprC.hs
View file @
d7d56f58
...
...
@@ -793,6 +793,7 @@ pprGlobalReg gr = case gr of
SpLim
->
ptext
(
sLit
"SpLim"
)
Hp
->
ptext
(
sLit
"Hp"
)
HpLim
->
ptext
(
sLit
"HpLim"
)
CCCS
->
ptext
(
sLit
"CCCS"
)
CurrentTSO
->
ptext
(
sLit
"CurrentTSO"
)
CurrentNursery
->
ptext
(
sLit
"CurrentNursery"
)
HpAlloc
->
ptext
(
sLit
"HpAlloc"
)
...
...
includes/stg/Regs.h
View file @
d7d56f58
...
...
@@ -346,6 +346,12 @@ GLOBAL_REG_DECL(P_,Hp,REG_Hp)
#define HpLim (BaseReg->rHpLim)
#endif
#if defined(REG_CCCS) && !defined(NO_GLOBAL_REG_DECLS)
GLOBAL_REG_DECL
(
P_
,
CCCS
,
REG_CCCS
)
#else
#define CCCS (BaseReg->rCCCS)
#endif
#if defined(REG_CurrentTSO) && !defined(NO_GLOBAL_REG_DECLS)
GLOBAL_REG_DECL
(
struct
_StgTSO
*
,
CurrentTSO
,
REG_CurrentTSO
)
#else
...
...
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