ole2.dll16: Add a stub for ReleaseStgMedium.

diff --git a/dlls/ole2.dll16/ole2.c b/dlls/ole2.dll16/ole2.c
index c15894995233f245d2e28049752d489e66a5fc0e..275e9ffc47738ad1ab58d5d8c5552854a42089aa 100644 (file)
--- a/dlls/ole2.dll16/ole2.c
+++ b/dlls/ole2.dll16/ole2.c
@@ -333,7 +333,16 @@ HRESULT WINAPI ReadClassStg16(SEGPTR pstg, CLSID *pclsid)
 /***********************************************************************
  *              GetConvertStg (OLE2.82)
  */
-HRESULT WINAPI GetConvertStg16(LPSTORAGE stg) {
+HRESULT WINAPI GetConvertStg16(LPSTORAGE stg)
+{
     FIXME("unimplemented stub!\n");
     return E_FAIL;
 }
+
+/***********************************************************************
+ *              ReleaseStgMedium (OLE2.32)
+ */
+VOID WINAPI ReleaseStgMedium16(LPSTGMEDIUM medium)
+{
+    FIXME("%p: unimplemented stub!\n", medium);
+}

diff --git a/dlls/ole2.dll16/ole2.dll16.spec b/dlls/ole2.dll16/ole2.dll16.spec
index d5d8947d0525731ee272199ca596d70076ee0b7d..5c6e9c04f8e80b36492ed17510688167deee03fa 100644 (file)
--- a/dlls/ole2.dll16/ole2.dll16.spec
+++ b/dlls/ole2.dll16/ole2.dll16.spec
@@ -29,7 +29,7 @@
 29 stub CREATEGENERICCOMPOSITE
 30 pascal GetRunningObjectTable(long ptr) GetRunningObjectTable16
 31 stub OLEGETMALLOC
-32 stub RELEASESTGMEDIUM
+32 pascal ReleaseStgMedium(ptr) ReleaseStgMedium16
 33 stub READSTRINGSTREAM
 34 stub WRITESTRINGSTREAM
 35 pascal RegisterDragDrop(word segptr) RegisterDragDrop16