Re: Stubs for olesvr

[Pavel Roskin <proski@gnu.org>]

Hi!

Sorry, forgot the attachment.

-- 
Regards,
Pavel Roskin

--- dlls/olesvr/olesvr.spec
+++ dlls/olesvr/olesvr.spec
@@ -5,9 +5,9 @@
 5  pascal OleUnblockServer(long ptr) OleUnblockServer16
 6  pascal OleRegisterServerDoc(long str ptr ptr) OleRegisterServerDoc16
 7  pascal OleRevokeServerDoc(long) OleRevokeServerDoc16
-8 stub OLERENAMESERVERDOC
-9 stub OLEREVERTSERVERDOC
-10 stub OLESAVEDSERVERDOC
+8  pascal OleRenameServerDoc(long str) OleRenameServerDoc16
+9  pascal OleRevertServerDoc(long) OleRevertServerDoc16
+10 pascal OleSavedServerDoc(long) OleSavedServerDoc16
 11 stub OLEREVOKEOBJECT
 12 stub OLEQUERYSERVERVERSION
 21 stub SRVRWNDPROC
--- dlls/olesvr/olesvr_main.c
+++ dlls/olesvr/olesvr_main.c
@@ -245,6 +245,16 @@ OLESTATUS WINAPI OleRegisterServerDoc( L
 }
 
 /******************************************************************************
+ *		OleRenameServerDoc	[OLESVR.8]
+ *
+ */
+OLESTATUS WINAPI OleRenameServerDoc16(LHSERVERDOC hDoc, LPCSTR newName)
+{
+    FIXME("(%ld,%s): stub.\n", hDoc, newName);
+    return OLE_OK;
+}
+
+/******************************************************************************
  *		OleRenameServerDoc	[OLESVR32.8]
  *
  */
@@ -253,3 +263,43 @@ OLESTATUS WINAPI OleRenameServerDoc(LHSE
     FIXME("(%ld,%s): stub.\n",hDoc, newName);
     return OLE_OK;
 }
+
+/******************************************************************************
+ *		OleRevertServerDoc	[OLESVR.9]
+ *
+ */
+OLESTATUS WINAPI OleRevertServerDoc16(LHSERVERDOC hDoc)
+{
+    FIXME("(%ld): stub.\n", hDoc);
+    return OLE_OK;
+}
+
+/******************************************************************************
+ *		OleRevertServerDoc	[OLESVR32.9]
+ *
+ */
+OLESTATUS WINAPI OleRevertServerDoc(LHSERVERDOC hDoc)
+{
+    FIXME("(%ld): stub.\n", hDoc);
+    return OLE_OK;
+}
+
+/******************************************************************************
+ *		OleSavedServerDoc	[OLESVR.10]
+ *
+ */
+OLESTATUS WINAPI OleSavedServerDoc16(LHSERVERDOC hDoc)
+{
+    FIXME("(%ld): stub.\n", hDoc);
+    return OLE_OK;
+}
+
+/******************************************************************************
+ *		OleSavedServerDoc	[OLESVR32.10]
+ *
+ */
+OLESTATUS WINAPI OleSavedServerDoc(LHSERVERDOC hDoc)
+{
+    FIXME("(%ld): stub.\n", hDoc);
+    return OLE_OK;
+}