[PATCH 1/1] vbscript: Fix memory leak in interp_redim_preserve

[Jason Millard]

From: Jason Millard

---
 dlls/vbscript/interp.c | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/dlls/vbscript/interp.c b/dlls/vbscript/interp.c
index b3be3bea6cf..ee7cde763a6 100644
--- a/dlls/vbscript/interp.c
+++ b/dlls/vbscript/interp.c
@@ -1375,6 +1375,7 @@ static HRESULT interp_redim_preserve(exec_ctx_t *ctx)
     if(array == NULL || array->cDims == 0) {
         /* can initially allocate the array */
         array = SafeArrayCreate(VT_VARIANT, dim_cnt, bounds);
+        free(bounds);
         VariantClear(v);
         V_VT(v) = VT_ARRAY|VT_VARIANT;
         V_ARRAY(v) = array;
@@ -1391,7 +1392,9 @@ static HRESULT interp_redim_preserve(exec_ctx_t *ctx)
                 return MAKE_VBSERROR(VBSE_OUT_OF_BOUNDS);
             }
         }
-        return SafeArrayRedim(array, &bounds[dim_cnt-1]);
+        hres = SafeArrayRedim(array, &bounds[dim_cnt-1]);
+        free(bounds);
+	return hres;
     }
 }