Commit 8184390e by Doug Evans

archive.c (__objc_free): New function.

* objc/archive.c (__objc_free): New function.
(__objc_finish_read_root_object): Use it.

From-SVN: r8243
parent a1630124
...@@ -1362,6 +1362,12 @@ objc_read_array (TypedStream* stream, const char* type, ...@@ -1362,6 +1362,12 @@ objc_read_array (TypedStream* stream, const char* type,
return 1; return 1;
} }
static void
__objc_free (void* p)
{
free (p);
}
static int static int
__objc_fread(FILE* file, char* data, int len) __objc_fread(FILE* file, char* data, int len)
{ {
...@@ -1446,7 +1452,7 @@ static void __objc_finish_read_root_object(struct objc_typed_stream* stream) ...@@ -1446,7 +1452,7 @@ static void __objc_finish_read_root_object(struct objc_typed_stream* stream)
reflist = reflist->tail; reflist = reflist->tail;
} }
} }
list_mapcar (free_list, free); list_mapcar (free_list, __objc_free);
list_free (free_list); list_free (free_list);
/* empty object reference table */ /* empty object reference table */
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment