summaryrefslogtreecommitdiffstats
path: root/generic/tclZipfs.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2020-10-13 15:54:58 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2020-10-13 15:54:58 (GMT)
commit6c0f70fb0b15d3086c2c9da5be8b8543ca912f60 (patch)
treed4b7cdffa9df10fb7bb9210ed9ba5d82e85deff7 /generic/tclZipfs.c
parent115a3559d776453b8c58512f151abb875de87f74 (diff)
parentf70e1f98b3e5235a48e0fbea21515ed7e277e6cd (diff)
downloadtcl-6c0f70fb0b15d3086c2c9da5be8b8543ca912f60.zip
tcl-6c0f70fb0b15d3086c2c9da5be8b8543ca912f60.tar.gz
tcl-6c0f70fb0b15d3086c2c9da5be8b8543ca912f60.tar.bz2
Merge 8.7
Diffstat (limited to 'generic/tclZipfs.c')
-rw-r--r--generic/tclZipfs.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclZipfs.c b/generic/tclZipfs.c
index dd049e6..bc59f15 100644
--- a/generic/tclZipfs.c
+++ b/generic/tclZipfs.c
@@ -4451,13 +4451,13 @@ ZipFSFileAttrsGetProc(
}
switch (index) {
case 0:
- *objPtrRef = Tcl_NewWideIntObj(z->numBytes);
+ TclNewIntObj(*objPtrRef, z->numBytes);
break;
case 1:
- *objPtrRef = Tcl_NewWideIntObj(z->numCompressedBytes);
+ TclNewIntObj(*objPtrRef, z->numCompressedBytes);
break;
case 2:
- *objPtrRef = Tcl_NewWideIntObj(z->offset);
+ TclNewIntObj(*objPtrRef, z->offset);
break;
case 3:
*objPtrRef = Tcl_NewStringObj(z->zipFilePtr->mountPoint,