hresult is returned if no return type is specified

diff --git a/ext/com/COM.c b/ext/com/COM.c
index aeae84ddcfefc9fd2616e06941216f25bfe0029e..3b455c1e9c128b8b3d4a6aef918ffbf08d571f2c 100644 (file)
--- a/ext/com/COM.c
+++ b/ext/com/COM.c
@@ -162,6 +162,13 @@ PHPAPI HRESULT php_COM_invoke(comval *obj, DISPID dispIdMember, WORD wFlags, DIS
                        }
                }
 
+               if(!pVarResult)
+               {
+                       VariantInit(pVarResult);
+                       V_VT(pVarResult) = VT_I4;
+                       V_I4(pVarResult) = hr;
+               }
+
                return hr;
        }
        else

diff --git a/ext/rpc/com/com_wrapper.c b/ext/rpc/com/com_wrapper.c
index aeae84ddcfefc9fd2616e06941216f25bfe0029e..3b455c1e9c128b8b3d4a6aef918ffbf08d571f2c 100644 (file)
--- a/ext/rpc/com/com_wrapper.c
+++ b/ext/rpc/com/com_wrapper.c
@@ -162,6 +162,13 @@ PHPAPI HRESULT php_COM_invoke(comval *obj, DISPID dispIdMember, WORD wFlags, DIS
                        }
                }
 
+               if(!pVarResult)
+               {
+                       VariantInit(pVarResult);
+                       V_VT(pVarResult) = VT_I4;
+                       V_I4(pVarResult) = hr;
+               }
+
                return hr;
        }
        else