summaryrefslogtreecommitdiffstats
path: root/generic/tclLoad.c
diff options
context:
space:
mode:
authorjan.nijtmans <jan.nijtmans@noemail.net>2012-03-04 16:39:48 (GMT)
committerjan.nijtmans <jan.nijtmans@noemail.net>2012-03-04 16:39:48 (GMT)
commit50b2868e84c072cf30e3a3200835f72ff583fc5d (patch)
treee40bc3bcd27564c210916245866b4881d50cf89e /generic/tclLoad.c
parent2f15356cc4b574cf80f7d7bef8d9002b7239cd43 (diff)
parent8da60d747906312c7003ef479fe7382231277802 (diff)
downloadtcl-50b2868e84c072cf30e3a3200835f72ff583fc5d.zip
tcl-50b2868e84c072cf30e3a3200835f72ff583fc5d.tar.gz
tcl-50b2868e84c072cf30e3a3200835f72ff583fc5d.tar.bz2
Patch from the cygwin folks
FossilOrigin-Name: 09cd534bb6f0dea416e6fe28123dd6c68aaeeba5
Diffstat (limited to 'generic/tclLoad.c')
-rw-r--r--generic/tclLoad.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/generic/tclLoad.c b/generic/tclLoad.c
index 820707e..202e66a 100644
--- a/generic/tclLoad.c
+++ b/generic/tclLoad.c
@@ -305,6 +305,12 @@ Tcl_LoadObjCmd(
&& (pkgGuess[2] == 'b')) {
pkgGuess += 3;
}
+#ifdef __CYGWIN__
+ if ((pkgGuess[0] == 'c') && (pkgGuess[1] == 'y')
+ && (pkgGuess[2] == 'g')) {
+ pkgGuess += 3;
+ }
+#endif /* __CYGWIN__ */
for (p = pkgGuess; *p != 0; p += offset) {
offset = Tcl_UtfToUniChar(p, &ch);
if ((ch > 0x100)