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 64 65 66 67 68 69 70 71 72 73 ... 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 ... 364 365 366 367 368 369 370 371 372 373 374 375 376 377 |
#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 #ifdef KIT_INCLUDES_ITCL Tcl_AppInitProc Itcl_Init; #endif #ifdef KIT_INCLUDES_MK4TCL Tcl_AppInitProc Mk4tcl_Init; #endif Tcl_AppInitProc Vfs_Init, Rechan_Init; #ifdef KIT_INCLUDES_PWB Tcl_AppInitProc Pwb_Init; #endif ................................................................................ return; } return; } static void _Tclkit_Generic_Init(void) { #ifdef KIT_INCLUDES_ITCL Tcl_StaticPackage(0, "Itcl", Itcl_Init, NULL); #endif #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); ................................................................................ #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) { |
| | < < < < > > |
57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 ... 336 337 338 339 340 341 342 343 344 345 346 347 348 349 ... 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 |
#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 ................................................................................ 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); ................................................................................ #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) { |