Tcl Source Code

Check-in [fa4ce191d2]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Disable command line globbing on MinGW compiles: this saves startup time, since the result of the glob is not used anywhere.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: fa4ce191d22bb04b47620e31ae9490d9d1b86c98
User & Date: jan.nijtmans 2013-09-30 14:07:20
Context
2013-10-02
08:08
Fix compilation with latest MinGW-w64 version 3.0: Conflict on EXCEPTION_REGISTRATION typedef, which... check-in: 7488de4f4b user: jan.nijtmans tags: trunk
2013-09-30
14:33
merge trunk check-in: a765e280e7 user: dgp tags: dgp-refactor
14:08
merge trunk check-in: 4d2bc6a652 user: jan.nijtmans tags: novem
14:07
Disable command line globbing on MinGW compiles: this saves startup time, since the result of the gl... check-in: fa4ce191d2 user: jan.nijtmans tags: trunk
14:03
Disable command line globbing on MinGW compiles: this saves startup time, since the result of the gl... check-in: 5099a81b50 user: jan.nijtmans tags: core-8-5-branch
09:38
Restore copyright assignments and some improved comments in tclOO.decls: previous commit was a blind... check-in: 4a0553616c user: jan.nijtmans tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to win/tclAppInit.c.

30
31
32
33
34
35
36

37
38
39
40
41
42
43
#if defined(STATIC_BUILD) && TCL_USE_STATIC_PACKAGES
extern Tcl_PackageInitProc Registry_Init;
extern Tcl_PackageInitProc Dde_Init;
extern Tcl_PackageInitProc Dde_SafeInit;
#endif

#ifdef TCL_BROKEN_MAINARGS

static void setargv(int *argcPtr, TCHAR ***argvPtr);
#endif /* TCL_BROKEN_MAINARGS */

/*
 * The following #if block allows you to change the AppInit function by using
 * a #define of TCL_LOCAL_APPINIT instead of rewriting this entire file. The
 * #if checks for that #define and uses Tcl_AppInit if it does not exist.







>







30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
#if defined(STATIC_BUILD) && TCL_USE_STATIC_PACKAGES
extern Tcl_PackageInitProc Registry_Init;
extern Tcl_PackageInitProc Dde_Init;
extern Tcl_PackageInitProc Dde_SafeInit;
#endif

#ifdef TCL_BROKEN_MAINARGS
int _CRT_glob = 0;
static void setargv(int *argcPtr, TCHAR ***argvPtr);
#endif /* TCL_BROKEN_MAINARGS */

/*
 * The following #if block allows you to change the AppInit function by using
 * a #define of TCL_LOCAL_APPINIT instead of rewriting this entire file. The
 * #if checks for that #define and uses Tcl_AppInit if it does not exist.