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 | a107ac202e6c6806a0690e555b1141f2d032fb41 (patch) | |
| tree | 828fdf2c38d23b3a036def375aa7b834a934824e /generic/tclScan.c | |
| parent | c171fbe7f243ac0bd033178e3a952e1ddcd6f456 (diff) | |
| download | tcl-a107ac202e6c6806a0690e555b1141f2d032fb41.zip tcl-a107ac202e6c6806a0690e555b1141f2d032fb41.tar.gz tcl-a107ac202e6c6806a0690e555b1141f2d032fb41.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; /* |