Tcl Source Code

Check-in [52f3baabd8]
Login

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

Overview
Comment:[bug 3508771] fix OSX build
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | core-8-4-branch
Files: files | file ages | folders
SHA1: 52f3baabd8546aa7df43f457a950cb7bb96b274d
User & Date: jan.nijtmans 2012-03-22 09:49:29
Context
2012-03-24
06:43
[Bug 3508771] load tclreg.dll in cygwin tclsh Implement TclWinConvertError, TclWinConvertWSAError, a... check-in: c503d14bcf user: jan.nijtmans tags: core-8-4-branch
2012-03-22
16:02
many more cygwin functions present check-in: 246f517e0a user: jan.nijtmans tags: bug-3508771
09:57
[bug 3508771] fix OSX build check-in: 47b5a84a31 user: jan.nijtmans tags: core-8-5-branch
09:49
[bug 3508771] fix OSX build check-in: 52f3baabd8 user: jan.nijtmans tags: core-8-4-branch
2012-03-20
10:15
[Bug 3288345] Wrong Tcl_StatBuf used on Cygwin (backported from Tcl 8.5) check-in: 77f914d372 user: jan.nijtmans tags: core-8-4-branch
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to generic/tclStubInit.c.

100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
}

#define Tcl_MacOSXOpenBundleResources (int (*) _ANSI_ARGS_(( \
		Tcl_Interp *, CONST char *, int, int, char *))) Tcl_WinUtfToTChar
#define Tcl_MacOSXOpenVersionedBundleResources (int (*) _ANSI_ARGS_(( \
		Tcl_Interp *, CONST char *, CONST char *, int, int, char *))) Tcl_WinTCharToUtf

#elif !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
#   define TclWinGetPlatformId (int (*)()) TclpCreateTempFile
#   ifndef MAC_OSX_TCL
#	define Tcl_MacOSXOpenBundleResources 0
#	define Tcl_MacOSXOpenVersionedBundleResources 0
#   endif
#endif








|







100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
}

#define Tcl_MacOSXOpenBundleResources (int (*) _ANSI_ARGS_(( \
		Tcl_Interp *, CONST char *, int, int, char *))) Tcl_WinUtfToTChar
#define Tcl_MacOSXOpenVersionedBundleResources (int (*) _ANSI_ARGS_(( \
		Tcl_Interp *, CONST char *, CONST char *, int, int, char *))) Tcl_WinTCharToUtf

#elif !defined(__WIN32__) /* UNIX and MAC */
#   define TclWinGetPlatformId (int (*)()) TclpCreateTempFile
#   ifndef MAC_OSX_TCL
#	define Tcl_MacOSXOpenBundleResources 0
#	define Tcl_MacOSXOpenVersionedBundleResources 0
#   endif
#endif