ole2.dll16: add a stub for WRITECLASSSTG

[Austin English]

For https://bugs.winehq.org/show_bug.cgi?id=30471

-- 
-Austin
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://www.winehq.org/pipermail/wine-patches/attachments/20141128/532a286b/attachment.html>
-------------- next part --------------
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..057ce6b 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 str) WriteClassStg16
 20 stub READCLASSSTM
 21 stub WRITECLASSSTM
 22 stub BINDMONIKER