1381 |
forecast_download t 0; (* The TCP ACK packet *) |
forecast_download t 0; (* The TCP ACK packet *) |
1382 |
forecast_upload t 0; (* The TCP ACK packet *) |
forecast_upload t 0; (* The TCP ACK packet *) |
1383 |
t |
t |
1384 |
| Unix.Unix_error (Unix.ENETUNREACH,_,_) as e -> raise e |
| Unix.Unix_error (Unix.ENETUNREACH,_,_) as e -> |
1385 |
|
close t Closed_connect_failed; |
1386 |
|
raise e |
1387 |
| e -> |
| e -> |
1388 |
lprintf "For host %s:%d " |
lprintf "For host %s:%d " |
1389 |
(Unix.string_of_inet_addr host) port; |
(Unix.string_of_inet_addr host) port; |