check-hresult macro checks the hresult and returns if the it is one of the 'succeeded' values, for instance
S_FALSE. Otherwise it signals an error of type
com-error, which will include the function-name in its message.
(check-hresult S_OK "test") => nil
LispWorks COM/Automation User Guide and Reference Manual - 23 Mar 2017