Skip to content

W
wine-cw
Commit bac5fdc8 authored by Jacek Caban's avatar Jacek Caban Committed by Alexandre Julliard
Browse files
Options

vbscript: Fixed class_desc_t leak.

parent bc8876f9
Hide whitespace changes
Inline Side-by-side
Showing with 9 additions and 0 deletions
dlls/vbscript/vbscript.c
View file @ bac5fdc8
...@@ -115,6 +115,8 @@ static HRESULT set_ctx_site(VBScript *This) ...@@ -115,6 +115,8 @@ static HRESULT set_ctx_site(VBScript *This)
static void release_script(script_ctx_t *ctx) static void release_script(script_ctx_t *ctx)
{ {
class_desc_t *class_desc;
collect_objects(ctx); collect_objects(ctx);
release_dynamic_vars(ctx->global_vars); release_dynamic_vars(ctx->global_vars);
...@@ -130,6 +132,13 @@ static void release_script(script_ctx_t *ctx) ...@@ -130,6 +132,13 @@ static void release_script(script_ctx_t *ctx)
heap_free(iter); heap_free(iter);
} }
while(ctx->procs) {
class_desc = ctx->procs;
ctx->procs = class_desc->next;
heap_free(class_desc);
}
if(ctx->host_global) { if(ctx->host_global) {
IDispatch_Release(ctx->host_global); IDispatch_Release(ctx->host_global);
ctx->host_global = NULL; ctx->host_global = NULL;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment