Implement stubs for OleRenameServerDoc, OleRevertServerDoc and

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/olesvr32.spec

@@ -6,7 +6,7 @@
  6 stdcall OleRegisterServerDoc(ptr str ptr ptr)
  7 stdcall OleRevokeServerDoc(long)
  8 stdcall OleRenameServerDoc(long str)
- 9 stub OleRevertServerDoc
-10 stub OleSavedServerDoc
+ 9 stdcall OleRevertServerDoc(long)
+10 stdcall OleSavedServerDoc(long)
 11 stub OleRevokeObject
 12 stub OleQueryServerVersion

dlls/olesvr/olesvr_main.c

@@ -245,6 +245,16 @@ OLESTATUS WINAPI OleRegisterServerDoc( LHSERVER hServer, LPCSTR docname,
 }
 
 /******************************************************************************
+ *		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(LHSERVERDOC hDoc, LPCSTR newName)
     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;
+}