ReceiveTempSMS/Sweden-Number
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

vbscript: Release the code list when the script is closed.

Browse Source 
Signed-off-by: Gabriel Ivăncescu <gabrielopcode@gmail.com>
Signed-off-by: Jacek Caban <jacek@codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard@winehq.org>
This commit is contained in:
Gabriel Ivăncescu 2019-11-07 19:30:22 +01:00 committed by Alexandre Julliard
parent c01b4bdebe
commit d481efee39
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
dlls/vbscript/vbscript.c
View File

@ -193,13 +193,10 @@ static void release_script(script_ctx_t *ctx)
heap_pool_init(&ctx->heap); heap_pool_init(&ctx->heap);
} }
static void destroy_script(script_ctx_t *ctx) static void release_code_list(script_ctx_t *ctx)
{ {
while(!list_empty(&ctx->code_list)) while(!list_empty(&ctx->code_list))
release_vbscode(LIST_ENTRY(list_head(&ctx->code_list), vbscode_t, entry)); release_vbscode(LIST_ENTRY(list_head(&ctx->code_list), vbscode_t, entry));
release_script(ctx);
heap_free(ctx);
} }
static void decrease_state(VBScript *This, SCRIPTSTATE state) static void decrease_state(VBScript *This, SCRIPTSTATE state)
@ -221,6 +218,8 @@ static void decrease_state(VBScript *This, SCRIPTSTATE state)
break; break;
release_script(This->ctx); release_script(This->ctx);
This->thread_id = 0; This->thread_id = 0;
if(state == SCRIPTSTATE_CLOSED)
release_code_list(This->ctx);
break; break;
case SCRIPTSTATE_CLOSED: case SCRIPTSTATE_CLOSED:
break; break;
@ -396,7 +395,7 @@ static ULONG WINAPI VBScript_Release(IActiveScript *iface)
if(!ref) { if(!ref) {
decrease_state(This, SCRIPTSTATE_CLOSED); decrease_state(This, SCRIPTSTATE_CLOSED);
destroy_script(This->ctx); heap_free(This->ctx);
heap_free(This); heap_free(This);
} }