ole2: DllGetClassObject, Ole[GS]etClipboard (take 2)

[Dimitrie O. Paun]

Sorry, the previous one had a small typo in it.
Please use this one instead.

ChangeLog
  Stubs for DllGetClassObject, Ole[GS]etClipboard in ole2.

Index: dlls/ole32/ole2.spec
===================================================================
RCS file: /var/cvs/wine/dlls/ole32/ole2.spec,v
retrieving revision 1.5
diff -u -r1.5 ole2.spec
--- dlls/ole32/ole2.spec	5 Jan 2003 01:04:34 -0000	1.5
+++ dlls/ole32/ole2.spec	5 Jan 2003 17:13:16 -0000
@@ -1,7 +1,7 @@
 1 pascal OleBuildVersion() OleBuildVersion
 2 pascal OleInitialize(ptr) OleInitialize
 3 pascal OleUninitialize() OleUninitialize
-4 stub DLLGETCLASSOBJECT
+4 pascal DllGetClassObject(ptr ptr ptr) DllGetClassObject16
 #5 WEP
 6 stub OLEQUERYLINKFROMDATA
 7 stub OLEQUERYCREATEFROMDATA
@@ -46,8 +46,8 @@
 46 stub MONIKERRELATIVEPATHTO
 47 stub MONIKERCOMMONPREFIXWITH
 48 stub ISACCELERATOR
-49 stub OLESETCLIPBOARD
-50 stub OLEGETCLIPBOARD
+49 pascal OleSetClipboard(ptr) OleSetClipboard16
+50 pascal OleGetClipboard(ptr) OleGetClipboard16
 51 stub OLEDUPLICATEDATA
 52 stub OLEGETICONOFFILE
 53 stub OLEGETICONOFCLASS
Index: dlls/ole32/ole2stubs.c
===================================================================
RCS file: /var/cvs/wine/dlls/ole32/ole2stubs.c,v
retrieving revision 1.26
diff -u -r1.26 ole2stubs.c
--- dlls/ole32/ole2stubs.c	2 Dec 2002 18:10:58 -0000	1.26
+++ dlls/ole32/ole2stubs.c	5 Jan 2003 23:30:57 -0000
@@ -262,3 +262,31 @@
   FIXME("%s\n", debugstr_guid(clsid));
   return FALSE;
 }
+
+/***********************************************************************
+ *           DllGetClassObject                          [OLE2.4]
+ */
+HRESULT WINAPI DllGetClassObject16(REFCLSID rclsid, REFIID iid, LPVOID *ppv)
+{
+  FIXME("(%s, %s, %p): stub\n", debugstr_guid(rclsid), debugstr_guid(iid), ppv);
+  return E_NOTIMPL;
+}
+
+/***********************************************************************
+ *           OleSetClipboard                            [OLE2.49]
+ */
+HRESULT WINAPI OleSetClipboard16(IDataObject* pDataObj)
+{
+  FIXME("(%p): stub\n", pDataObj);
+  return S_OK;
+}
+
+/***********************************************************************
+ *           OleGetClipboard                            [OLE2.50]
+ */
+HRESULT WINAPI OleGetClipboard16(IDataObject** ppDataObj)
+{
+  FIXME("(%p): stub\n", ppDataObj);
+  return E_NOTIMPL;
+}
+

-- 
Dimi.