diff options
Diffstat (limited to 'ext/tcltklib/tcltklib.c')
| -rw-r--r-- | ext/tcltklib/tcltklib.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/ext/tcltklib/tcltklib.c b/ext/tcltklib/tcltklib.c index 84a999d7e..3febc4331 100644 --- a/ext/tcltklib/tcltklib.c +++ b/ext/tcltklib/tcltklib.c @@ -3094,6 +3094,7 @@ ip_delete(self) { struct tcltkip *ptr = get_ip(self); + del_root(ptr->ip); Tcl_DeleteInterp(ptr->ip); return Qnil; |