diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-09-12 19:30:00 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-09-12 19:30:00 (GMT) |
| commit | 9b45aaa5b04468a95445c052fb62b42f081960b3 (patch) | |
| tree | 48463f1ee46b845f9328773b5ee8984c5592617a /generic/tclBasic.c | |
| parent | 945b10776dd8549b1f2371b406bea48df0e987d8 (diff) | |
| parent | 9b285dde85a6b7f41dd63cadb8c32517e3b1d1dd (diff) | |
| download | tcl-9b45aaa5b04468a95445c052fb62b42f081960b3.zip tcl-9b45aaa5b04468a95445c052fb62b42f081960b3.tar.gz tcl-9b45aaa5b04468a95445c052fb62b42f081960b3.tar.bz2 | |
TIP #430 implementation
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 71a1442..84ac87b 100644 --- a/generic/tclBasic.c +++ b/generic/tclBasic.c @@ -999,6 +999,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; |