summaryrefslogtreecommitdiffstats
path: root/macosx
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2016-11-16 10:55:40 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2016-11-16 10:55:40 (GMT)
commit29606e4a7b43adb9f923fb5781d3b9a93d9ba1c8 (patch)
tree6cf185a0504de6ff8fa054121bf9d289cfbbc717 /macosx
parented830e98b74fe64225572a43a9b67e99c2b4d65c (diff)
downloadtcl-29606e4a7b43adb9f923fb5781d3b9a93d9ba1c8.zip
tcl-29606e4a7b43adb9f923fb5781d3b9a93d9ba1c8.tar.gz
tcl-29606e4a7b43adb9f923fb5781d3b9a93d9ba1c8.tar.bz2
Use more "size_t" in stead of "int" internall. Also eliminate a lot of type-casts which are not necessary any more.
Diffstat (limited to 'macosx')
-rw-r--r--macosx/tclMacOSXFCmd.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/macosx/tclMacOSXFCmd.c b/macosx/tclMacOSXFCmd.c
index 946e350..75fda4b 100644
--- a/macosx/tclMacOSXFCmd.c
+++ b/macosx/tclMacOSXFCmd.c
@@ -636,12 +636,12 @@ SetOSTypeFromAny(
Tcl_Obj *objPtr) /* Pointer to the object to convert */
{
const char *string;
- int length, result = TCL_OK;
+ int result = TCL_OK;
Tcl_DString ds;
Tcl_Encoding encoding = Tcl_GetEncoding(NULL, "macRoman");
- string = TclGetStringFromObj(objPtr, &length);
- Tcl_UtfToExternalDString(encoding, string, length, &ds);
+ string = TclGetString(objPtr);
+ Tcl_UtfToExternalDString(encoding, string, objPtr->length, &ds);
if (Tcl_DStringLength(&ds) > 4) {
if (interp) {