diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-04-07 11:35:02 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-04-07 11:35:02 (GMT) |
commit | 171c902b63a5523d44cc6d3337f5030b3cd7f5e8 (patch) | |
tree | e1d445d107d76cc1e22184e49d914773749857d7 /generic/tclLoad.c | |
parent | 3a03f53f1db809175b0e67ca7881a4f3bee63e7b (diff) | |
parent | 66e6bb083068747b4c44da8e94415d802849f8f3 (diff) | |
download | tcl-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.c | 6 |
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; } |