1
0
forked from aniani/vim

patch 8.2.4126: crash on exit when built with dynamic Tcl

Problem:    Crash on exit when built with dynamic Tcl and EXITFREE is defined.
            (Dominique Pellé)
Solution:   Only call Tcl_Finalize() when initialized. (closes #9546)
This commit is contained in:
Bram Moolenaar
2022-01-17 21:34:38 +00:00
parent b3d9ceed2b
commit afa76e1cf2
2 changed files with 13 additions and 8 deletions

View File

@@ -248,14 +248,6 @@ vim_tcl_init(char *arg)
#endif
}
#if defined(EXITFREE) || defined(PROTO)
void
vim_tcl_finalize(void)
{
Tcl_Finalize();
}
#endif
#if defined(DYNAMIC_TCL) || defined(PROTO)
static int stubs_initialized = FALSE;
@@ -285,6 +277,17 @@ tcl_enabled(int verbose)
}
return stubs_initialized;
}
#endif
#if defined(EXITFREE) || defined(PROTO)
void
vim_tcl_finalize(void)
{
# ifdef DYNAMIC_TCL
if (stubs_initialized)
# endif
Tcl_Finalize();
}
#endif
void