summaryrefslogtreecommitdiff
path: root/src/if_tcl.c
diff options
context:
space:
mode:
authorBram Moolenaar <Bram@vim.org>2021-12-05 11:36:23 +0000
committerBram Moolenaar <Bram@vim.org>2021-12-05 11:36:23 +0000
commitc7269f862748c3b0f56b5a651019e18c7d5190ee (patch)
tree09680ace5adda3503ae6589ebcf1b26947f36194 /src/if_tcl.c
parentdea4a616376c6500894c16e26057ce16d7ef9f0e (diff)
downloadvim-git-c7269f862748c3b0f56b5a651019e18c7d5190ee.tar.gz
patch 8.2.3740: memory left allocated on exit when using Tclv8.2.3740
Problem: Memory left allocated on exit when using Tcl. Solution: Call Tcl_Finalize().
Diffstat (limited to 'src/if_tcl.c')
-rw-r--r--src/if_tcl.c8
1 files changed, 8 insertions, 0 deletions
diff --git a/src/if_tcl.c b/src/if_tcl.c
index f3f4b0798..4838e3197 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;