diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-11-23 12:21:35 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-11-23 12:21:35 (GMT) |
| commit | 160a58238a314e252d6155d20c097f56f1e7738e (patch) | |
| tree | c953cb233561186ab6713fdf56ee5da2721efc6c /generic | |
| parent | dd0e9cf6b16cf0a4331b972cb7fac3786644587d (diff) | |
| download | tcl-160a58238a314e252d6155d20c097f56f1e7738e.zip tcl-160a58238a314e252d6155d20c097f56f1e7738e.tar.gz tcl-160a58238a314e252d6155d20c097f56f1e7738e.tar.bz2 | |
If compiled with -DTCL_NO_DEPRECATED, remove stub entry for TclWinGetPlatformId()
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tclStubInit.c | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c index 808f5d3..355cb90 100644 --- a/generic/tclStubInit.c +++ b/generic/tclStubInit.c @@ -69,6 +69,7 @@ static int TclSockMinimumBuffersOld(int sock, int size) # define TclWinGetSockOpt 0 # define TclWinSetSockOpt 0 # define TclWinNToHS 0 +# define TclWinGetPlatformId 0 # define TclBNInitBignumFromWideUInt 0 # define TclBNInitBignumFromWideInt 0 # define TclBNInitBignumFromLong 0 @@ -101,17 +102,22 @@ static const char *TclGetStartupScriptFileName(void) #if defined(_WIN32) || defined(__CYGWIN__) #undef TclWinNToHS +#undef TclWinGetPlatformId +#ifndef TCL_NO_DEPRECATED #define TclWinNToHS winNToHS static unsigned short TclWinNToHS(unsigned short ns) { return ntohs(ns); } -#undef TclWinGetPlatformId #define TclWinGetPlatformId winGetPlatformId static int TclWinGetPlatformId() { return 2; /* VER_PLATFORM_WIN32_NT */; } +#else +#define TclWinNToHS 0 +#define TclWinGetPlatformId 0 +#endif #endif # define TclBNInitBignumFromWideUInt TclInitBignumFromWideUInt # define TclBNInitBignumFromWideInt TclInitBignumFromWideInt |