prof-conc setting and resetting of TSO_CCC & CCC
{
SaveAllStgRegs();
#ifdef CONCURRENT
-# ifdef PAR
+# if defined(PROFILING) || defined(PAR)
TSO_CCC(CurrentTSO) = CCC;
CCC = (CostCentre)STATIC_CC_REF(CC_MAIN);
# endif
StkStubReg = STK_STUB_closure;
#endif
-#ifdef PAR
+#if CONCURRENT
+# if defined(PROFILING) || defined(PAR)
CCC = TSO_CCC(CurrentTSO);
+# endif
#endif
}