X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FLdvProfile.h;h=d85b95cd6ade6dbeefef61a7876855f3683ceace;hb=28a464a75e14cece5db40f2765a29348273ff2d2;hp=106e0e29452ec11c6d2d3ac3dbfa3034b15e59d7;hpb=dbef766ce79e37a74468a07a93b15ba1f06fe8f8;p=ghc-hetmet.git diff --git a/ghc/rts/LdvProfile.h b/ghc/rts/LdvProfile.h index 106e0e2..d85b95c 100644 --- a/ghc/rts/LdvProfile.h +++ b/ghc/rts/LdvProfile.h @@ -1,5 +1,4 @@ /* ----------------------------------------------------------------------------- - * $Id: LdvProfile.h,v 1.2 2001/11/26 16:54:21 simonmar Exp $ * * (c) The GHC Team, 2001 * Author: Sungwoo Park @@ -25,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++) \