From 44333104ced7668f10345f4053a2f1d62a0cf43d Mon Sep 17 00:00:00 2001
From: Jacek Caban <jacek@codeweavers.com>
Date: Wed, 10 Sep 2008 21:09:29 +0200
Subject: [PATCH] jscript: Release named items in IActiveScript::Close.

---
 dlls/jscript/jscript.c | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/dlls/jscript/jscript.c b/dlls/jscript/jscript.c
index 5646cb8cf7d..e1dde4333a0 100644
--- a/dlls/jscript/jscript.c
+++ b/dlls/jscript/jscript.c
@@ -305,6 +305,21 @@ static HRESULT WINAPI JScript_Close(IActiveScript *iface)
 
     clear_script_queue(This);
 
+    if(This->ctx->named_items) {
+        named_item_t *iter, *iter2;
+
+        iter = This->ctx->named_items;
+        while(iter) {
+            iter2 = iter->next;
+
+            IDispatch_Release(iter->disp);
+            heap_free(iter);
+            iter = iter2;
+        }
+
+        This->ctx->named_items = NULL;
+    }
+
     if(This->ctx) {
         change_state(This, SCRIPTSTATE_CLOSED);