ADW: Fixed COM extension bug #37927. Correct the processing of in/out arguments...

diff --git a/ext/com_dotnet/com_misc.c b/ext/com_dotnet/com_misc.c
index 9008a1458488009abce5f818f800a5215a92f291..a5adaedd36d49ced983b6eec95180d1fab048dfe 100644 (file)
--- a/ext/com_dotnet/com_misc.c
+++ b/ext/com_dotnet/com_misc.c
@@ -79,7 +79,7 @@ PHPAPI void php_com_wrap_variant(zval *z, VARIANT *v,
        VariantInit(&obj->v);
        VariantCopyInd(&obj->v, v);
 
-       if (V_VT(&obj->v) == VT_DISPATCH) {
+       if ((V_VT(&obj->v) == VT_DISPATCH) && (V_DISPATCH(&obj->v) != NULL)) {
                IDispatch_GetTypeInfo(V_DISPATCH(&obj->v), 0, LANG_NEUTRAL, &obj->typeinfo);
        }