[project @ 2005-03-30 16:45:58 by wolfgang]

Track size change of alloc_blocks and alloc_blocks_lim.

(They are of type nat, which used to be the same size as W_, but now is
the same size as CInt).

diff --git a/ghc/includes/Cmm.h b/ghc/includes/Cmm.h
index 21c8257..ff36196 100644 (file)
--- a/ghc/includes/Cmm.h
+++ b/ghc/includes/Cmm.h
@@ -318,7 +318,7 @@
    TICK_ALLOC_HEAP_NOCTR(alloc);
 
 #define MAYBE_GC(liveness,reentry)                     \
-   if (W_[alloc_blocks] >= W_[alloc_blocks_lim]) {     \
+   if (CInt[alloc_blocks] >= CInt[alloc_blocks_lim]) { \
        R9  = liveness;                                 \
         R10 = reentry;                                 \
         jump stg_gc_gen_hp;                            \