diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2015-10-08 14:41:46 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2015-10-08 14:41:46 (GMT) |
commit | 8d774cfa0b1b8d498a49a67811e70f56bef37d15 (patch) | |
tree | 6536ed8e4e2b792c8a24b07fe63701c5f7bde8c1 /win/tclWinFile.c | |
parent | fe2ac816b01c0fc23cae4f31835c5797274b5e90 (diff) | |
download | tcl-8d774cfa0b1b8d498a49a67811e70f56bef37d15.zip tcl-8d774cfa0b1b8d498a49a67811e70f56bef37d15.tar.gz tcl-8d774cfa0b1b8d498a49a67811e70f56bef37d15.tar.bz2 |
Decorate Tcl_Exit() and Tcl_SetExitProc()'s argument with TCL_NORETURN as appropriate, as already done with Tcl_Panic() earlier.
Fix minor msvc compiler warning in tclWinFile.c
Diffstat (limited to 'win/tclWinFile.c')
-rwxr-xr-x | win/tclWinFile.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/win/tclWinFile.c b/win/tclWinFile.c index be9c947..25c6ea4 100755 --- a/win/tclWinFile.c +++ b/win/tclWinFile.c @@ -1467,8 +1467,7 @@ TclpGetUserHome( * User exists but has no home dir. Return * "{GetProfilesDirectory}/<user>". */ - DWORD size = MAX_PATH; - int i; + DWORD i, size = MAX_PATH; GetProfilesDirectoryW(buf, &size); for (i = 0; i < size; ++i){ if (buf[i] == '\\') buf[i] = '/'; |