[PATCH 1/1] wintypes: Stub RoIsApiContractMajorVersionPresent().

[Daniel Tang]

From: Daniel Tang

---
 dlls/wintypes/main.c        | 7 +++++++
 dlls/wintypes/wintypes.spec | 2 +-
 2 files changed, 8 insertions(+), 1 deletion(-)

diff --git a/dlls/wintypes/main.c b/dlls/wintypes/main.c
index 74eda4af5ce..40bf35ecb8d 100644
--- a/dlls/wintypes/main.c
+++ b/dlls/wintypes/main.c
@@ -355,6 +355,13 @@ HRESULT WINAPI DllGetActivationFactory(HSTRING classid, IActivationFactory **fac
     return S_OK;
 }

+HRESULT WINAPI RoIsApiContractMajorVersionPresent(const WCHAR *name, UINT16 major, BOOL *result)
+{
+    // For some reason MS Office crashes if a logging statement is added here
+    *result = FALSE;
+    return S_OK;
+}
+
 HRESULT WINAPI RoResolveNamespace(HSTRING name, HSTRING windowsMetaDataDir,
                                   DWORD packageGraphDirsCount, const HSTRING *packageGraphDirs,
                                   DWORD *metaDataFilePathsCount, HSTRING **metaDataFilePaths,
diff --git a/dlls/wintypes/wintypes.spec b/dlls/wintypes/wintypes.spec
index 305344fef42..086332e0d69 100644
--- a/dlls/wintypes/wintypes.spec
+++ b/dlls/wintypes/wintypes.spec
@@ -5,7 +5,7 @@
 @ stub RoCreatePropertySetSerializer
 @ stub RoGetBufferMarshaler
 @ stub RoGetMetaDataFile
-@ stub RoIsApiContractMajorVersionPresent
+@ stdcall RoIsApiContractMajorVersionPresent(wstr long ptr)
 @ stub RoIsApiContractPresent
 @ stub RoParseTypeName
 @ stdcall RoResolveNamespace(ptr ptr long ptr ptr ptr ptr ptr)