diff options
Diffstat (limited to 'rts/sm/Compact.c')
-rw-r--r-- | rts/sm/Compact.c | 2 |
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) { |