Implemented CoRevokeClassObject stub needed by Acrobat 3 16 bit.

if1632/compobj.spec

@@ -6,7 +6,7 @@ type	win16
 3 pascal CoUninitialize() CoUninitialize16
 4 pascal CoGetMalloc(long ptr) CoGetMalloc16
 5 pascal CoRegisterClassObject(ptr ptr long long ptr) CoRegisterClassObject16
-6 stub COREVOKECLASSOBJECT
+6 pascal CoRevokeClassObject(long) CoRevokeClassObject16
 7 pascal CoGetClassObject(ptr long ptr ptr ptr) CoGetClassObject
 8 stub COMARSHALINTERFACE
 9 stub COUNMARSHALINTERFACE

ole/compobj.c

@@ -997,6 +997,18 @@ HRESULT WINAPI CoRegisterClassObject16(
 	return 0;
 }
 
+
+/******************************************************************************
+ *      CoRevokeClassObject16 [COMPOBJ.6]
+ *
+ */
+HRESULT WINAPI CoRevokeClassObject16(DWORD dwRegister /* token on class obj */)
+{
+    FIXME("(0x%08lx),stub!\n", dwRegister);
+    return 0;
+}
+
+
 /***
  * COM_GetRegisteredClassObject
  *