Commit 606ec8dc authored by sof's avatar sof
Browse files

[project @ 1997-03-13 07:52:30 by sof]

prof-conc setting and resetting of TSO_CCC & CCC
parent bc9eb0fd
......@@ -140,7 +140,7 @@ SaveAllStgContext(STG_NO_ARGS)
{
SaveAllStgRegs();
#ifdef CONCURRENT
# ifdef PAR
# if defined(PROFILING) || defined(PAR)
TSO_CCC(CurrentTSO) = CCC;
CCC = (CostCentre)STATIC_CC_REF(CC_MAIN);
# endif
......@@ -279,8 +279,10 @@ RestoreAllStgRegs (STG_NO_ARGS)
StkStubReg = STK_STUB_closure;
#endif
#ifdef PAR
#if CONCURRENT
# if defined(PROFILING) || defined(PAR)
CCC = TSO_CCC(CurrentTSO);
# endif
#endif
}
......
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