diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-02-23 13:30:01 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-02-23 13:30:01 (GMT) |
| commit | 5c8ce61f7963bdd41e0d7c9d18a7b4e5f918eb35 (patch) | |
| tree | f6bba9b64f34a1b2b941103e05773ffe545c1e91 /win/tclWinFile.c | |
| parent | 06ea55d820a91810fe57afda632449d0bca2fe52 (diff) | |
| parent | 4723df2a35ce7e7a2d460213d01c361be26a1772 (diff) | |
| download | tcl-5c8ce61f7963bdd41e0d7c9d18a7b4e5f918eb35.zip tcl-5c8ce61f7963bdd41e0d7c9d18a7b4e5f918eb35.tar.gz tcl-5c8ce61f7963bdd41e0d7c9d18a7b4e5f918eb35.tar.bz2 | |
Merge 8.6. Fix Cygwin compile
Diffstat (limited to 'win/tclWinFile.c')
| -rw-r--r-- | win/tclWinFile.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/win/tclWinFile.c b/win/tclWinFile.c index f89b522..1e0aca7 100644 --- a/win/tclWinFile.c +++ b/win/tclWinFile.c @@ -885,7 +885,7 @@ TclpFindExecutable( Tcl_SetPanicProc(tclWinDebugPanic); } - GetModuleFileNameW(NULL, wName, MAX_PATH); + GetModuleFileNameW(NULL, wName, sizeof(wName)/sizeof(WCHAR)); WideCharToMultiByte(CP_UTF8, 0, wName, -1, name, sizeof(name), NULL, NULL); TclWinNoBackslash(name); TclSetObjNameOfExecutable(Tcl_NewStringObj(name, -1), NULL); |