Implement socket timeouts.

* lib.c (timeout_error_s): New symbol variable.
(obj_init): Intern timeout-error, init new variable.

* lib.h (timeout_error_s): Declared.

* socket.c (sock_timeout, sock_send_timeout,
sock_recv_timeout): New static functions.
(sock_load_init): Register sock-send-timeout and
sock-recv-timeout intrinsics.

* stream.c (stdio_maybe_read_error, stdio_maybe_error):
Convert EAGAIN into timeout_error_s.

* txr.1: Documented.

1 files changed, 1 insertions, 0 deletions

diff --git a/unwind.c b/unwind.c
index dfc1d812..e7257896 100644
--- a/unwind.c
+++ b/unwind.c
@@ -862,6 +862,7 @@ void uw_init(void)
   uw_register_subtype(file_error_s, error_s);
   uw_register_subtype(process_error_s, error_s);
   uw_register_subtype(system_error_s, error_s);
+  uw_register_subtype(timeout_error_s, error_s);
   uw_register_subtype(assert_s, error_s);
   uw_register_subtype(syntax_error_s, error_s);
 }