Austin English : ole2: Add a stub for WriteClassStg.

[Alexandre Julliard]

Module: wine
Branch: master
Commit: b017bdcab3aba20461fb870dec7fd8d672653c4e
URL:    http://source.winehq.org/git/wine.git/?a=commit;h=b017bdcab3aba20461fb870dec...

Author: Austin English 
Date:   Fri Nov 28 15:03:40 2014 -0600

ole2: Add a stub for WriteClassStg.

---

dlls/ole2.dll16/ole2.c          | 9 +++++++++
 dlls/ole2.dll16/ole2.dll16.spec | 2 +-
 2 files changed, 10 insertions(+), 1 deletion(-)

diff --git a/dlls/ole2.dll16/ole2.c b/dlls/ole2.dll16/ole2.c
index 25fb141..3a27132 100644
--- a/dlls/ole2.dll16/ole2.c
+++ b/dlls/ole2.dll16/ole2.c
@@ -346,3 +346,12 @@ VOID WINAPI ReleaseStgMedium16(LPSTGMEDIUM medium)
 {
     FIXME("%p: unimplemented stub!\n", medium);
 }
+
+/***********************************************************************
+ *              WriteClassStg16 (OLE2.19)
+ */
+HRESULT WINAPI WriteClassStg16(IStorage *stg, REFCLSID clsid)
+{
+    FIXME("stub:%p %s\n", stg, debugstr_guid(clsid));
+    return STG_E_MEDIUMFULL;
+}
diff --git a/dlls/ole2.dll16/ole2.dll16.spec b/dlls/ole2.dll16/ole2.dll16.spec
index 5c6e9c0..cb6b1ec 100644
--- a/dlls/ole2.dll16/ole2.dll16.spec
+++ b/dlls/ole2.dll16/ole2.dll16.spec
@@ -16,7 +16,7 @@
 16 stub OLEISRUNNING
 17 stub OLELOCKRUNNING
 18 pascal ReadClassStg(segptr ptr) ReadClassStg16
-19 stub WRITECLASSSTG
+19 pascal WriteClassStg(segptr ptr) WriteClassStg16
 20 stub READCLASSSTM
 21 stub WRITECLASSSTM
 22 stub BINDMONIKER