From: Simon Marlow <marlowsd@gmail.com>
Date: Thu, 20 Aug 2009 13:15:37 +0000 (+0000)
Subject: Add a case for IND (and a comment).  Fixes #3424, perhaps only partially.
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=91a5df02a15c0a06b1d4a36a569e41b0624a1185;p=ghc-hetmet.git

Add a case for IND (and a comment).  Fixes #3424, perhaps only partially.
---

diff --git a/rts/sm/Scav.c b/rts/sm/Scav.c
index 672636b..4c75ed2 100644
--- a/rts/sm/Scav.c
+++ b/rts/sm/Scav.c
@@ -1361,6 +1361,10 @@ scavenge_one(StgPtr p)
       break;
     }
 
+    case IND:
+        // IND can happen, for example, when the interpreter allocates
+        // a gigantic AP closure (more than one block), which ends up
+        // on the large-object list and then gets updated.  See #3424.
     case IND_OLDGEN:
     case IND_OLDGEN_PERM:
     case IND_STATIC: