summaryrefslogtreecommitdiffstats
path: root/generic/tclEvent.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2022-04-26 07:26:42 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2022-04-26 07:26:42 (GMT)
commit7d4614bc789658cc70e887270ed8f686f776d237 (patch)
tree689d72c28c3dfee12e8a50bbee4d87dab4fe1b5c /generic/tclEvent.c
parent1032ad84856a104fff31d094fc76ac0758c57c39 (diff)
parent43b9a878d5dd76a2a90477dc723a81ffb7897043 (diff)
downloadtcl-7d4614bc789658cc70e887270ed8f686f776d237.zip
tcl-7d4614bc789658cc70e887270ed8f686f776d237.tar.gz
tcl-7d4614bc789658cc70e887270ed8f686f776d237.tar.bz2
Merge 9.0
Diffstat (limited to 'generic/tclEvent.c')
-rw-r--r--generic/tclEvent.c5
1 files changed, 2 insertions, 3 deletions
diff --git a/generic/tclEvent.c b/generic/tclEvent.c
index acc74f8..49c61da 100644
--- a/generic/tclEvent.c
+++ b/generic/tclEvent.c
@@ -1572,10 +1572,9 @@ Tcl_UpdateObjCmd(
int objc, /* Number of arguments. */
Tcl_Obj *const objv[]) /* Argument objects. */
{
- int optionIndex;
int flags = 0; /* Initialized to avoid compiler warning. */
static const char *const updateOptions[] = {"idletasks", NULL};
- enum updateOptionsEnum {OPT_IDLETASKS};
+ enum updateOptionsEnum {OPT_IDLETASKS} optionIndex;
if (objc == 1) {
flags = TCL_ALL_EVENTS|TCL_DONT_WAIT;
@@ -1584,7 +1583,7 @@ Tcl_UpdateObjCmd(
"option", 0, &optionIndex) != TCL_OK) {
return TCL_ERROR;
}
- switch ((enum updateOptionsEnum) optionIndex) {
+ switch (optionIndex) {
case OPT_IDLETASKS:
flags = TCL_IDLE_EVENTS|TCL_DONT_WAIT;
break;