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 /generic/tclZipfs.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 'generic/tclZipfs.c')
-rw-r--r-- | generic/tclZipfs.c | 6 |
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, |