Differences From Artifact [0456165c6a]:

• File unix/tclAppInit.c — part of check-in [3625d63254] at 2022-02-01 12:03:54 on branch core-8-6-branch — Code cleanup in tclMain.c and tclAppInit.c: Make them Tcl-8.7-aware, usable as more generic examples for extensions. (user: jan.nijtmans size: 4871) [more...]

To Artifact [a310d75d1f]:

• File unix/tclAppInit.c — part of check-in [7037a107d0] at 2025-08-12 14:25:16 on branch core-8-6-branch — Update dde => 1.4.5. Don't worry about Tcl 8.7 any more (user: jan.nijtmans size: 4844) [more...]

79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94

{
#ifdef TCL_XT_TEST
    XtToolkitInitialize();
#endif

#ifdef TCL_LOCAL_MAIN_HOOK
    TCL_LOCAL_MAIN_HOOK(&argc, &argv);
#elif (TCL_MAJOR_VERSION > 8 || TCL_MINOR_VERSION > 6) && (!defined(_WIN32) || defined(UNICODE))
    /* New in Tcl 8.7. This doesn't work on Windows without UNICODE */
    TclZipfs_AppHook(&argc, &argv);
#endif

    Tcl_Main(argc, argv, TCL_LOCAL_APPINIT);
    return 0;			/* Needed only to prevent compiler warning. */
}


|
|

79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94

{
#ifdef TCL_XT_TEST
    XtToolkitInitialize();
#endif

#ifdef TCL_LOCAL_MAIN_HOOK
    TCL_LOCAL_MAIN_HOOK(&argc, &argv);
#elif TCL_MAJOR_VERSION > 8 && (!defined(_WIN32) || defined(UNICODE))
    /* New in Tcl 9.0. This doesn't work on Windows without UNICODE */
    TclZipfs_AppHook(&argc, &argv);
#endif

    Tcl_Main(argc, argv, TCL_LOCAL_APPINIT);
    return 0;			/* Needed only to prevent compiler warning. */
}