byref really means that we want the zval...

diff --git a/ext/rpc/com/com.c b/ext/rpc/com/com.c
index c95357a997d84229b132eccdcaeffcdde4b74ab5..2d5a81cb2e5157ebb63cad1ec230b372f15059f4 100644 (file)
--- a/ext/rpc/com/com.c
+++ b/ext/rpc/com/com.c
@@ -539,15 +539,14 @@ static inline void vt_type_to_zpp_string(ELEMDESC *elem, smart_str *argtypes_str
                }
        }
 
-       smart_str_appendl(argtypes_str, &zppflag, 1);
        if (ref) {
-               smart_str_appendl(argtypes_str, "/", 1);
+               smart_str_appendl(argtypes_str, "z/", 2);
                *argflags = BYREF_FORCE;
        } else {
                *argflags = BYREF_NONE;
-       }
-       if (nullable) {
-               smart_str_appendl(argtypes_str, "!", 1);
+               if (nullable) {
+                       smart_str_appendl(argtypes_str, "!", 1);
+               }
        }
 }