diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-11-09 21:54:57 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-11-09 21:54:57 (GMT) |
commit | 4626fe265c1403e3568ae8c3d77bb87a88cc4b25 (patch) | |
tree | 00a4793e01c500f7ad000b56ae499c4305c9ec15 /generic | |
parent | 2ffcfc525bbdf699b316eadff19d2f55139b608a (diff) | |
download | tcl-4626fe265c1403e3568ae8c3d77bb87a88cc4b25.zip tcl-4626fe265c1403e3568ae8c3d77bb87a88cc4b25.tar.gz tcl-4626fe265c1403e3568ae8c3d77bb87a88cc4b25.tar.bz2 |
(partial) fix [54a305cb88]: warning: variable set but not used [-Wunused-but-set-variable]
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclFileName.c | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/generic/tclFileName.c b/generic/tclFileName.c index b3294fd..d6dac9c 100644 --- a/generic/tclFileName.c +++ b/generic/tclFileName.c @@ -2138,7 +2138,7 @@ DoGlob( Tcl_GlobTypeData *types) /* List object containing list of acceptable * types. May be NULL. */ { - int baseLength, quoted, count; + int baseLength, quoted; int result = TCL_OK; char *name, *p, *openBrace, *closeBrace, *firstSpecialChar; Tcl_Obj *joinedPtr; @@ -2148,7 +2148,6 @@ DoGlob( * past the last initial separator. */ - count = 0; name = pattern; for (; *pattern != '\0'; pattern++) { if (*pattern == '\\') { @@ -2168,7 +2167,6 @@ DoGlob( } else if (strchr(separators, *pattern) == NULL) { break; } - count++; } /* |