diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-03-15 11:52:09 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-03-15 11:52:09 (GMT) |
| commit | 6e657cfb83595bc0481d833b708554a44e2142fb (patch) | |
| tree | 1ca1c944beacd08dc50a55b0e6cf69a1c9d2e739 /generic/tclCompExpr.c | |
| parent | 57bf9fe12f8859459556da1de27dbdef24048a68 (diff) | |
| parent | 185b0d14932f4cc8503e6dd235da5bd90ebc777c (diff) | |
| download | tcl-6e657cfb83595bc0481d833b708554a44e2142fb.zip tcl-6e657cfb83595bc0481d833b708554a44e2142fb.tar.gz tcl-6e657cfb83595bc0481d833b708554a44e2142fb.tar.bz2 | |
Implement TIP #575: Switchable Tcl_UtfCharComplete()/Tcl_UtfNext()/Tcl_UtfPrev()
Diffstat (limited to 'generic/tclCompExpr.c')
| -rw-r--r-- | generic/tclCompExpr.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCompExpr.c b/generic/tclCompExpr.c index fa15fba..03aebe3 100644 --- a/generic/tclCompExpr.c +++ b/generic/tclCompExpr.c @@ -2145,7 +2145,7 @@ ParseLexeme( */ if (!TclIsBareword(*start) || *start == '_') { - if (TclUCS4Complete(start, numBytes)) { + if (Tcl_UtfCharComplete(start, numBytes)) { scanned = TclUtfToUCS4(start, &ch); } else { char utfBytes[8]; |