diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-11-20 20:36:04 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-11-20 20:36:04 (GMT) |
| commit | 58b64de3bfbcd0cb114139833a8c029273fb7637 (patch) | |
| tree | 73218e7f7fe635ef72f28886a970a64d3f72b1c7 /generic | |
| parent | 24ad51e42eebea61f020a5895b6bbe3101c5d2e1 (diff) | |
| download | tcl-58b64de3bfbcd0cb114139833a8c029273fb7637.zip tcl-58b64de3bfbcd0cb114139833a8c029273fb7637.tar.gz tcl-58b64de3bfbcd0cb114139833a8c029273fb7637.tar.bz2 | |
Undo previous commit. Add "static" keywords in various places instead. This should fix the problem too.
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tclTest.c | 2 | ||||
| -rw-r--r-- | generic/tclTestObj.c | 8 |
2 files changed, 5 insertions, 5 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c index 2f244a2..a07d449 100644 --- a/generic/tclTest.c +++ b/generic/tclTest.c @@ -3818,7 +3818,7 @@ TestlistrepCmd( Tcl_Obj *const objv[]) /* Argument objects. */ { /* Subcommands supported by this command */ - const char* subcommands[] = { + static const char *const subcommands[] = { "new", "describe", "config", diff --git a/generic/tclTestObj.c b/generic/tclTestObj.c index 1f8f73d..9f31cff 100644 --- a/generic/tclTestObj.c +++ b/generic/tclTestObj.c @@ -153,7 +153,7 @@ TestbignumobjCmd( int objc, /* Argument count */ Tcl_Obj *const objv[]) /* Argument vector */ { - const char *const subcmds[] = { + static const char *const subcmds[] = { "set", "get", "mult10", "div10", "iseven", "radixsize", NULL }; enum options { @@ -887,7 +887,7 @@ TestlistobjCmd( Tcl_Obj *const objv[]) /* Argument objects */ { /* Subcommands supported by this command */ - const char* const subcommands[] = { + static const char* const subcommands[] = { "set", "get", "replace", @@ -920,7 +920,7 @@ TestlistobjCmd( return TCL_ERROR; } if (Tcl_GetIndexFromObj(interp, objv[1], subcommands, "command", - TCL_INDEX_TEMP_TABLE, &cmdIndex) != TCL_OK) { + 0, &cmdIndex) != TCL_OK) { return TCL_ERROR; } switch(cmdIndex) { @@ -1062,7 +1062,7 @@ TestobjCmd( int i; const Tcl_ObjType *targetType; Tcl_Obj **varPtr; - const char *subcommands[] = { + static const char *const subcommands[] = { "freeallvars", "bug3598580", "types", "objtype", "newobj", "set", "assign", "convert", "duplicate", |