comparison src/process.c @ 257:65c19d2020f7 r20-5b27

Import from CVS: tag r20-5b27
author cvs
date Mon, 13 Aug 2007 10:22:03 +0200
parents 084402c475ba
children 11cf20601dec
comparison
equal deleted inserted replaced
256:19076a51efde 257:65c19d2020f7
1274 struct hostent *host_info_ptr = NULL; 1274 struct hostent *host_info_ptr = NULL;
1275 #ifdef TRY_AGAIN 1275 #ifdef TRY_AGAIN
1276 int count = 0; 1276 int count = 0;
1277 #endif 1277 #endif
1278 1278
1279 #ifndef HAVE_TERM
1280 memset (address, 0, sizeof (*address)); 1279 memset (address, 0, sizeof (*address));
1281 1280
1282 while (1) 1281 while (1)
1283 { 1282 {
1284 #ifdef TRY_AGAIN 1283 #ifdef TRY_AGAIN
1447 errno = xerrno; 1446 errno = xerrno;
1448 report_file_error ("connection failed", list2 (host, name)); 1447 report_file_error ("connection failed", list2 (host, name));
1449 } 1448 }
1450 1449
1451 speed_up_interrupts (); 1450 speed_up_interrupts ();
1452
1453 #else /* HAVE_TERM */
1454 s = connect_server (0);
1455 if (s < 0)
1456 report_file_error ("error creating socket", Fcons (name, Qnil));
1457 send_command (s, C_PORT, 0, "%s:%d", XSTRING_DATA (host), ntohs (port));
1458 send_command (s, C_DUMB, 1, 0);
1459 #endif /* HAVE_TERM */
1460 1451
1461 inch = s; 1452 inch = s;
1462 outch = dup (s); 1453 outch = dup (s);
1463 if (outch < 0) 1454 if (outch < 0)
1464 { 1455 {