X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2FLdvProfile.c;fp=rts%2FLdvProfile.c;h=799d418145c4bcd80c6f80d0b88625130cc5baca;hp=412fd0557958f9846849cef9fa3f401a63746cf4;hb=5d52d9b64c21dcf77849866584744722f8121389;hpb=79957d77c1bff767f1041d3fabdeb94d92a52878 diff --git a/rts/LdvProfile.c b/rts/LdvProfile.c index 412fd05..799d418 100644 --- a/rts/LdvProfile.c +++ b/rts/LdvProfile.c @@ -140,7 +140,7 @@ processHeapClosureForDead( StgClosure *c ) case FUN_1_1: case FUN_0_2: case BLACKHOLE: - case CAF_BLACKHOLE: + case BLOCKING_QUEUE: case IND_PERM: case IND_OLDGEN_PERM: /*