diff options
author | donal.k.fellows@manchester.ac.uk <dkf> | 2007-12-03 21:39:03 (GMT) |
---|---|---|
committer | donal.k.fellows@manchester.ac.uk <dkf> | 2007-12-03 21:39:03 (GMT) |
commit | 3baf8f560e01e787e22a55594aa9e2b8246450ba (patch) | |
tree | be90b401905e415dad33a0610b89cb3cefb9ab5f /unix/tclUnixChan.c | |
parent | 41291c5f15e09e5394ad63b2d01f65ba992f900f (diff) | |
download | tcl-3baf8f560e01e787e22a55594aa9e2b8246450ba.zip tcl-3baf8f560e01e787e22a55594aa9e2b8246450ba.tar.gz tcl-3baf8f560e01e787e22a55594aa9e2b8246450ba.tar.bz2 |
Add extra #ifdef-fery to make code compile on BSD 5. [Bug 1618235, again]
Diffstat (limited to 'unix/tclUnixChan.c')
-rw-r--r-- | unix/tclUnixChan.c | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/unix/tclUnixChan.c b/unix/tclUnixChan.c index b4882c8..85cc82a 100644 --- a/unix/tclUnixChan.c +++ b/unix/tclUnixChan.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclUnixChan.c,v 1.87 2007/11/13 15:50:59 dkf Exp $ + * RCS: @(#) $Id: tclUnixChan.c,v 1.88 2007/12/03 21:39:04 dkf Exp $ */ #include "tclInt.h" /* Internal definitions for Tcl. */ @@ -2686,8 +2686,12 @@ CreateSocketAddress( switch (result) { case EAI_NONAME: case EAI_SERVICE: +#if defined(EAI_ADDRFAMILY) && EAI_ADDRFAMILY != EAI_NONAME case EAI_ADDRFAMILY: +#endif +#if defined(EAI_NODATA) && EAI_NODATA != EAI_NONAME case EAI_NODATA: +#endif *errorMsgPtr = gai_strerror(result); errno = EHOSTUNREACH; return 0; |