comparison src/process.c @ 108:360340f9fd5f r20-1b6

Import from CVS: tag r20-1b6
author cvs
date Mon, 13 Aug 2007 09:18:39 +0200
parents cf808b4c4290
children 8619ce7e4c50
comparison
equal deleted inserted replaced
107:523141596bda 108:360340f9fd5f
1291 static int 1291 static int
1292 get_internet_address (Lisp_Object host, struct sockaddr_in *address, 1292 get_internet_address (Lisp_Object host, struct sockaddr_in *address,
1293 Error_behavior errb) 1293 Error_behavior errb)
1294 { 1294 {
1295 struct hostent *host_info_ptr; 1295 struct hostent *host_info_ptr;
1296 #ifdef TRY_AGAIN
1297 int count = 0;
1298 #endif
1296 1299
1297 #ifndef HAVE_TERM 1300 #ifndef HAVE_TERM
1298 memset (address, 0, sizeof (*address)); 1301 memset (address, 0, sizeof (*address));
1299 1302
1300 while (1) 1303 while (1)
1301 { 1304 {
1302 #ifdef TRY_AGAIN 1305 #ifdef TRY_AGAIN
1306 if (count++ > 10) break;
1303 h_errno = 0; 1307 h_errno = 0;
1304 #endif 1308 #endif
1305 /* Some systems can't handle SIGIO/SIGALARM in gethostbyname. */ 1309 /* Some systems can't handle SIGIO/SIGALARM in gethostbyname. */
1306 slow_down_interrupts (); 1310 slow_down_interrupts ();
1307 host_info_ptr = gethostbyname ((char *) XSTRING_DATA (host)); 1311 host_info_ptr = gethostbyname ((char *) XSTRING_DATA (host));