summaryrefslogtreecommitdiff
path: root/rts/sm/Compact.c
diff options
context:
space:
mode:
Diffstat (limited to 'rts/sm/Compact.c')
-rw-r--r--rts/sm/Compact.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/sm/Compact.c b/rts/sm/Compact.c
index 4f71026dfa..987f78b497 100644
--- a/rts/sm/Compact.c
+++ b/rts/sm/Compact.c
@@ -979,7 +979,7 @@ compact(StgClosure *static_objects)
{
Task *task;
InCall *incall;
- for (task = all_tasks; task != NULL; task = task->all_link) {
+ for (task = all_tasks; task != NULL; task = task->all_next) {
for (incall = task->incall; incall != NULL;
incall = incall->prev_stack) {
if (incall->tso) {