diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-03-19 11:18:08 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-03-19 11:18:08 (GMT) |
| commit | 1df5f1053536d20ad31fac5c678647258b61c24f (patch) | |
| tree | 430c0be0edec839b9e2866058b3e2d05627bd73c /generic/tclIndexObj.c | |
| parent | 6691d36fcb40c6b22b8586ba868469a34cb69399 (diff) | |
| parent | c39345b47aa9604e3ffb82599ee15be9cbce57f6 (diff) | |
| download | tcl-1df5f1053536d20ad31fac5c678647258b61c24f.zip tcl-1df5f1053536d20ad31fac5c678647258b61c24f.tar.gz tcl-1df5f1053536d20ad31fac5c678647258b61c24f.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'generic/tclIndexObj.c')
| -rw-r--r-- | generic/tclIndexObj.c | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/generic/tclIndexObj.c b/generic/tclIndexObj.c index 3a9e07f..b665589 100644 --- a/generic/tclIndexObj.c +++ b/generic/tclIndexObj.c @@ -1237,7 +1237,6 @@ PrintUsage( int width, numSpaces; #define NUM_SPACES 20 static const char spaces[] = " "; - char tmp[TCL_DOUBLE_SPACE]; Tcl_Obj *msg; /* @@ -1287,7 +1286,6 @@ PrintUsage( case TCL_ARGV_FLOAT: Tcl_AppendPrintfToObj(msg, "\n\t\tDefault value: %g", *((double *) infoPtr->dstPtr)); - sprintf(tmp, "%g", *((double *) infoPtr->dstPtr)); break; case TCL_ARGV_STRING: { char *string = *((char **) infoPtr->dstPtr); |