summaryrefslogtreecommitdiffstats
path: root/generic/tclCompile.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2022-06-13 20:50:01 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2022-06-13 20:50:01 (GMT)
commit002a3c5b5f588d316c435c2b11bd489d62fac58d (patch)
tree92a12852b62f6fb0809dad6a93a47148c14a50a6 /generic/tclCompile.c
parentbf1528403276733a85426e74357783d937c7faed (diff)
parent8a5330377a4d514f7165b65577034d293aa5d520 (diff)
downloadtcl-002a3c5b5f588d316c435c2b11bd489d62fac58d.zip
tcl-002a3c5b5f588d316c435c2b11bd489d62fac58d.tar.gz
tcl-002a3c5b5f588d316c435c2b11bd489d62fac58d.tar.bz2
Merge 8.7. Eliminate warning, seen with clang
Diffstat (limited to 'generic/tclCompile.c')
-rw-r--r--generic/tclCompile.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCompile.c b/generic/tclCompile.c
index 56b6857..5bfad37 100644
--- a/generic/tclCompile.c
+++ b/generic/tclCompile.c
@@ -3330,7 +3330,7 @@ EnterCmdWordData(
/* See Ticket 4b61afd660 */
wwlines[wordIdx] =
((wordIdx == 0) || TclWordKnownAtCompileTime(tokenPtr, NULL))
- ? wordLine : TCL_INDEX_NONE;
+ ? (int)wordLine : -1;
ePtr->line[wordIdx] = wordLine;
ePtr->next[wordIdx] = wordNext;
last = tokenPtr->start;