reactos/lib/sdk/comsupp/comsupp.cpp
Hermès Bélusca-Maïto bb519801e2 - Sync with trunk r58248 to bring the latest changes from Amine (headers) and others (hebrew translation, etc...)
- Include only the necessary headers in csrss/csrsrv/basesrv/consrv/winsrv.

svn path=/branches/ros-csrss/; revision=58249
2013-01-28 22:45:53 +00:00

48 lines
1.1 KiB
C++

/*
* PROJECT: ReactOS crt library
* LICENSE: GPLv2+ - See COPYING in the top level directory
* PURPOSE: Compiler support for COM
* PROGRAMMER: Thomas Faber
*/
#include <comdef.h>
#include <comutil.h>
/* comdef.h */
typedef void WINAPI COM_ERROR_HANDLER(HRESULT, IErrorInfo *);
static COM_ERROR_HANDLER *com_error_handler;
void WINAPI _com_raise_error(HRESULT hr, IErrorInfo *perrinfo)
{
throw _com_error(hr, perrinfo);
}
void WINAPI _set_com_error_handler(COM_ERROR_HANDLER *phandler)
{
com_error_handler = phandler;
}
void WINAPI _com_issue_error(HRESULT hr)
{
com_error_handler(hr, NULL);
}
void WINAPI _com_issue_errorex(HRESULT hr, IUnknown *punk, REFIID riid)
{
void *pv;
IErrorInfo *perrinfo = NULL;
if (SUCCEEDED(punk->QueryInterface(riid, &pv)))
{
ISupportErrorInfo *pserrinfo = static_cast<ISupportErrorInfo *>(pv);
if (pserrinfo->InterfaceSupportsErrorInfo(riid) == S_OK)
(void)GetErrorInfo(0, &perrinfo);
pserrinfo->Release();
}
com_error_handler(hr, perrinfo);
}
/* comutil.h */
_variant_t vtMissing(DISP_E_PARAMNOTFOUND, VT_ERROR);