jscript: Release named items in IActiveScript::Close.

44333104 · Jacek Caban · Alexandre Julliard · 0c6b804e · 44333104
Commit 44333104 authored Sep 10, 2008 by Jacek Caban Committed by Alexandre Julliard Sep 11, 2008
Hide whitespace changes
Inline Side-by-side

Showing with 15 additions and 0 deletions

jscript.c dlls/jscript/jscript.c +15 -0

No files found.
--- 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);