diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-03-19 16:43:41 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-03-19 16:43:41 (GMT) |
| commit | 1f9225ecf514564b9994b7747fbdc7852a321dfa (patch) | |
| tree | e54fd36946aa49348e86fffb00f4b8993652eae9 /macosx/tclMacOSXFCmd.c | |
| parent | 16b3adf662893e6db67e82fb1df01063e1315548 (diff) | |
| parent | 7208478d1c5c7ed65b3d0bdaced2740830f3859b (diff) | |
| download | tcl-1f9225ecf514564b9994b7747fbdc7852a321dfa.zip tcl-1f9225ecf514564b9994b7747fbdc7852a321dfa.tar.gz tcl-1f9225ecf514564b9994b7747fbdc7852a321dfa.tar.bz2 | |
Merge 8.7 (Some Tcl_GetStringFromObj -> TclGetStringFromObj internal changes)
Diffstat (limited to 'macosx/tclMacOSXFCmd.c')
| -rw-r--r-- | macosx/tclMacOSXFCmd.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/macosx/tclMacOSXFCmd.c b/macosx/tclMacOSXFCmd.c index 332e0a4..e7effd0 100644 --- a/macosx/tclMacOSXFCmd.c +++ b/macosx/tclMacOSXFCmd.c @@ -642,7 +642,7 @@ SetOSTypeFromAny( Tcl_Encoding encoding = Tcl_GetEncoding(NULL, "macRoman"); Tcl_Size length; - string = Tcl_GetStringFromObj(objPtr, &length); + string = TclGetStringFromObj(objPtr, &length); Tcl_UtfToExternalDStringEx(NULL, encoding, string, length, TCL_ENCODING_PROFILE_TCL8, &ds, NULL); if (Tcl_DStringLength(&ds) > 4) { |