add missing initialisation of ws->todo_large_objects
authorSimon Marlow <marlowsd@gmail.com>
Fri, 4 Feb 2011 09:31:48 +0000 (09:31 +0000)
committerSimon Marlow <marlowsd@gmail.com>
Fri, 4 Feb 2011 09:31:48 +0000 (09:31 +0000)
Found-by: Valgrind.  Thanks Julian!

rts/sm/GC.c

index 221f24a..4ba05bf 100644 (file)
@@ -831,7 +831,8 @@ new_gc_thread (nat n, gc_thread *t)
         ws->todo_q = newWSDeque(128);
         ws->todo_overflow = NULL;
         ws->n_todo_overflow = 0;
-        
+        ws->todo_large_objects = NULL;
+
         ws->part_list = NULL;
         ws->n_part_blocks = 0;