oleview: Add dual interfaces support to coclasses.

0701ddb6 · Piotr Caban · Alexandre Julliard · d2fa7650 · 0701ddb6
Commit 0701ddb6 authored Apr 11, 2008 by Piotr Caban Committed by Alexandre Julliard Apr 14, 2008
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 1 deletion

typelib.c programs/oleview/typelib.c +2 -1

No files found.
--- a/programs/oleview/typelib.c
+++ b/programs/oleview/typelib.c
@@ -833,7 +833,8 @@ static void EnumCoclassImplTypes(ITypeInfo *pTypeInfo,
            AddToTLDataStrW(pTLData, wszSpace);
        }

-        if(pTypeAttr->typekind == TKIND_INTERFACE)
+        if(pTypeAttr->typekind == TKIND_INTERFACE ||
+                (pTypeAttr->wTypeFlags & TYPEFLAG_FDUAL))
            AddToTLDataStrW(pTLData, wszTKIND_INTERFACE);
        else if(pTypeAttr->typekind == TKIND_DISPATCH)
            AddToTLDataStrW(pTLData, wszTKIND_DISPATCH);