UnixOperatingSystem.st
changeset 7137 8cda0aa2910f
parent 7136 aedf0aa8273b
child 7138 4a98076d98fb
--- 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!