diff options
-rw-r--r-- | rts/sm/GCAux.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/sm/GCAux.c b/rts/sm/GCAux.c index 0fb61f16a2..df47e18794 100644 --- a/rts/sm/GCAux.c +++ b/rts/sm/GCAux.c @@ -41,7 +41,6 @@ isAlive(StgClosure *p) q = UNTAG_CLOSURE(p); ASSERT(LOOKS_LIKE_CLOSURE_PTR(q)); - info = get_itbl(q); // ignore static closures // @@ -71,6 +70,7 @@ isAlive(StgClosure *p) return p; } + info = get_itbl(q); switch (info->type) { case IND: |