From 470d52df0101a2f3c528b35e046ef9814ae6e5a5 Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Thu, 16 Dec 2010 10:21:00 +0000 Subject: [PATCH] add a missing STACK case --- rts/LdvProfile.c | 1 + 1 file changed, 1 insertion(+) diff --git a/rts/LdvProfile.c b/rts/LdvProfile.c index acec057..c95dd1b 100644 --- a/rts/LdvProfile.c +++ b/rts/LdvProfile.c @@ -98,6 +98,7 @@ processHeapClosureForDead( StgClosure *c ) 'inherently used' cases: do nothing. */ case TSO: + case STACK: case MVAR_CLEAN: case MVAR_DIRTY: case MUT_ARR_PTRS_CLEAN: -- 1.7.10.4