oleaut32: Fix a missing ITypeInfo::ReleaseTypeAttr in the typelib marshaling code.

053f69ac · Rob Shearman · Alexandre Julliard · 053b6b21 · 053f69ac
Commit 053f69ac authored Oct 23, 2006 by Rob Shearman Committed by Alexandre Julliard Oct 23, 2006
Hide whitespace changes
Inline Side-by-side

Showing with 5 additions and 1 deletion

tmarshal.c dlls/oleaut32/tmarshal.c +5 -1

No files found.
--- a/dlls/oleaut32/tmarshal.c
+++ b/dlls/oleaut32/tmarshal.c
@@ -1201,8 +1201,12 @@ _get_funcdesc(
 		}
 		hres = _get_funcdesc(tinfo2,iMethod,tactual,fdesc,iname,fname);
 		ITypeInfo_Release(tinfo2);
-		if (!hres) return S_OK;
+		if (!hres) {
+		    ITypeInfo_ReleaseTypeAttr(tinfo, attr);
+		    return S_OK;
+                }
 	    }
+	    ITypeInfo_ReleaseTypeAttr(tinfo, attr);
 	    return hres;
 	}
 	if (((*fdesc)->oVft/4) == iMethod) {