From: Simon Marlow <marlowsd@gmail.com>
Date: Tue, 16 Feb 2010 12:35:44 +0000 (+0000)
Subject: disable a false assertion, with a comment to explain why
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=32578fc55ac105aa3bd08ef6aa607bfdbe375eec

disable a false assertion, with a comment to explain why
---

diff --git a/rts/Capability.h b/rts/Capability.h
index 35b9203..4b51548 100644
--- a/rts/Capability.h
+++ b/rts/Capability.h
@@ -294,7 +294,8 @@ recordMutableCap (StgClosure *p, Capability *cap, nat gen)
     bdescr *bd;
 
     // We must own this Capability in order to modify its mutable list.
-    ASSERT(cap->running_task == myTask());
+    //    ASSERT(cap->running_task == myTask());
+    // NO: assertion is violated by performPendingThrowTos()
     bd = cap->mut_lists[gen];
     if (bd->free >= bd->start + BLOCK_SIZE_W) {
 	bdescr *new_bd;