From 7db81aeb67ce1bba1ea8fcf9167ca0147e2cfe32 Mon Sep 17 00:00:00 2001
From: Rob Shearman <robertshearman@gmail.com>
Date: Wed, 30 Dec 2009 17:33:48 +0000
Subject: [PATCH] jscript: Make sure retv pointer is initialised in exec_source
 even if no value needs to be returned.

---
 dlls/jscript/engine.c | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/dlls/jscript/engine.c b/dlls/jscript/engine.c
index b9c40ae23c1..653aca37a33 100644
--- a/dlls/jscript/engine.c
+++ b/dlls/jscript/engine.c
@@ -493,8 +493,12 @@ HRESULT exec_source(exec_ctx_t *ctx, parser_ctx_t *parser, source_elements_t *so
 
     if(retv && (exec_type == EXECT_EVAL || rt.type == RT_RETURN))
         *retv = val;
-    else
+    else {
+        if (retv) {
+            VariantInit(retv);
+        }
         VariantClear(&val);
+    }
     return S_OK;
 }