forked from aniani/vim
patch 8.2.3740: memory left allocated on exit when using Tcl
Problem: Memory left allocated on exit when using Tcl. Solution: Call Tcl_Finalize().
This commit is contained in:
@@ -573,6 +573,9 @@ free_all_mem(void)
|
|||||||
# endif
|
# endif
|
||||||
# ifdef FEAT_GUI_GTK
|
# ifdef FEAT_GUI_GTK
|
||||||
gui_mch_free_all();
|
gui_mch_free_all();
|
||||||
|
# endif
|
||||||
|
# ifdef FEAT_TCL
|
||||||
|
vim_tcl_finalize();
|
||||||
# endif
|
# endif
|
||||||
clear_hl_tables();
|
clear_hl_tables();
|
||||||
|
|
||||||
|
@@ -248,6 +248,14 @@ vim_tcl_init(char *arg)
|
|||||||
#endif
|
#endif
|
||||||
}
|
}
|
||||||
|
|
||||||
|
#if defined(EXITFREE) || defined(PROTO)
|
||||||
|
void
|
||||||
|
vim_tcl_finalize(void)
|
||||||
|
{
|
||||||
|
Tcl_Finalize();
|
||||||
|
}
|
||||||
|
#endif
|
||||||
|
|
||||||
#if defined(DYNAMIC_TCL) || defined(PROTO)
|
#if defined(DYNAMIC_TCL) || defined(PROTO)
|
||||||
|
|
||||||
static int stubs_initialized = FALSE;
|
static int stubs_initialized = FALSE;
|
||||||
|
@@ -1,5 +1,6 @@
|
|||||||
/* if_tcl.c */
|
/* if_tcl.c */
|
||||||
void vim_tcl_init(char *arg);
|
void vim_tcl_init(char *arg);
|
||||||
|
void vim_tcl_finalize(void);
|
||||||
int tcl_enabled(int verbose);
|
int tcl_enabled(int verbose);
|
||||||
void tcl_end(void);
|
void tcl_end(void);
|
||||||
void ex_tcl(exarg_T *eap);
|
void ex_tcl(exarg_T *eap);
|
||||||
|
@@ -753,6 +753,8 @@ static char *(features[]) =
|
|||||||
|
|
||||||
static int included_patches[] =
|
static int included_patches[] =
|
||||||
{ /* Add new patch number below this line */
|
{ /* Add new patch number below this line */
|
||||||
|
/**/
|
||||||
|
3740,
|
||||||
/**/
|
/**/
|
||||||
3739,
|
3739,
|
||||||
/**/
|
/**/
|
||||||
|
Reference in New Issue
Block a user