From 77b7c34fa24860c91f56250defa91b2d1a7a1c00 Mon Sep 17 00:00:00 2001 From: Ian Lynagh Date: Wed, 18 Feb 2009 23:56:20 +0000 Subject: [PATCH] Fix an off-by-one; fixes the second bug in trac #3001 --- rts/LdvProfile.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/rts/LdvProfile.h b/rts/LdvProfile.h index d85b95c..5380c92 100644 --- a/rts/LdvProfile.h +++ b/rts/LdvProfile.h @@ -27,7 +27,7 @@ extern void LdvCensusKillAll ( void ); #define LDV_FILL_SLOP(from, howManyBackwards) \ if (era > 0) { \ int i; \ - for (i = 0;i < (howManyBackwards); i++) \ + for (i = 1;i <= (howManyBackwards); i++) \ ((StgWord *)(from))[-i] = 0; \ } -- 1.7.10.4