diff options
author | dgp <dgp@users.sourceforge.net> | 2021-11-07 14:52:29 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2021-11-07 14:52:29 (GMT) |
commit | 2c7899f9eaac69983a697b016a7b6262ed2aa5cf (patch) | |
tree | e132eb573de9a3598004ffee6e876f87e4b5b31e /generic/tclZipfs.c | |
parent | 084b76b92a5ec029401f05a4138c1559602c23e7 (diff) | |
download | tcl-2c7899f9eaac69983a697b016a7b6262ed2aa5cf.zip tcl-2c7899f9eaac69983a697b016a7b6262ed2aa5cf.tar.gz tcl-2c7899f9eaac69983a697b016a7b6262ed2aa5cf.tar.bz2 |
Dodge a few macro games.
Diffstat (limited to 'generic/tclZipfs.c')
-rw-r--r-- | generic/tclZipfs.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclZipfs.c b/generic/tclZipfs.c index d9cb4ba..bfd594c 100644 --- a/generic/tclZipfs.c +++ b/generic/tclZipfs.c @@ -2412,7 +2412,7 @@ ZipFSMkKeyObjCmd( } passObj = Tcl_NewByteArrayObj(NULL, 264); - passBuf = Tcl_GetByteArrayFromObj(passObj, (int *)NULL); + passBuf = Tcl_GetBytesFromObj(NULL, passObj, NULL); while (len > 0) { int ch = pw[len - 1]; |