X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fsm%2FGC.h;h=d3ce8cf92d13db88f62d4dc0b96039c8024d12d9;hb=73c6eb2f63475c9b2fa53d9d31d4862a46d5be48;hp=b95466edb9b28382ecf1d67447f4033d07d6d512;hpb=64c17c4561cf419a4c70511bafc0815ea670bb2e;p=ghc-hetmet.git diff --git a/rts/sm/GC.h b/rts/sm/GC.h index b95466e..d3ce8cf 100644 --- a/rts/sm/GC.h +++ b/rts/sm/GC.h @@ -36,7 +36,7 @@ extern lnat new_blocks; // blocks allocated during this GC extern lnat new_scavd_blocks; // ditto, but depth-first blocks #ifdef DEBUG -extern nat mutlist_MUTVARS, mutlist_MUTARRS, mutlist_OTHERS; +extern nat mutlist_MUTVARS, mutlist_MUTARRS, mutlist_MVARS, mutlist_OTHERS; #endif StgClosure * isAlive(StgClosure *p);