4 * Copyright 1995 Martin von Loewis
7 /* At the moment, these are only empty stubs.
15 LONG OLE_current_handle
;
17 /***********************************************************************
20 OLESTATUS
OleRegisterServer( LPCSTR name
, LPOLESERVER serverStruct
,
21 LHSERVER
*hRet
, HINSTANCE16 hServer
,
24 dprintf_ole(stdnimp
,"OleRegisterServer:%s\n",name
);
25 *hRet
=++OLE_current_handle
;
26 /* return OLE_ERROR_MEMORY, OLE_ERROR_PROTECT_ONLY if you want it fail*/
30 /***********************************************************************
33 OLESTATUS
OleBlockServer(LHSERVER hServer
)
35 fprintf(stdnimp
,"OleBlockServer:%ld\n",hServer
);
39 /***********************************************************************
42 OLESTATUS
OleUnblockServer(LHSERVER hServer
, BOOL
*block
)
44 fprintf(stdnimp
,"OleUnblockServer:%ld\n",hServer
);
45 /* no more blocked messages :) */
50 /***********************************************************************
51 * OleRegisterServerDoc
53 OLESTATUS
OleRegisterServerDoc( LHSERVER hServer
, LPCSTR docname
,
54 LPOLESERVERDOC document
, LHSERVERDOC
*hRet
)
56 dprintf_ole(stdnimp
,"OleRegisterServerDoc:%ld,%s\n", hServer
, docname
);
57 *hRet
=++OLE_current_handle
;
61 /***********************************************************************
64 OLESTATUS
OleRevokeServerDoc(LHSERVERDOC hServerDoc
)
66 dprintf_ole(stdnimp
,"OleRevokeServerDoc:%ld\n",hServerDoc
);
70 /***********************************************************************
73 OLESTATUS
OleRevokeServer(LHSERVER hServer
)
75 dprintf_ole(stdnimp
,"OleRevokeServer:%ld\n",hServer
);