summaryrefslogtreecommitdiffstats
path: root/win/tclWinFile.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2020-10-24 14:50:11 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2020-10-24 14:50:11 (GMT)
commit63855497af431a6ee84d67b62ade8694485d76c9 (patch)
tree8239e1a67cec1bb976b23a1d96024097fc93b8a1 /win/tclWinFile.c
parentfe94c1d6c4fa1c0d810d2eb6b845e7d0faf8812c (diff)
parent48d0827130389368a247f26b480bd819a1c753e5 (diff)
downloadtcl-63855497af431a6ee84d67b62ade8694485d76c9.zip
tcl-63855497af431a6ee84d67b62ade8694485d76c9.tar.gz
tcl-63855497af431a6ee84d67b62ade8694485d76c9.tar.bz2
Merge 8.7
Diffstat (limited to 'win/tclWinFile.c')
-rw-r--r--win/tclWinFile.c4
1 files changed, 1 insertions, 3 deletions
diff --git a/win/tclWinFile.c b/win/tclWinFile.c
index d2777d7..89f485a 100644
--- a/win/tclWinFile.c
+++ b/win/tclWinFile.c
@@ -1094,7 +1094,6 @@ TclpMatchInDirectory(
do {
const char *utfname;
int checkDrive = 0, isDrive;
- DWORD attr;
native = data.cFileName;
attr = data.dwFileAttributes;
@@ -1445,7 +1444,6 @@ TclpGetUserHome(
int rc = 0;
const char *domain;
WCHAR *wName, *wHomeDir, *wDomain;
- WCHAR buf[MAX_PATH];
Tcl_DStringInit(bufferPtr);
@@ -1511,6 +1509,7 @@ TclpGetUserHome(
size = lstrlenW(wHomeDir);
Tcl_WCharToUtfDString(wHomeDir, size, bufferPtr);
} else {
+ WCHAR buf[MAX_PATH];
/*
* User exists but has no home dir. Return
* "{GetProfilesDirectory}/<user>".
@@ -2818,7 +2817,6 @@ TclpObjNormalizePath(
*/
int len;
- char *path;
Tcl_Obj *tmpPathPtr;
tmpPathPtr = Tcl_NewStringObj(Tcl_DStringValue(&ds),