X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FLdvProfile.h;h=d85b95cd6ade6dbeefef61a7876855f3683ceace;hb=6a710247bc1a7b9bced7a4e6f143de91eb4f9552;hp=9a607801f9729fc72060fc57fed51e02bd1bfca9;hpb=94e06463420582cc2d336b39a297e82af39e4cc4;p=ghc-hetmet.git diff --git a/ghc/rts/LdvProfile.h b/ghc/rts/LdvProfile.h index 9a60780..d85b95c 100644 --- a/ghc/rts/LdvProfile.h +++ b/ghc/rts/LdvProfile.h @@ -24,7 +24,7 @@ extern void LdvCensusKillAll ( void ); // Invoked when: // 1) Hp is incremented and exceeds HpLim (in Updates.hc). // 2) copypart() is called (in GC.c). -#define FILL_SLOP(from, howManyBackwards) \ +#define LDV_FILL_SLOP(from, howManyBackwards) \ if (era > 0) { \ int i; \ for (i = 0;i < (howManyBackwards); i++) \