diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2016-03-15 04:47:16 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2016-03-15 04:47:16 -0700 |
| commit | 6737b7efe2f4ef7ad4e8f6b2716ada469ef3913d (patch) | |
| tree | e6c487eb0ff6377f33b4d5beed95c64c2c523508 /lib.h | |
| parent | b5a234ce8479e609e6153b5bec106504d4a740c1 (diff) | |
| download | txr-6737b7efe2f4ef7ad4e8f6b2716ada469ef3913d.tar.gz txr-6737b7efe2f4ef7ad4e8f6b2716ada469ef3913d.tar.bz2 txr-6737b7efe2f4ef7ad4e8f6b2716ada469ef3913d.zip | |
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.
Diffstat (limited to 'lib.h')
| -rw-r--r-- | lib.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -429,7 +429,7 @@ extern val eof_s, eol_s, assert_s, name_s; extern val error_s, type_error_s, internal_error_s; extern val numeric_error_s, range_error_s; extern val query_error_s, file_error_s, process_error_s, syntax_error_s; -extern val system_error_s; +extern val system_error_s, timeout_error_s; extern val gensym_counter_s; #define gensym_counter (deref(lookup_var_l(nil, gensym_counter_s))) |