Piotr Caban : oleaut32: Free guid_list in ITypeLib2_Release.
Alexandre Julliard
julliard at winehq.org
Tue Jul 30 14:14:22 CDT 2013
Module: wine
Branch: master
Commit: 1967b35962ea0c2476da8986404c8d8f45eda0b9
URL: http://source.winehq.org/git/wine.git/?a=commit;h=1967b35962ea0c2476da8986404c8d8f45eda0b9
Author: Piotr Caban <piotr at codeweavers.com>
Date: Tue Jul 30 15:19:54 2013 +0200
oleaut32: Free guid_list in ITypeLib2_Release.
---
dlls/oleaut32/typelib.c | 6 ++++++
1 files changed, 6 insertions(+), 0 deletions(-)
diff --git a/dlls/oleaut32/typelib.c b/dlls/oleaut32/typelib.c
index b0cfc88..44eea5b 100644
--- a/dlls/oleaut32/typelib.c
+++ b/dlls/oleaut32/typelib.c
@@ -4577,6 +4577,7 @@ static ULONG WINAPI ITypeLib2_fnRelease( ITypeLib2 *iface)
TLBImpLib *pImpLib, *pImpLibNext;
TLBRefType *ref_type;
TLBString *tlbstr, *tlbstr_next;
+ TLBGuid *tlbguid, *tlbguid_next;
void *cursor2;
int i;
@@ -4604,6 +4605,11 @@ static ULONG WINAPI ITypeLib2_fnRelease( ITypeLib2 *iface)
heap_free(tlbstr);
}
+ LIST_FOR_EACH_ENTRY_SAFE(tlbguid, tlbguid_next, &This->guid_list, TLBGuid, entry) {
+ list_remove(&tlbguid->entry);
+ heap_free(tlbguid);
+ }
+
TLB_FreeCustData(&This->custdata_list);
for (i = 0; i < This->ctTypeDesc; i++)
More information about the wine-cvs
mailing list