Delay eeing when unarchiving.

From-SVN: r8229

diff --git a/gcc/objc/archive.c b/gcc/objc/archive.c
index 71cac4f39b2e569b2cba0e93a3de07c1bb0d8ff3..f78f7871ecbe6d43684b0a8c921f4fa466be5b9b 100644 (file)
--- a/gcc/objc/archive.c
+++ b/gcc/objc/archive.c
@@ -1427,9 +1427,11 @@ static void __objc_finish_write_root_object(struct objc_typed_stream* stream)
 static void __objc_finish_read_root_object(struct objc_typed_stream* stream)
 {
   node_ptr node;
+  struct objc_list* free_list;
   SEL awake_sel = sel_get_any_uid ("awake");
 
   /* resolve object forward references */
+  free_list = list_cons(NULL, NULL);
   for (node = hash_next (stream->object_refs, NULL); node;
        node = hash_next (stream->object_refs, node))
     {
@@ -1439,10 +1441,13 @@ static void __objc_finish_read_root_object(struct objc_typed_stream* stream)
       while(reflist)
        {
          *((id*)reflist->head) = object;
+          if (list_find(&free_list, reflist) == NULL)
+           free_list = list_cons (reflist, free_list);
          reflist = reflist->tail;
        }
-      list_free (node->value);
     }
+  list_mapcar (free_list, free);
+  list_free (free_list);
 
   /* empty object reference table */
   hash_delete (stream->object_refs);