diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-09-22 12:54:54 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-09-22 12:54:54 (GMT) |
| commit | 1795b4118fbb5befe25c16750cce1aa856ec7db3 (patch) | |
| tree | 8f49aa52c912676985454728dbd341da966cf642 /generic/tclBasic.c | |
| parent | b47bd89d441fcfb77be42ca7c4921b9a241d1c8b (diff) | |
| parent | 4ec357c743c86d6cd7dbf94054c2b66def6c6a00 (diff) | |
| download | tcl-1795b4118fbb5befe25c16750cce1aa856ec7db3.zip tcl-1795b4118fbb5befe25c16750cce1aa856ec7db3.tar.gz tcl-1795b4118fbb5befe25c16750cce1aa856ec7db3.tar.bz2 | |
merge tip-515 (which is pre-requisite for this TIP now)
Diffstat (limited to 'generic/tclBasic.c')
| -rw-r--r-- | generic/tclBasic.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c index 390df8f..1b5dd85 100644 --- a/generic/tclBasic.c +++ b/generic/tclBasic.c @@ -998,6 +998,9 @@ Tcl_CreateInterp(void) if (TclZlibInit(interp) != TCL_OK) { Tcl_Panic("%s", TclGetString(Tcl_GetObjResult(interp))); } + if (TclZipfs_Init(interp) != TCL_OK) { + Tcl_Panic("%s", Tcl_GetString(Tcl_GetObjResult(interp))); + } #endif TOP_CB(iPtr) = NULL; |