From 81af806b823c3dd633a7c102b1fa6afbf89f16ef Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Fri, 12 Sep 2008 11:25:44 +0000 Subject: [PATCH] Fix crash in biographical heap profiling (#2576) --- rts/sm/Evac.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/rts/sm/Evac.c b/rts/sm/Evac.c index f537e2b..9b42fc1 100644 --- a/rts/sm/Evac.c +++ b/rts/sm/Evac.c @@ -212,7 +212,7 @@ spin: SET_EVACUAEE_FOR_LDV(from, size_to_reserve); // fill the slop if (size_to_reserve - size_to_copy > 0) - LDV_FILL_SLOP(to + size_to_copy - 1, (int)(size_to_reserve - size_to_copy)); + LDV_FILL_SLOP(to + size_to_copy, (int)(size_to_reserve - size_to_copy)); #endif return rtsTrue; -- 1.7.10.4