diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-07-08 10:28:48 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-07-08 10:28:48 (GMT) |
| commit | f84ad84e4153f7bdce3247e5f5ab7477e74db51f (patch) | |
| tree | 2b8995478cfb59e408b65de66a7a0c682f23bca7 /generic/tclLink.c | |
| parent | 72476cdd50825cebaea367188325e69ea5a8ff40 (diff) | |
| download | tcl-f84ad84e4153f7bdce3247e5f5ab7477e74db51f.zip tcl-f84ad84e4153f7bdce3247e5f5ab7477e74db51f.tar.gz tcl-f84ad84e4153f7bdce3247e5f5ab7477e74db51f.tar.bz2 | |
Micro-optimization: Use TclGetStringFromObj in stead of Tcl_GetStringFromObj in many places where possible.
Diffstat (limited to 'generic/tclLink.c')
| -rw-r--r-- | generic/tclLink.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclLink.c b/generic/tclLink.c index 2735256..e6dc657 100644 --- a/generic/tclLink.c +++ b/generic/tclLink.c @@ -526,7 +526,7 @@ LinkTraceProc( break; case TCL_LINK_STRING: - value = Tcl_GetStringFromObj(valueObj, &valueLength); + value = TclGetStringFromObj(valueObj, &valueLength); valueLength++; pp = (char **) linkPtr->addr; |