summaryrefslogtreecommitdiffstats
path: root/generic/tclLoad.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2021-04-07 11:35:02 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2021-04-07 11:35:02 (GMT)
commit171c902b63a5523d44cc6d3337f5030b3cd7f5e8 (patch)
treee1d445d107d76cc1e22184e49d914773749857d7 /generic/tclLoad.c
parent3a03f53f1db809175b0e67ca7881a4f3bee63e7b (diff)
parent66e6bb083068747b4c44da8e94415d802849f8f3 (diff)
downloadtcl-171c902b63a5523d44cc6d3337f5030b3cd7f5e8.zip
tcl-171c902b63a5523d44cc6d3337f5030b3cd7f5e8.tar.gz
tcl-171c902b63a5523d44cc6d3337f5030b3cd7f5e8.tar.bz2
Merge 9.0. Allow "Tcl9" prefix on MacOS
Diffstat (limited to 'generic/tclLoad.c')
-rw-r--r--generic/tclLoad.c6
1 files changed, 5 insertions, 1 deletions
diff --git a/generic/tclLoad.c b/generic/tclLoad.c
index b565eba..64f03a7 100644
--- a/generic/tclLoad.c
+++ b/generic/tclLoad.c
@@ -325,7 +325,11 @@ Tcl_LoadObjCmd(
pkgGuess += 3;
}
#endif /* __CYGWIN__ */
- if ((pkgGuess[0] == 't') && (pkgGuess[1] == 'c')
+ if (((pkgGuess[0] == 't')
+#ifdef MAC_OS_TCL
+ || (pkgGuess[0] == 'T')
+#endif
+ ) && (pkgGuess[1] == 'c')
&& (pkgGuess[2] == 'l') && (pkgGuess[3] == '9')) {
pkgGuess += 4;
}