ole32: The 16-bit version of CoDisconnectObject is not compatible with the 32-bit version, so create a separate stub for the former.

[Robert Shearman]

---
  dlls/ole32/compobj.c    |    1 -
  dlls/ole32/compobj.spec |    2 +-
  dlls/ole32/ole16.c      |    9 +++++++++
  3 files changed, 10 insertions(+), 2 deletions(-)
-------------- next part --------------
diff --git a/dlls/ole32/compobj.c b/dlls/ole32/compobj.c
index fe180aa..4639831 100644
--- a/dlls/ole32/compobj.c
+++ b/dlls/ole32/compobj.c
@@ -833,7 +833,6 @@ void WINAPI CoUninitialize(void)
 
 /******************************************************************************
  *		CoDisconnectObject	[OLE32.@]
- *		CoDisconnectObject	[COMPOBJ.15]
  *
  * Disconnects all connections to this object from remote processes. Dispatches
  * pending RPCs while blocking new RPCs from occurring, and then calls
diff --git a/dlls/ole32/compobj.spec b/dlls/ole32/compobj.spec
index af94692..078dfc2 100644
--- a/dlls/ole32/compobj.spec
+++ b/dlls/ole32/compobj.spec
@@ -12,7 +12,7 @@
 12 stub COFREEALLLIBRARIES
 13 pascal CoCreateInstance(ptr ptr long ptr ptr) CoCreateInstance16
 14 stub STRINGFROMIID
-15 pascal CoDisconnectObject(ptr long) CoDisconnectObject
+15 pascal CoDisconnectObject(ptr long) CoDisconnectObject16
 16 stub CORELEASEMARSHALDATA
 17 pascal -ret16 CoFreeUnusedLibraries() CoFreeUnusedLibraries
 18 pascal -ret16 IsEqualGUID(ptr ptr) IsEqualGUID16
diff --git a/dlls/ole32/ole16.c b/dlls/ole32/ole16.c
index 410651c..d9c2202 100644
--- a/dlls/ole32/ole16.c
+++ b/dlls/ole32/ole16.c
@@ -648,6 +648,15 @@ HRESULT WINAPI CoCreateInstance16(
 }
 
 /***********************************************************************
+ *           CoDisconnectObject [COMPOBJ.15]
+ */
+HRESULT WINAPI CoDisconnectObject16( LPUNKNOWN lpUnk, DWORD reserved )
+{
+  FIXME("(%p, 0x%08x): stub!\n", lpUnk, reserved);
+  return E_NOTIMPL;
+}
+
+/***********************************************************************
  *           DllGetClassObject                          [OLE2.4]
  */
 HRESULT WINAPI DllGetClassObject16(REFCLSID rclsid, REFIID iid, LPVOID *ppv)