diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-16 22:21:39 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-16 22:21:39 (GMT) |
| commit | 459642686539ca9da0448167dbbf7fef7435f864 (patch) | |
| tree | a1300aa0e7fe9cb8750adc5f3cfc7f371817094c /generic/tclCompCmdsSZ.c | |
| parent | df7885a1af94256673ff9ee1beb659f201ac2578 (diff) | |
| download | tcl-459642686539ca9da0448167dbbf7fef7435f864.zip tcl-459642686539ca9da0448167dbbf7fef7435f864.tar.gz tcl-459642686539ca9da0448167dbbf7fef7435f864.tar.bz2 | |
Handle Tcl_GetCharLength
Diffstat (limited to 'generic/tclCompCmdsSZ.c')
| -rw-r--r-- | generic/tclCompCmdsSZ.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCompCmdsSZ.c b/generic/tclCompCmdsSZ.c index aa2d13e..62909eb 100644 --- a/generic/tclCompCmdsSZ.c +++ b/generic/tclCompCmdsSZ.c @@ -890,7 +890,7 @@ TclCompileStringLenCmd( */ char buf[TCL_INTEGER_SPACE]; - int len = Tcl_GetCharLength(objPtr); + int len = TclGetCharLength(objPtr); len = sprintf(buf, "%d", len); PushLiteral(envPtr, buf, len); |