[commit: ghc] master: Fix comment (old file names) in rts/ (31bb85f)

git at git.haskell.org git at git.haskell.org
Sat Feb 4 10:33:16 UTC 2017


Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/31bb85ffc4b68b5e2625ae374822ab8e8548eecc/ghc

>---------------------------------------------------------------

commit 31bb85ffc4b68b5e2625ae374822ab8e8548eecc
Author: Takenobu Tani <takenobu.hs at gmail.com>
Date:   Sat Feb 4 10:24:49 2017 +0000

    Fix comment (old file names) in rts/
    
    [skip ci]
    
    There ware some old file names (.lhs, ...) at comments.
    
    * rts/win32/ThrIOManager.c
      - Conc.lhs -> Conc.hs
    
    * rts/PrimOps.cmm
      - ByteCodeLink.lhs -> ByteCodeLink.hs
      - StgMiscClosures.hc -> StgMiscClosures.cmm
    
    * rts/AutoApply.h
      - AutoApply.hc -> AutoApply.cmm
    
    * rts/HeapStackCheck.cmm
      - PrimOps.hc -> PrimOps.cmm
    
    * rts/LdvProfile.h
      - Updates.hc -> Updates.cmm
    
    * rts/Schedule.c
      - StgStartup.hc -> StgStartup.cmm
    
    * rts/Weak.c
      - StgMiscClosures.hc -> StgMiscClosures.cmm
    
    Reviewers: bgamari, austin, erikd, simonmar
    
    Subscribers: thomie
    
    Differential Revision: https://phabricator.haskell.org/D3075


>---------------------------------------------------------------

31bb85ffc4b68b5e2625ae374822ab8e8548eecc
 rts/AutoApply.h          | 2 +-
 rts/HeapStackCheck.cmm   | 2 +-
 rts/LdvProfile.h         | 2 +-
 rts/PrimOps.cmm          | 4 ++--
 rts/Schedule.c           | 2 +-
 rts/Weak.c               | 2 +-
 rts/win32/ThrIOManager.c | 2 +-
 7 files changed, 8 insertions(+), 8 deletions(-)

diff --git a/rts/AutoApply.h b/rts/AutoApply.h
index 4e441ca..b73e666 100644
--- a/rts/AutoApply.h
+++ b/rts/AutoApply.h
@@ -2,7 +2,7 @@
  *
  * (c) The University of Glasgow 2002-2004
  *
- * Helper bits for the generic apply code (AutoApply.hc)
+ * Helper bits for the generic apply code (AutoApply.cmm)
  *
  * -------------------------------------------------------------------------- */
 
diff --git a/rts/HeapStackCheck.cmm b/rts/HeapStackCheck.cmm
index 69bff74..9bfe37e 100644
--- a/rts/HeapStackCheck.cmm
+++ b/rts/HeapStackCheck.cmm
@@ -526,7 +526,7 @@ stg_block_noregs
  *       ptr to MVar   (R1)
  *       stg_block_putmvar_info
  *
- * See PrimOps.hc for a description of the workings of take/putMVar.
+ * See PrimOps.cmm for a description of the workings of take/putMVar.
  *
  * -------------------------------------------------------------------------- */
 
diff --git a/rts/LdvProfile.h b/rts/LdvProfile.h
index e515715..7475dc1 100644
--- a/rts/LdvProfile.h
+++ b/rts/LdvProfile.h
@@ -21,7 +21,7 @@ RTS_PRIVATE void LdvCensusKillAll ( void );
 // address 'from'.
 //
 // Invoked when:
-//   1) Hp is incremented and exceeds HpLim (in Updates.hc).
+//   1) Hp is incremented and exceeds HpLim (in Updates.cmm).
 //   2) copypart() is called (in GC.c).
 #define LDV_FILL_SLOP(from, howMany)    \
   if (era > 0) {                                \
diff --git a/rts/PrimOps.cmm b/rts/PrimOps.cmm
index d6cdb3d..4baf63a 100644
--- a/rts/PrimOps.cmm
+++ b/rts/PrimOps.cmm
@@ -723,7 +723,7 @@ stg_finalizzeWeakzh ( gcptr w )
     //    LDV_recordDead((StgClosure *)w, sizeofW(StgWeak) - sizeofW(StgProfHeader));
     // Furthermore, when PROFILING is turned on, dead weak pointers are exactly as
     // large as weak pointers, so there is no need to fill the slop, either.
-    // See stg_DEAD_WEAK_info in StgMiscClosures.hc.
+    // See stg_DEAD_WEAK_info in StgMiscClosures.cmm.
 #endif
 
     //
@@ -1968,7 +1968,7 @@ stg_mkApUpd0zh ( P_ bco )
     W_ ap;
 
     // This function is *only* used to wrap zero-arity BCOs in an
-    // updatable wrapper (see ByteCodeLink.lhs).  An AP thunk is always
+    // updatable wrapper (see ByteCodeLink.hs).  An AP thunk is always
     // saturated and always points directly to a FUN or BCO.
     ASSERT(%INFO_TYPE(%GET_STD_INFO(bco)) == HALF_W_(BCO) &&
            StgBCO_arity(bco) == HALF_W_(0));
diff --git a/rts/Schedule.c b/rts/Schedule.c
index 02d8137..a4d0c1d 100644
--- a/rts/Schedule.c
+++ b/rts/Schedule.c
@@ -1323,7 +1323,7 @@ scheduleHandleThreadFinished (Capability *cap STG_UNUSED, Task *task, StgTSO *t)
 
           if (t->what_next == ThreadComplete) {
               if (task->incall->ret) {
-                  // NOTE: return val is stack->sp[1] (see StgStartup.hc)
+                  // NOTE: return val is stack->sp[1] (see StgStartup.cmm)
                   *(task->incall->ret) = (StgClosure *)task->incall->tso->stackobj->sp[1];
               }
               task->incall->rstat = Success;
diff --git a/rts/Weak.c b/rts/Weak.c
index 1974bb9..46a853d 100644
--- a/rts/Weak.c
+++ b/rts/Weak.c
@@ -110,7 +110,7 @@ scheduleFinalizers(Capability *cap, StgWeak *list)
         // Furthermore, when PROFILING is turned on, dead weak
         // pointers are exactly as large as weak pointers, so there is
         // no need to fill the slop, either.  See stg_DEAD_WEAK_info
-        // in StgMiscClosures.hc.
+        // in StgMiscClosures.cmm.
 #endif
         SET_HDR(w, &stg_DEAD_WEAK_info, w->header.prof.ccs);
     }
diff --git a/rts/win32/ThrIOManager.c b/rts/win32/ThrIOManager.c
index 56042dd..13c5e22 100644
--- a/rts/win32/ThrIOManager.c
+++ b/rts/win32/ThrIOManager.c
@@ -3,7 +3,7 @@
  * (c) The GHC Team, 1998-2006
  *
  * The IO manager thread in THREADED_RTS.
- * See also libraries/base/GHC/Conc.lhs.
+ * See also libraries/base/GHC/Conc.hs.
  *
  * ---------------------------------------------------------------------------*/
 



More information about the ghc-commits mailing list