diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-03-21 13:55:11 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-03-21 13:55:11 (GMT) |
| commit | 29080aaa9aa4b3a25eed62b35a8703324e4b652c (patch) | |
| tree | 5c51da27a8473c687ab32cca8029ca2dc98d3af7 /generic/tclNamesp.c | |
| parent | be7f5c536c48c876701cfeee5085e12aa9cdc649 (diff) | |
| parent | 3fd7f1aa143d5095721daf36be1497966e1fae79 (diff) | |
| download | tcl-29080aaa9aa4b3a25eed62b35a8703324e4b652c.zip tcl-29080aaa9aa4b3a25eed62b35a8703324e4b652c.tar.gz tcl-29080aaa9aa4b3a25eed62b35a8703324e4b652c.tar.bz2 | |
Merge 8.7. Tcl_GetStringFromObj() -> TclGetStringFromObj() (optimization)
Diffstat (limited to 'generic/tclNamesp.c')
| -rw-r--r-- | generic/tclNamesp.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclNamesp.c b/generic/tclNamesp.c index bdff82d..2a30742 100644 --- a/generic/tclNamesp.c +++ b/generic/tclNamesp.c @@ -3172,7 +3172,7 @@ NamespaceCodeCmd( " "namespace" command. [Bug 3202171]. */ - arg = Tcl_GetStringFromObj(objv[1], &length); + arg = TclGetStringFromObj(objv[1], &length); if (*arg==':' && length > 20 && strncmp(arg, "::namespace inscope ", 20) == 0) { Tcl_SetObjResult(interp, objv[1]); |