resSAFEARRAY :: ArgRes SAFEARRAY
resSAFEARRAY p       = do
            x <- readVarSAFEARRAY (castPtr p) (fromIntegral (fromEnum VT_VARIANT))
            doThenFree free (readSAFEARRAY True) (castPtr x)
resSAFEARRAY :: ArgRes SAFEARRAY
resSAFEARRAY p       = do
            x <- readVarSAFEARRAY (castPtr p) (fromIntegral (fromEnum VT_VARIANT))
            doThenFree free (readSAFEARRAY True) (castPtr x)
resSAFEARRAY p       = do
            x <- readVarSAFEARRAY (castPtr p) (fromIntegral (fromEnum VT_VARIANT))
            doThenFree free (readSAFEARRAY True) (castPtr x)