




 
An integer giving the 
hresult
 of the error.
Either 
nil
 or a string or symbol describing the function that generated the error.
The class 
com-error
 is used by the Lisp COM API when signalling errors that originate as 
hresult
 code from COM.
This function silently ignores the 
E_NOINTERFACE
 error:
(defun call-ignoring-nointerface-error (function)
(handler-bind
((com-error
#'(lambda (condition)
(when (hresult-equal (com-error-hresult
condition)
E_NOINTERFACE)
(return-from
call-ignoring-nointerface-error
nil)))))
(funcall function)))