From: simonmar <unknown>
Date: Mon, 17 Oct 2005 10:01:35 +0000 (+0000)
Subject: [project @ 2005-10-17 10:01:35 by simonmar]
X-Git-Tag: Initial_conversion_from_CVS_complete~165
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=666d13694a9aca0a2dad5ae3f26f02ae3f0161e0

[project @ 2005-10-17 10:01:35 by simonmar]
Fix a comment
---

diff --git a/ghc/rts/PrimOps.cmm b/ghc/rts/PrimOps.cmm
index 25f8245..785a462 100644
--- a/ghc/rts/PrimOps.cmm
+++ b/ghc/rts/PrimOps.cmm
@@ -131,8 +131,8 @@ unsafeThawArrayzh_fast
 
   // So, when we thaw a MUT_ARR_PTRS_FROZEN, we must cope with two cases:
   // either it is on a mut_list, or it isn't.  We adopt the convention that
-  // the mut_link field is NULL if it isn't on a mut_list, and the GC
-  // maintains this invariant.
+  // the closure type is MUT_ARR_PTRS_FROZEN0 if it is on the mutable list,
+  // and MUT_ARR_PTRS_FROZEN otherwise.
   //
   if (%INFO_TYPE(%GET_STD_INFO(R1)) != HALF_W_(MUT_ARR_PTRS_FROZEN0)) {
 	foreign "C" recordMutableLock(R1 "ptr") [R1];