diff options
| author | zv@archiware.com <vasiljevic> | 2006-09-08 11:15:12 (GMT) |
|---|---|---|
| committer | zv@archiware.com <vasiljevic> | 2006-09-08 11:15:12 (GMT) |
| commit | 56b9acb7070133b5c321edab574ee5d701d6796d (patch) | |
| tree | a4016e0af21e44d3704ec35ce062207611844550 /unix/tclUnixCompat.c | |
| parent | 966f57bf2974c9b6d9adde3798d6bc30a1bf5d73 (diff) | |
| download | tcl-56b9acb7070133b5c321edab574ee5d701d6796d.zip tcl-56b9acb7070133b5c321edab574ee5d701d6796d.tar.gz tcl-56b9acb7070133b5c321edab574ee5d701d6796d.tar.bz2 | |
For Darwin, assume gethostbyname() and gethostbyaddr() are MT-safe
starting with Dariwn 6 (Mac OSX 10.2) or later.
Diffstat (limited to 'unix/tclUnixCompat.c')
| -rw-r--r-- | unix/tclUnixCompat.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/unix/tclUnixCompat.c b/unix/tclUnixCompat.c index c719b59..5ab7ea3 100644 --- a/unix/tclUnixCompat.c +++ b/unix/tclUnixCompat.c @@ -6,7 +6,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclUnixCompat.c,v 1.1.2.5 2006/09/07 18:49:29 vasiljevic Exp $ + * RCS: @(#) $Id: tclUnixCompat.c,v 1.1.2.6 2006/09/08 11:15:14 vasiljevic Exp $ * */ @@ -561,7 +561,7 @@ TclpGetGrGid(gid_t gid) struct hostent * TclpGetHostByName(const char *name) { -#if !defined(TCL_THREADS) +#if !defined(TCL_THREADS) || defined(HAVE_MTSAFE_GETHOSTBYNAME) return gethostbyname(name); #else ThreadSpecificData *tsdPtr = TCL_TSD_INIT(&dataKey); @@ -622,7 +622,7 @@ TclpGetHostByName(const char *name) struct hostent * TclpGetHostByAddr(const char *addr, int length, int type) { -#if !defined(TCL_THREADS) +#if !defined(TCL_THREADS) || defined(HAVE_MTSAFE_GETHOSTBYADDR) return gethostbyaddr(addr, length, type); #else ThreadSpecificData *tsdPtr = TCL_TSD_INIT(&dataKey); |