Differences From Artifact [50169ff8c3]:
- File
kitsh/buildsrc/kitsh-0.0/kitInit.c
— part of check-in
[d5ed5900eb]
at
2011-05-28 23:53:40
on branch trunk
— Updated to only mount VFS once
Updated to always load "vfs" (user: rkeene, size: 14845) [annotate] [blame] [check-ins using] [more...]
To Artifact [0cfdc14cf7]:
- File kitsh/buildsrc/kitsh-0.0/kitInit.c — part of check-in [349896fca7] at 2011-05-31 02:03:03 on branch pluggable — Updated to be pluggable (user: rkeene, size: 14761) [annotate] [blame] [check-ins using] [more...]
| ︙ | ︙ | |||
57 58 59 60 61 62 63 | #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 | < | | | 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 | #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 #include "kitInit-libs.h" #ifdef KIT_INCLUDES_MK4TCL Tcl_AppInitProc Mk4tcl_Init; #endif Tcl_AppInitProc Vfs_Init, Rechan_Init; #ifdef KIT_INCLUDES_PWB Tcl_AppInitProc Pwb_Init; #endif |
| ︙ | ︙ | |||
337 338 339 340 341 342 343 |
return;
}
return;
}
static void _Tclkit_Generic_Init(void) {
| < < < | 336 337 338 339 340 341 342 343 344 345 346 347 348 349 |
return;
}
return;
}
static void _Tclkit_Generic_Init(void) {
#ifdef KIT_INCLUDES_MK4TCL
Tcl_StaticPackage(0, "Mk4tcl", Mk4tcl_Init, NULL);
#endif
#ifdef KIT_INCLUDES_PWB
Tcl_StaticPackage(0, "pwb", Pwb_Init, NULL);
#endif
Tcl_StaticPackage(0, "rechan", Rechan_Init, NULL);
|
| ︙ | ︙ | |||
364 365 366 367 368 369 370 371 372 373 374 375 376 377 |
#ifdef _WIN32
Tcl_StaticPackage(0, "dde", Dde_Init, NULL);
Tcl_StaticPackage(0, "registry", Registry_Init, NULL);
#endif
#ifdef KIT_INCLUDES_TK
Tcl_StaticPackage(0, "Tk", Tk_Init, Tk_SafeInit);
#endif
TclSetPreInitScript(preInitCmd);
return;
}
static void _Tclkit_Interp_Init(Tcl_Interp *interp) {
| > > | 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 |
#ifdef _WIN32
Tcl_StaticPackage(0, "dde", Dde_Init, NULL);
Tcl_StaticPackage(0, "registry", Registry_Init, NULL);
#endif
#ifdef KIT_INCLUDES_TK
Tcl_StaticPackage(0, "Tk", Tk_Init, Tk_SafeInit);
#endif
_Tclkit_GenericLib_Init();
TclSetPreInitScript(preInitCmd);
return;
}
static void _Tclkit_Interp_Init(Tcl_Interp *interp) {
|
| ︙ | ︙ |