diff options
| author | nijtmans <nijtmans> | 2010-09-18 05:40:30 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans> | 2010-09-18 05:40:30 (GMT) |
| commit | 016c321c87cc9fca491341c2d72be7f583619c90 (patch) | |
| tree | 69d8374e2001743692c8dc3e06ebccd8fefec0f0 /win/tclWinFCmd.c | |
| parent | 03e22d0be578c5b8bd67f3a4deac0feedcaf7f14 (diff) | |
| download | tcl-016c321c87cc9fca491341c2d72be7f583619c90.zip tcl-016c321c87cc9fca491341c2d72be7f583619c90.tar.gz tcl-016c321c87cc9fca491341c2d72be7f583619c90.tar.bz2 | |
[Bug 3069278]: breakage on head Windows triggered
by install-tzdata. Temporary don't compile this with -DUNICODE, while investigating this bug.
Diffstat (limited to 'win/tclWinFCmd.c')
| -rw-r--r-- | win/tclWinFCmd.c | 16 |
1 files changed, 12 insertions, 4 deletions
diff --git a/win/tclWinFCmd.c b/win/tclWinFCmd.c index 7698215..156db19 100644 --- a/win/tclWinFCmd.c +++ b/win/tclWinFCmd.c @@ -9,9 +9,17 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclWinFCmd.c,v 1.65 2010/09/08 21:02:42 dgp Exp $ + * RCS: @(#) $Id: tclWinFCmd.c,v 1.66 2010/09/18 05:42:26 nijtmans Exp $ */ +/* TODO: This file does not compile in UNICODE mode. + * See [Freq 2965056]: Windows build with -DUNICODE + * and + * [Bug 3069278]: breakage on head Windows triggered by install-tzdata + */ +#undef UNICODE +#undef _UNICODE + #include "tclWinInt.h" /* @@ -331,8 +339,8 @@ DoRenameFile( TCHAR *nativeSrcRest, *nativeDstRest; const char **srcArgv, **dstArgv; int size, srcArgc, dstArgc; - TCHAR nativeSrcPath[MAX_PATH]; - TCHAR nativeDstPath[MAX_PATH]; + TCHAR nativeSrcPath[MAX_PATH * 2]; + TCHAR nativeDstPath[MAX_PATH * 2]; Tcl_DString srcString, dstString; const char *src, *dst; @@ -468,7 +476,7 @@ DoRenameFile( TCHAR *nativeRest, *nativeTmp, *nativePrefix; int result, size; - TCHAR tempBuf[MAX_PATH]; + TCHAR tempBuf[MAX_PATH * 2]; size = tclWinProcs->getFullPathNameProc(nativeDst, MAX_PATH, tempBuf, &nativeRest); |