diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-04-04 11:09:44 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-04-04 11:09:44 (GMT) |
| commit | de370ec86362c9ec5f013683c78a0faa1e51ed75 (patch) | |
| tree | 828fdf2c38d23b3a036def375aa7b834a934824e /generic/tclVar.c | |
| parent | ba5afcca155b489af6e1d7e1f497ad8bc45794e6 (diff) | |
| download | tcl-de370ec86362c9ec5f013683c78a0faa1e51ed75.zip tcl-de370ec86362c9ec5f013683c78a0faa1e51ed75.tar.gz tcl-de370ec86362c9ec5f013683c78a0faa1e51ed75.tar.bz2 | |
Tcl_GetString() -> TclGetString(), for minor speedup.
Diffstat (limited to 'generic/tclVar.c')
| -rw-r--r-- | generic/tclVar.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclVar.c b/generic/tclVar.c index b2e59b3..d91aa1a 100644 --- a/generic/tclVar.c +++ b/generic/tclVar.c @@ -298,7 +298,7 @@ NotArrayError( Tcl_Interp *interp, Tcl_Obj *name) { - const char *nameStr = Tcl_GetString(name); + const char *nameStr = TclGetString(name); Tcl_SetObjResult(interp, Tcl_ObjPrintf("\"%s\" isn't an array", nameStr)); |