archive.c (__objc_free): New function.
authorDoug Evans <dje@gnu.org>
Sat, 8 Oct 1994 15:16:09 +0000 (15:16 +0000)
committerDoug Evans <dje@gnu.org>
Sat, 8 Oct 1994 15:16:09 +0000 (15:16 +0000)
* objc/archive.c (__objc_free): New function.
(__objc_finish_read_root_object): Use it.

From-SVN: r8243

gcc/objc/archive.c

index f78f7871ecbe6d43684b0a8c921f4fa466be5b9b..f2d5f714e4c1a73cc7623f65fba80077466ad7e1 100644 (file)
@@ -1362,6 +1362,12 @@ objc_read_array (TypedStream* stream, const char* type,
   return 1;
 }
 
+static void
+__objc_free (void* p)
+{
+  free (p);
+}
+
 static int 
 __objc_fread(FILE* file, char* data, int len)
 {
@@ -1446,7 +1452,7 @@ static void __objc_finish_read_root_object(struct objc_typed_stream* stream)
          reflist = reflist->tail;
        }
     }
-  list_mapcar (free_list, free);
+  list_mapcar (free_list, __objc_free);
   list_free (free_list);
 
   /* empty object reference table */