comparison src/process.c @ 30:ec9a17fef872 r19-15b98

Import from CVS: tag r19-15b98
author cvs
date Mon, 13 Aug 2007 08:52:29 +0200
parents 441bb1e64a06
children c53a95d3c46d
comparison
equal deleted inserted replaced
29:7976500f47f9 30:ec9a17fef872
1287 static int 1287 static int
1288 get_internet_address (Lisp_Object host, struct sockaddr_in *address, 1288 get_internet_address (Lisp_Object host, struct sockaddr_in *address,
1289 Error_behavior errb) 1289 Error_behavior errb)
1290 { 1290 {
1291 struct hostent *host_info_ptr; 1291 struct hostent *host_info_ptr;
1292 #ifdef TRY_AGAIN
1293 int count = 0;
1294 #endif
1292 1295
1293 #ifndef HAVE_TERM 1296 #ifndef HAVE_TERM
1294 memset (address, 0, sizeof (*address)); 1297 memset (address, 0, sizeof (*address));
1295 1298
1296 while (1) 1299 while (1)
1297 { 1300 {
1298 #ifdef TRY_AGAIN 1301 #ifdef TRY_AGAIN
1302 if (count++ > 10) break;
1299 h_errno = 0; 1303 h_errno = 0;
1300 #endif 1304 #endif
1301 /* Some systems can't handle SIGIO/SIGALARM in gethostbyname. */ 1305 /* Some systems can't handle SIGIO/SIGALARM in gethostbyname. */
1302 slow_down_interrupts (); 1306 slow_down_interrupts ();
1303 host_info_ptr = gethostbyname ((char *) XSTRING_DATA (host)); 1307 host_info_ptr = gethostbyname ((char *) XSTRING_DATA (host));