X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fsm%2FCompact.h;h=8f037c3b4dbe58bae1ad037a32e9a640bd5806f6;hb=f86e7206ea94b48b94fb61007a1c5d55b8c60f45;hp=9b3ecb38192c1424598c4045a3d91aef744dcbc0;hpb=64c17c4561cf419a4c70511bafc0815ea670bb2e;p=ghc-hetmet.git diff --git a/rts/sm/Compact.h b/rts/sm/Compact.h index 9b3ecb3..8f037c3 100644 --- a/rts/sm/Compact.h +++ b/rts/sm/Compact.h @@ -74,6 +74,6 @@ is_marked(StgPtr p, bdescr *bd) return (*bitmap_word & bit_mask); } -void compact(void); +extern void compact (StgClosure *static_objects); #endif /* GCCOMPACT_H */