Commit d7d56f58 authored by Simon Marlow's avatar Simon Marlow
Browse files

Fix the C backend after making CCCS an STG register

parent 0095702d
......@@ -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")
......
......@@ -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
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment