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/tclScan.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/tclScan.c')
| -rw-r--r-- | generic/tclScan.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclScan.c b/generic/tclScan.c index ba3d90f..777deef 100644 --- a/generic/tclScan.c +++ b/generic/tclScan.c @@ -597,7 +597,7 @@ Tcl_ScanObjCmd( return TCL_ERROR; } - format = Tcl_GetString(objv[2]); + format = TclGetString(objv[2]); numVars = objc-3; /* @@ -619,7 +619,7 @@ Tcl_ScanObjCmd( } } - string = Tcl_GetString(objv[1]); + string = TclGetString(objv[1]); baseString = string; /* |