Tcl Source Code

Check-in [b439e1d71b]
Login

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

Overview
Comment:no longer depend on MODULE_SCOPE being defined
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: b439e1d71b5146474b5103f64cf5f7d4912e8e49
User & Date: jan.nijtmans 2011-05-05 06:26:50
Context
2011-05-05
15:32
Fix typo spotted by Emiliano Gavilan. check-in: 0ef5e8c424 user: dkf tags: trunk
06:26
no longer depend on MODULE_SCOPE being defined check-in: b439e1d71b user: jan.nijtmans tags: trunk
2011-05-03
19:44
merge 8.5 check-in: 27fd15ce57 user: dgp tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to unix/tclAppInit.c.

31
32
33
34
35
36
37



38
39
40
41
42
43
44
 * a #define of TCL_LOCAL_APPINIT instead of rewriting this entire file. The
 * #if checks for that #define and uses Tcl_AppInit if it doesn't exist.
 */

#ifndef TCL_LOCAL_APPINIT
#define TCL_LOCAL_APPINIT Tcl_AppInit
#endif



MODULE_SCOPE int TCL_LOCAL_APPINIT(Tcl_Interp *);
MODULE_SCOPE int main(int, char **);

/*
 * The following #if block allows you to change how Tcl finds the startup
 * script, prime the library or encoding paths, fiddle with the argv, etc.,
 * without needing to rewrite Tcl_Main()







>
>
>







31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
 * a #define of TCL_LOCAL_APPINIT instead of rewriting this entire file. The
 * #if checks for that #define and uses Tcl_AppInit if it doesn't exist.
 */

#ifndef TCL_LOCAL_APPINIT
#define TCL_LOCAL_APPINIT Tcl_AppInit
#endif
#ifndef MODULE_SCOPE
#   define MODULE_SCOPE extern
#endif
MODULE_SCOPE int TCL_LOCAL_APPINIT(Tcl_Interp *);
MODULE_SCOPE int main(int, char **);

/*
 * The following #if block allows you to change how Tcl finds the startup
 * script, prime the library or encoding paths, fiddle with the argv, etc.,
 * without needing to rewrite Tcl_Main()