Marge Bot pushed to branch master at Glasgow Haskell Compiler / GHC

Commits:

5 changed files:

Changes:

  • rts/Profiling.c
    ... ... @@ -44,9 +44,9 @@ static Arena *prof_arena;
    44 44
      * closure_cats
    
    45 45
      */
    
    46 46
     
    
    47
    -static unsigned int CC_ID  = 1;
    
    48
    -static unsigned int CCS_ID = 1;
    
    49
    -static unsigned int DUMPED_CC_ID  = 0; // we have dumped all CCs up to this id to the eventlog
    
    47
    +static StgInt CC_ID  = 1;
    
    48
    +static StgInt CCS_ID = 1;
    
    49
    +static StgInt DUMPED_CC_ID  = 0; // we have dumped all CCs up to this id to the eventlog
    
    50 50
     
    
    51 51
     /* Globals for opening the profiling log file(s)
    
    52 52
      */
    

  • rts/Trace.c
    ... ... @@ -757,7 +757,7 @@ void traceIPE(const InfoProvEnt *ipe)
    757 757
     }
    
    758 758
     
    
    759 759
     #if defined(PROFILING)
    
    760
    -void traceHeapProfCostCentre(StgWord32 ccID,
    
    760
    +void traceHeapProfCostCentre(StgInt ccID,
    
    761 761
                                  const char *label,
    
    762 762
                                  const char *module,
    
    763 763
                                  const char *srcloc,
    

  • rts/Trace.h
    ... ... @@ -376,7 +376,7 @@ void traceHeapBioProfSampleBegin(StgInt era, StgWord64 time);
    376 376
     void traceHeapProfSampleEnd(StgInt era);
    
    377 377
     void traceHeapProfSampleString(const char *label, StgWord residency);
    
    378 378
     #if defined(PROFILING)
    
    379
    -void traceHeapProfCostCentre(StgWord32 ccID,
    
    379
    +void traceHeapProfCostCentre(StgInt ccID,
    
    380 380
                                  const char *label,
    
    381 381
                                  const char *module,
    
    382 382
                                  const char *srcloc,
    

  • rts/eventlog/EventLog.c
    ... ... @@ -1312,7 +1312,7 @@ void postHeapProfSampleString(const char *label,
    1312 1312
     }
    
    1313 1313
     
    
    1314 1314
     #if defined(PROFILING)
    
    1315
    -void postHeapProfCostCentre(StgWord32 ccID,
    
    1315
    +void postHeapProfCostCentre(StgInt ccID,
    
    1316 1316
                                 const char *label,
    
    1317 1317
                                 const char *module,
    
    1318 1318
                                 const char *srcloc,
    

  • rts/eventlog/EventLog.h
    ... ... @@ -181,7 +181,7 @@ void postHeapProfSampleString(const char *label,
    181 181
                                   StgWord64 residency);
    
    182 182
     
    
    183 183
     #if defined(PROFILING)
    
    184
    -void postHeapProfCostCentre(StgWord32 ccID,
    
    184
    +void postHeapProfCostCentre(StgInt ccID,
    
    185 185
                                 const char *label,
    
    186 186
                                 const char *module,
    
    187 187
                                 const char *srcloc,