summaryrefslogtreecommitdiffstats
path: root/generic/tclTestObj.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2023-11-20 19:52:57 (GMT)
committerdgp <dgp@users.sourceforge.net>2023-11-20 19:52:57 (GMT)
commitba0c330c3128eee0fe98345697130ebfdc20cd9b (patch)
tree4ab703557ce4bcd180a1b61789196a9cbe698b8a /generic/tclTestObj.c
parent58e9be5c93e7ba24244b3bec45a25ae42bffbed5 (diff)
parent24ad51e42eebea61f020a5895b6bbe3101c5d2e1 (diff)
downloadtcl-ba0c330c3128eee0fe98345697130ebfdc20cd9b.zip
tcl-ba0c330c3128eee0fe98345697130ebfdc20cd9b.tar.gz
tcl-ba0c330c3128eee0fe98345697130ebfdc20cd9b.tar.bz2
merge 8.7
Diffstat (limited to 'generic/tclTestObj.c')
-rw-r--r--generic/tclTestObj.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclTestObj.c b/generic/tclTestObj.c
index 8fdd723..ac05d18 100644
--- a/generic/tclTestObj.c
+++ b/generic/tclTestObj.c
@@ -919,7 +919,7 @@ TestlistobjCmd(
return TCL_ERROR;
}
if (Tcl_GetIndexFromObj(interp, objv[1], subcommands, "command",
- 0, &cmdIndex) != TCL_OK) {
+ TCL_INDEX_TEMP_TABLE, &cmdIndex) != TCL_OK) {
return TCL_ERROR;
}
switch(cmdIndex) {