57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
|
57
58
59
60
61
62
63
64
65
66
67
68
69
70
|
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
|
#if 10 * TCL_MAJOR_VERSION + TCL_MINOR_VERSION < 85
# define KIT_INCLUDES_PWB 1
#endif
#if 10 * TCL_MAJOR_VERSION + TCL_MINOR_VERSION < 86
# define KIT_INCLUDES_ZLIB 1
#endif
/* Determine which type of storage to use -- MK4, ZIP, or CVFS */
#if defined(KIT_STORAGE_MK4) && defined(KIT_STORAGE_ZIP)
# undef KIT_STORAGE_ZIP
#endif
#if defined(KIT_STORAGE_MK4) && defined(KIT_STORAGE_CVFS)
# ifdef TCLKIT_DLL
# undef KIT_STORAGE_MK4
# else
# undef KIT_STORAGE_CVFS
# endif
#endif
#if !defined(KIT_STORAGE_MK4) && !defined(KIT_STORAGE_ZIP) && !defined(KIT_STORAGE_CVFS)
# ifdef TCLKIT_DLL
# define KIT_STORAGE_CVFS 1
# else
# ifdef KIT_INCLUDES_MK4TCL
# define KIT_STORAGE_MK4 1
# else
# define KIT_STORAGE_ZIP 1
# endif
# endif
#endif
#ifdef KIT_INCLUDES_ITCL
Tcl_AppInitProc Itcl_Init;
#endif
#ifdef KIT_INCLUDES_MK4TCL
Tcl_AppInitProc Mk4tcl_Init;
#endif
Tcl_AppInitProc Vfs_Init, Rechan_Init;
|