diff options
| author | dgp <dgp@users.sourceforge.net> | 2017-06-06 13:48:14 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2017-06-06 13:48:14 (GMT) |
| commit | 9a51ddaa6e245b55bd471afb1797e1a11eecb960 (patch) | |
| tree | bc2616ba41b0576c974b5fadc703c0491455ea5d /generic/tclCompExpr.c | |
| parent | 25084ac51ac8a4669822ee9e36a26cead61ed4e1 (diff) | |
| parent | 5667bb5f8ef53deea815e1726501e079c5ce1859 (diff) | |
| download | tcl-9a51ddaa6e245b55bd471afb1797e1a11eecb960.zip tcl-9a51ddaa6e245b55bd471afb1797e1a11eecb960.tar.gz tcl-9a51ddaa6e245b55bd471afb1797e1a11eecb960.tar.bz2 | |
merge trunk
Diffstat (limited to 'generic/tclCompExpr.c')
| -rw-r--r-- | generic/tclCompExpr.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclCompExpr.c b/generic/tclCompExpr.c index 7ad39f9..e6fba7b 100644 --- a/generic/tclCompExpr.c +++ b/generic/tclCompExpr.c @@ -2064,13 +2064,13 @@ ParseLexeme( if (!TclIsBareword(*start) || *start == '_') { if (Tcl_UtfCharComplete(start, numBytes)) { - scanned = Tcl_UtfToUniChar(start, &ch); + scanned = TclUtfToUniChar(start, &ch); } else { char utfBytes[TCL_UTF_MAX]; memcpy(utfBytes, start, (size_t) numBytes); utfBytes[numBytes] = '\0'; - scanned = Tcl_UtfToUniChar(utfBytes, &ch); + scanned = TclUtfToUniChar(utfBytes, &ch); } *lexemePtr = INVALID; Tcl_DecrRefCount(literal); |