diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-06-29 08:54:19 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-06-29 08:54:19 (GMT) |
| commit | 79260bd6950b610ebc53b4fb8ee8317ef0c6a2a1 (patch) | |
| tree | 81655f76ce5b717e26b01ca9b83a3dc09ced9778 | |
| parent | 1a062775d2735b0291d3dd2af446ea5192c48f2a (diff) | |
| download | tcl-79260bd6950b610ebc53b4fb8ee8317ef0c6a2a1.zip tcl-79260bd6950b610ebc53b4fb8ee8317ef0c6a2a1.tar.gz tcl-79260bd6950b610ebc53b4fb8ee8317ef0c6a2a1.tar.bz2 | |
Make tclWinChan.c compile again, fixing obvious implementation problems. Not tested if it actually works.
| -rw-r--r-- | win/tclWinChan.c | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/win/tclWinChan.c b/win/tclWinChan.c index e9e139d..19a198e 100644 --- a/win/tclWinChan.c +++ b/win/tclWinChan.c @@ -903,17 +903,15 @@ ToCTime( static Tcl_Obj * StatOpenFile( - FileState *fsPtr) + FileInfo *infoPtr) { DWORD attr; int dev, nlink = 1; unsigned short mode; unsigned long long size, inode; long long atime, ctime, mtime; - HANDLE fileHandle; - DWORD fileType = FILE_TYPE_UNKNOWN; BY_HANDLE_FILE_INFORMATION data; - Tcl_DictObj *dictObj; + Tcl_Obj *dictObj; if (GetFileInformationByHandle(infoPtr->handle, &data) != TRUE) { Tcl_SetErrno(ENOENT); @@ -936,7 +934,7 @@ StatOpenFile( inode = CombineDwords(data.nFileIndexHigh, data.nFileIndexLow); - dev = dw.dwVolumeSerialNumber; + dev = data.dwVolumeSerialNumber; /* * Note that this code has no idea whether the file can be executed. @@ -1008,7 +1006,7 @@ FileGetOptionProc( } if (valid) { - Tcl_Obj *dictObj = StatOpenFile(fsPtr); + Tcl_Obj *dictObj = StatOpenFile(infoPtr); const char *dictContents; int dictLength; |