summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorapnadkarni <apnmbx-wits@yahoo.com>2023-10-20 17:01:48 (GMT)
committerapnadkarni <apnmbx-wits@yahoo.com>2023-10-20 17:01:48 (GMT)
commitd5396e3590b3fbcab61454db55688bd81fe1a59d (patch)
tree9b8dc4275cc85df69ddf75c91d2d6b05bef62184
parent6aa2bc6d5c78c18a1562bdae776914890037f24f (diff)
downloadtcl-d5396e3590b3fbcab61454db55688bd81fe1a59d.zip
tcl-d5396e3590b3fbcab61454db55688bd81fe1a59d.tar.gz
tcl-d5396e3590b3fbcab61454db55688bd81fe1a59d.tar.bz2
Potential fix
-rw-r--r--generic/tclZipfs.c3
1 files changed, 3 insertions, 0 deletions
diff --git a/generic/tclZipfs.c b/generic/tclZipfs.c
index 6ef921a..c7a194a 100644
--- a/generic/tclZipfs.c
+++ b/generic/tclZipfs.c
@@ -6287,6 +6287,9 @@ ZipfsAppHookFindTclInit(
void TclZipfsFinalize(void)
{
+ if (!TclInExit())
+ return;
+
/*
* Finalization steps:
* For every mounted archive, if it no longer has any open handles