rts: Rename the nondescript initProfiling2 to refreshProfilingCCSs

3 files changed, 5 insertions, 6 deletions

diff --git a/rts/Linker.c b/rts/Linker.c
index 9fb91bf3ca..54e5049a58 100644
--- a/rts/Linker.c
+++ b/rts/Linker.c
@@ -894,7 +894,7 @@ SymbolAddr* loadSymbol(SymbolName *lbl, RtsSymbolInfo *pinfo) {
 #if defined(PROFILING)
         // collect any new cost centres & CCSs
         // that were defined during runInit
-        initProfiling2();
+        refreshProfilingCCSs();
 #endif
     }
 
@@ -1675,7 +1675,7 @@ static HsInt resolveObjs_ (void)
 
 #if defined(PROFILING)
     // collect any new cost centres & CCSs that were defined during runInit
-    initProfiling2();
+    refreshProfilingCCSs();
 #endif
 
     IF_DEBUG(linker, debugBelch("resolveObjs: done\n"));
@@ -1905,4 +1905,3 @@ void freeSegments (ObjectCode *oc)
         oc->segments = NULL;
     }
 }
-
diff --git a/rts/Profiling.c b/rts/Profiling.c
index 4931898fe0..f340a63cff 100644
--- a/rts/Profiling.c
+++ b/rts/Profiling.c
@@ -182,7 +182,7 @@ void initProfiling (void)
     CCS_MAIN->root = CCS_MAIN;
     ccsSetSelected(CCS_MAIN);
 
-    initProfiling2();
+    refreshProfilingCCSs();
 
     if (RtsFlags.CcFlags.doCostCentres) {
         initTimeProfiling();
@@ -192,7 +192,7 @@ void initProfiling (void)
 //
 // Should be called after loading any new Haskell code.
 //
-void initProfiling2 (void)
+void refreshProfilingCCSs (void)
 {
     // make CCS_MAIN the parent of all the pre-defined CCSs.
     CostCentreStack *next;
diff --git a/rts/Profiling.h b/rts/Profiling.h
index c692c22b5e..abb731217a 100644
--- a/rts/Profiling.h
+++ b/rts/Profiling.h
@@ -24,7 +24,7 @@
 #endif
 
 void initProfiling  (void);
-void initProfiling2 (void);
+void refreshProfilingCCSs (void);
 void endProfiling   (void);
 void freeProfiling  (void);