GHC HEAD compat.

mboes · Oct 6, 2016 · 4475a4c · 4475a4c
1 parent b16b9d9
commit 4475a4c
Showing 1 changed file with 0 additions and 2 deletions.
diff --git a/cbits/HeapView.c b/cbits/HeapView.c
@@ -57,7 +57,6 @@ char *gtc_heap_view_closure_type_names[] = {
  [PAP]                   = "PAP",
  [AP_STACK]              = "AP_STACK",
  [IND]                   = "IND",
- [IND_PERM]              = "IND_PERM",
  [IND_STATIC]            = "IND_STATIC",
  [RET_BCO]               = "RET_BCO",
  [RET_SMALL]             = "RET_SMALL",
@@ -230,7 +229,6 @@ StgMutArrPtrs *gtc_heap_view_closurePtrs(Capability *cap, StgClosure *closure) {
             break;
 
         case IND:
-        case IND_PERM:
         case IND_STATIC:
         case BLACKHOLE:
             ptrs[nptrs++] = (StgClosure *)(((StgInd *)closure)->indirectee);