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 | 0d615819b7678c25b7da29c7218b56f8ce8052d7 (patch) | |
| tree | 5c51da27a8473c687ab32cca8029ca2dc98d3af7 /generic/tclFCmd.c | |
| parent | 2ffbe54c20f058377c1a6ebb30f783ec148c6dfe (diff) | |
| parent | 4d34ce202b3c9139e9046f447fa2b5d4dc87b72c (diff) | |
| download | tcl-0d615819b7678c25b7da29c7218b56f8ce8052d7.zip tcl-0d615819b7678c25b7da29c7218b56f8ce8052d7.tar.gz tcl-0d615819b7678c25b7da29c7218b56f8ce8052d7.tar.bz2 | |
Merge 8.7. Tcl_GetStringFromObj() -> TclGetStringFromObj() (optimization)
Diffstat (limited to 'generic/tclFCmd.c')
| -rw-r--r-- | generic/tclFCmd.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclFCmd.c b/generic/tclFCmd.c index 0285323..b12162c 100644 --- a/generic/tclFCmd.c +++ b/generic/tclFCmd.c @@ -1446,7 +1446,7 @@ TclFileTemporaryCmd( if (objc > 2) { Tcl_Size length; Tcl_Obj *templateObj = objv[2]; - const char *string = Tcl_GetStringFromObj(templateObj, &length); + const char *string = TclGetStringFromObj(templateObj, &length); /* * Treat an empty string as if it wasn't there. @@ -1598,7 +1598,7 @@ TclFileTempDirCmd( if (objc > 1) { Tcl_Size length; Tcl_Obj *templateObj = objv[1]; - const char *string = Tcl_GetStringFromObj(templateObj, &length); + const char *string = TclGetStringFromObj(templateObj, &length); const int onWindows = (tclPlatform == TCL_PLATFORM_WINDOWS); /* |