diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-10-13 15:54:58 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-10-13 15:54:58 (GMT) |
| commit | 6c0f70fb0b15d3086c2c9da5be8b8543ca912f60 (patch) | |
| tree | d4b7cdffa9df10fb7bb9210ed9ba5d82e85deff7 /unix/tclUnixFCmd.c | |
| parent | 115a3559d776453b8c58512f151abb875de87f74 (diff) | |
| parent | f70e1f98b3e5235a48e0fbea21515ed7e277e6cd (diff) | |
| download | tcl-6c0f70fb0b15d3086c2c9da5be8b8543ca912f60.zip tcl-6c0f70fb0b15d3086c2c9da5be8b8543ca912f60.tar.gz tcl-6c0f70fb0b15d3086c2c9da5be8b8543ca912f60.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'unix/tclUnixFCmd.c')
| -rw-r--r-- | unix/tclUnixFCmd.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/unix/tclUnixFCmd.c b/unix/tclUnixFCmd.c index ad00c97..23dd01a 100644 --- a/unix/tclUnixFCmd.c +++ b/unix/tclUnixFCmd.c @@ -1366,7 +1366,7 @@ GetGroupAttribute( groupPtr = TclpGetGrGid(statBuf.st_gid); if (groupPtr == NULL) { - *attributePtrPtr = Tcl_NewWideIntObj(statBuf.st_gid); + TclNewIntObj(*attributePtrPtr, statBuf.st_gid); } else { Tcl_DString ds; const char *utf; @@ -1420,7 +1420,7 @@ GetOwnerAttribute( pwPtr = TclpGetPwUid(statBuf.st_uid); if (pwPtr == NULL) { - *attributePtrPtr = Tcl_NewWideIntObj(statBuf.st_uid); + TclNewIntObj(*attributePtrPtr, statBuf.st_uid); } else { Tcl_DString ds; @@ -2417,7 +2417,7 @@ GetUnixFileAttributes( return TCL_ERROR; } - *attributePtrPtr = Tcl_NewWideIntObj( + TclNewIntObj(*attributePtrPtr, (fileAttributes & attributeArray[objIndex]) != 0); return TCL_OK; } @@ -2517,7 +2517,7 @@ GetUnixFileAttributes( return TCL_ERROR; } - *attributePtrPtr = Tcl_NewWideIntObj((statBuf.st_flags & UF_IMMUTABLE) != 0); + TclNewIntObj(*attributePtrPtr, (statBuf.st_flags & UF_IMMUTABLE) != 0); return TCL_OK; } |