--- a/UnixOperatingSystem.st Thu Mar 27 14:28:00 2003 +0100
+++ b/UnixOperatingSystem.st Thu Mar 27 14:44:13 2003 +0100
@@ -995,76 +995,6 @@
# endif
#endif
-/*
- * gethostbyname seems to have trouble
- * sometimes, if interrupted while a request
- * is on its way the name server.
- * (although specified in the man-page,
- * a check on TRY_AGAIN fails on iris)
- */
-#ifdef LINUX
-
-# define GETHOSTBYNAME(hp, name) \
- hp = gethostbyname((char *) name);
-
-# define GETHOSTBYADDR(hp, addr, alen, af) \
- hp = gethostbyaddr(addr, alen, af);
-
-#else
-
-# ifdef IRIX5_3
-# define GETHOSTBYNAME(hp, name) \
- do { \
- __BEGIN_INTERRUPTABLE__ \
- hp = gethostbyname((char *) name); \
- __END_INTERRUPTABLE__ \
- } while ((hp == NULL) && \
- ((h_errno == TRY_AGAIN) || (errno == ECONNREFUSED)));
-
-# define GETHOSTBYADDR(hp, addr, alen, af) \
- do { \
- __BEGIN_INTERRUPTABLE__ \
- hp = gethostbyaddr(addr, alen, af); \
- __END_INTERRUPTABLE__ \
- } while ((hp == NULL) && \
- ((h_errno == TRY_AGAIN) || (errno == ECONNREFUSED)));
-# else
-# ifdef USE_H_ERRNO
-# define GETHOSTBYNAME(hp, name) \
- do { \
- __BEGIN_INTERRUPTABLE__ \
- hp = gethostbyname((char *) name); \
- __END_INTERRUPTABLE__ \
- } while ((hp == NULL) && (h_errno == TRY_AGAIN));
-
-# define GETHOSTBYADDR(hp, addr, alen, af) \
- do { \
- __BEGIN_INTERRUPTABLE__ \
- hp = gethostbyaddr(addr, alen, af); \
- __END_INTERRUPTABLE__ \
- } while ((hp == NULL) && (h_errno == TRY_AGAIN));
-# else
-# define GETHOSTBYNAME(hp, name) \
- __BEGIN_INTERRUPTABLE__ \
- hp = gethostbyname((char *) name); \
- __END_INTERRUPTABLE__
-
-# define GETHOSTBYADDR(hp, addr, alen, af) \
- __BEGIN_INTERRUPTABLE__ \
- hp = gethostbyaddr(addr, alen, af); \
- __END_INTERRUPTABLE__
-# endif
-# endif
-#endif
-
-#ifdef DEBUG
-# define DBGPRINTF(x) { if (__debugging__) printf x; }
-# define DBGFPRINTF(x) { if (__debugging__) fprintf x; }
-#else
-# define DBGPRINTF(x) /* as nothing */
-# define DBGFPRINTF(x) /* as nothing */
-#endif
-
%}
! !
@@ -11771,7 +11701,6 @@
}
if (!__isNonNilObject(socketAddress) ||
(__intVal(__ClassInstPtr(__qClass(socketAddress))->c_flags) & ARRAYMASK) != BYTEARRAY) {
- DBGPRINTF(("SOCKET: bad socket address"));
error = @symbol(badArgument1);
goto err;
}
@@ -12767,7 +12696,7 @@
!UnixOperatingSystem class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/UnixOperatingSystem.st,v 1.149 2003-03-27 13:28:00 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/UnixOperatingSystem.st,v 1.150 2003-03-27 13:44:13 stefan Exp $'
! !
UnixOperatingSystem initialize!