From 85d1500c5027147c1ab54c07cd64381426932b68 Mon Sep 17 00:00:00 2001
From: "jan.nijtmans" <nijtmans@users.sourceforge.net>
Date: Mon, 5 Apr 2021 17:58:13 +0000
Subject: =?UTF-8?q?tclZipfs.c:1857:33:=20warning:=20request=20for=20implic?=
=?UTF-8?q?it=20conversion=20from=20=E2=80=98void=20*=E2=80=99=20to=20?=
=?UTF-8?q?=E2=80=98char=20*=E2=80=99=20not=20permitted=20in=20C++=20[-Wc+?=
=?UTF-8?q?+-compat]?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
---
generic/tclZipfs.c | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/generic/tclZipfs.c b/generic/tclZipfs.c
index 0b1963b..4ecce48 100644
--- a/generic/tclZipfs.c
+++ b/generic/tclZipfs.c
@@ -1854,8 +1854,8 @@ ZipfsSetup(void)
Tcl_InitHashTable(&ZipFS.zipHash, TCL_STRING_KEYS);
ZipFS.idCount = 1;
ZipFS.wrmax = DEFAULT_WRITE_MAX_SIZE;
- ZipFS.fallbackEntryEncoding =
- Tcl_Alloc(strlen(ZIPFS_FALLBACK_ENCODING) + 1);
+ ZipFS.fallbackEntryEncoding = (char *)
+ ckalloc(strlen(ZIPFS_FALLBACK_ENCODING) + 1);
strcpy(ZipFS.fallbackEntryEncoding, ZIPFS_FALLBACK_ENCODING);
ZipFS.utf8 = Tcl_GetEncoding(NULL, "utf-8");
ZipFS.initialized = 1;
--
cgit v0.12