diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2015-12-21 15:21:21 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2015-12-21 15:21:21 (GMT) |
commit | 3c03a492f903c82b544cd54fb5b8f2e2e374a150 (patch) | |
tree | 18c0403f3a9a0ee886efb29353d9d19d028ae7ab /unix/tclAppInit.c | |
parent | 56c5833c4ab4b228c29eb2ade13ba727e1e45da5 (diff) | |
download | tcl-3c03a492f903c82b544cd54fb5b8f2e2e374a150.zip tcl-3c03a492f903c82b544cd54fb5b8f2e2e374a150.tar.gz tcl-3c03a492f903c82b544cd54fb5b8f2e2e374a150.tar.bz2 |
Start with a few simple basic test-cases
Diffstat (limited to 'unix/tclAppInit.c')
-rw-r--r-- | unix/tclAppInit.c | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/unix/tclAppInit.c b/unix/tclAppInit.c index 9bbc88b..40b10f3 100644 --- a/unix/tclAppInit.c +++ b/unix/tclAppInit.c @@ -17,6 +17,7 @@ #include "tcl.h" #ifdef TCL_TEST +#include "tclZipfs.h" extern Tcl_PackageInitProc Tcltest_Init; extern Tcl_PackageInitProc Tcltest_SafeInit; #endif /* TCL_TEST */ @@ -123,6 +124,10 @@ Tcl_AppInit( return TCL_ERROR; } Tcl_StaticPackage(interp, "Tcltest", Tcltest_Init, Tcltest_SafeInit); + if (Tclzipfs_Init(interp) == TCL_ERROR) { + return TCL_ERROR; + } + Tcl_StaticPackage(interp, "zipfs", Tclzipfs_Init, Tclzipfs_SafeInit); #endif /* TCL_TEST */ /* |