diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2017-09-19 21:10:17 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2017-09-19 21:10:17 (GMT) |
commit | e98176dd130878b648814ccabd46a3f993857be8 (patch) | |
tree | 226a577ff5dee8c6a24826710738e9f9638423d5 | |
parent | 1ce07d926a31bc56ac1c66d82512394542c51ee9 (diff) | |
download | blt-e98176dd130878b648814ccabd46a3f993857be8.zip blt-e98176dd130878b648814ccabd46a3f993857be8.tar.gz blt-e98176dd130878b648814ccabd46a3f993857be8.tar.bz2 |
Squashed 'tclzvfs/' changes from e1194a3a..00d81cf8
00d81cf8 Update zvfs.c
16b6dfb5 Update zvfs.c
git-subtree-dir: tclzvfs
git-subtree-split: 00d81cf8e118cbc87b258921d280c50b5f8de989
-rwxr-xr-x | zvfs.c | 10 |
1 files changed, 5 insertions, 5 deletions
@@ -265,7 +265,7 @@ int Zvfs_Mount( ZvfsArchive *pArchive; /* The ZIP archive being mounted */ Tcl_HashEntry *pEntry; /* Hash table entry */ int isNew; /* Flag to tell use when a hash entry is new */ - unsigned char zBuf[100]; /* Space into which to read from the ZIP archive */ + unsigned char zBuf[128]; /* Space into which to read from the ZIP archive */ Tcl_HashSearch zSearch; /* Search all mount points */ if( !local.isInit ) return TCL_ERROR; @@ -344,7 +344,7 @@ int Zvfs_Mount( int isdir; ZvfsFile *pZvfs; /* A new virtual file */ char *zFullPath; /* Full pathname of the virtual file */ - char zName[1024]; /* Space to hold the filename */ + char zName[2048]; /* Space to hold the filename */ /* Read the next directory entry. Extract the size of the filename, ** the size of the "extra" information, and the offset into the archive @@ -904,8 +904,8 @@ static Tcl_Channel ZvfsFileOpen(Tcl_Interp *interp, char *zFilename, ZvfsChannelInfo *pInfo; Tcl_Channel chan; static int count = 1; - char zName[50]; - unsigned char zBuf[50]; + char zName[128]; + unsigned char zBuf[128]; int errCode; pFile = ZvfsLookup(zFilename); @@ -1121,7 +1121,7 @@ Tcl_Obj *Tobe_FSListVolumesProc _ANSI_ARGS_((void)) Tcl_HashSearch zSearch; /* Search all mount points */ ZvfsArchive *pArchive; /* The ZIP archive being mounted */ Tcl_Obj *pVols=0, *pVol; - char mountpt[200]; + char mountpt[2048]; pEntry=Tcl_FirstHashEntry(&local.archiveHash,&zSearch); while (pEntry) { |