summaryrefslogtreecommitdiffstats
path: root/generic/tclZipfs.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2021-03-15 13:19:31 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2021-03-15 13:19:31 (GMT)
commit2e8db9a108c3539b68e894749c0e05e1d5ae871e (patch)
treec08c445cdf06374df489425b8050bebf9f5d413f /generic/tclZipfs.c
parentc646a67fd295620422863a3ab3ac74eff316aec3 (diff)
parentc54d29df06056eda6a5dd8c5845283204d56418f (diff)
downloadtcl-2e8db9a108c3539b68e894749c0e05e1d5ae871e.zip
tcl-2e8db9a108c3539b68e894749c0e05e1d5ae871e.tar.gz
tcl-2e8db9a108c3539b68e894749c0e05e1d5ae871e.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 e0249f8..9dcfb4a 100644
--- a/generic/tclZipfs.c
+++ b/generic/tclZipfs.c
@@ -343,7 +343,7 @@ static int ZipChannelClose(void *instanceData,
static Tcl_DriverGetHandleProc ZipChannelGetFile;
static int ZipChannelRead(void *instanceData, char *buf,
int toRead, int *errloc);
-#ifndef TCL_NO_DEPRECATED
+#if !defined(TCL_NO_DEPRECATED) && (TCL_MAJOR_VERSION < 9)
static int ZipChannelSeek(void *instanceData, long offset,
int mode, int *errloc);
#endif
@@ -402,7 +402,7 @@ static Tcl_ChannelType ZipChannelType = {
TCL_CLOSE2PROC, /* Close channel, clean instance data */
ZipChannelRead, /* Handle read request */
ZipChannelWrite, /* Handle write request */
-#ifndef TCL_NO_DEPRECATED
+#if !defined(TCL_NO_DEPRECATED) && (TCL_MAJOR_VERSION < 9)
ZipChannelSeek, /* Move location of access point, NULL'able */
#else
NULL, /* Move location of access point, NULL'able */
@@ -4055,7 +4055,7 @@ ZipChannelWideSeek(
return info->numRead;
}
-#ifndef TCL_NO_DEPRECATED
+#if !defined(TCL_NO_DEPRECATED) && (TCL_MAJOR_VERSION < 9)
static int
ZipChannelSeek(
void *instanceData,