summaryrefslogtreecommitdiff
path: root/rts
diff options
context:
space:
mode:
authorSimon Marlow <simonmar@microsoft.com>2006-08-09 14:12:25 +0000
committerSimon Marlow <simonmar@microsoft.com>2006-08-09 14:12:25 +0000
commitd54ca9c56b628c9676286af15a995bc3ce791456 (patch)
tree0895bcf2228f39019a73fdabcb52295f98263e87 /rts
parent118d0ea54667cd1a39a52867935dbacccb5e0257 (diff)
downloadhaskell-d54ca9c56b628c9676286af15a995bc3ce791456.tar.gz
fix bug in task freeing
Diffstat (limited to 'rts')
-rw-r--r--rts/Task.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/Task.c b/rts/Task.c
index 57497e427b..dcfa5b5aee 100644
--- a/rts/Task.c
+++ b/rts/Task.c
@@ -74,7 +74,7 @@ stopTaskManager (void)
tasksRunning);
ACQUIRE_LOCK(&sched_mutex);
- for (task = task_free_list; task != NULL; next) {
+ for (task = task_free_list; task != NULL; task = next) {
next = task->next;
stgFree(task);
}