Skip to content
Snippets Groups Projects
Commit f106b173 authored by Simon Marlow's avatar Simon Marlow Committed by Ian Lynagh
Browse files

Fix the C backend after making CCCS an STG register

parent 94409efb
No related merge requests found
......@@ -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
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment