diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-08-15 15:20:29 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-08-15 15:20:29 (GMT) |
| commit | 1bd446e971b168abf54724a4189428da9fa0dcf7 (patch) | |
| tree | 29b9e228043f436e5eaff478e6178f21c6c185ee /generic/tclFileName.c | |
| parent | 0658d784eb42359981cdc2ed02241b91901bf1a5 (diff) | |
| parent | 329e6599c8895768a6ba34cb61c9e347f8396d46 (diff) | |
| download | tcl-1bd446e971b168abf54724a4189428da9fa0dcf7.zip tcl-1bd446e971b168abf54724a4189428da9fa0dcf7.tar.gz tcl-1bd446e971b168abf54724a4189428da9fa0dcf7.tar.bz2 | |
Merge tip-548
Diffstat (limited to 'generic/tclFileName.c')
| -rw-r--r-- | generic/tclFileName.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclFileName.c b/generic/tclFileName.c index dfdb943..eb1d785 100644 --- a/generic/tclFileName.c +++ b/generic/tclFileName.c @@ -1072,7 +1072,7 @@ Tcl_TranslateFileName( */ if (tclPlatform == TCL_PLATFORM_WINDOWS) { - register char *p; + char *p; for (p = Tcl_DStringValue(bufferPtr); *p != '\0'; p++) { if (*p == '/') { *p = '\\'; @@ -2077,7 +2077,7 @@ SkipToChar( int match) /* Character to find. */ { int quoted, level; - register char *p; + char *p; quoted = 0; level = 0; @@ -2628,7 +2628,7 @@ Tcl_GetBlocksFromStat( #ifdef HAVE_STRUCT_STAT_ST_BLOCKS return (Tcl_WideUInt) statPtr->st_blocks; #else - register unsigned blksize = Tcl_GetBlockSizeFromStat(statPtr); + unsigned blksize = Tcl_GetBlockSizeFromStat(statPtr); return ((Tcl_WideUInt) statPtr->st_size + blksize - 1) / blksize; #endif |