From c7269f862748c3b0f56b5a651019e18c7d5190ee Mon Sep 17 00:00:00 2001 From: Bram Moolenaar Date: Sun, 5 Dec 2021 11:36:23 +0000 Subject: 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(). --- src/if_tcl.c | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 'src/if_tcl.c') diff --git a/src/if_tcl.c b/src/if_tcl.c index f3f4b0798a..4838e31976 100644 --- a/src/if_tcl.c +++ b/src/if_tcl.c @@ -248,6 +248,14 @@ 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; -- cgit v1.2.3