summaryrefslogtreecommitdiffstats
path: root/socket.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2017-03-17 20:34:47 -0700
committerKaz Kylheku <kaz@kylheku.com>2017-03-17 20:34:47 -0700
commit3f4586d1ee813ecd23456956d5f2c7f4759a5922 (patch)
tree402e17e4fa35841409bf1ccb33ea112009b8dcfe /socket.c
parentfbb35f10c305128e865f7c16e21f61ea6e62083e (diff)
downloadtxr-3f4586d1ee813ecd23456956d5f2c7f4759a5922.tar.gz
txr-3f4586d1ee813ecd23456956d5f2c7f4759a5922.tar.bz2
txr-3f4586d1ee813ecd23456956d5f2c7f4759a5922.zip
Rename badly named default_bool_arg
* lib.h (default_bool_arg): Inline function renamed to default_null_arg. * eval.c (if_fun, pad, ginterate, giterate, range_star, range, constantp, macroexpand_1, macro_form_p, expand_with_free_refs, do_expand, eval_intrinsic, func_get_name, make_env_intrinsic): Follow rename. * arith.c (lognot): Likewise. * gc.c (gc_finalize): Likewise. * glob.c (glob_wrap): Likewise. * hash.c (group_reduce, gethash_n): Likewise. * lib.c (print, multi_sort, lazy_str, vector, iff, tok_str, split_str_keep, search_str, remove_if, val): Likewise. * match.c (match_fun): Likewise. * parser.c (lisp_parse_impl, regex_parse): Likewise. * rand.c (make_random_state): Likewise. * regex.c (read_until_match, search_regex, regex_compile): Likewise. * socket.c (sock_accept, sock_connect): Likewise. * stream.c (open_files_star, open_files, run, open_process, open_tail, get_string, record_adapter): Likewise. * struct.c (static_slot_ensure, static_slot_ens_rec, clear_struct, make_struct_type): Likewise. * sysif.c (exec_wrap, errno_wrap, cobj_ops_init): Likewise. * unwind.c (uw_capture_cont, uw_find_frames_impl): Likewise.
Diffstat (limited to 'socket.c')
-rw-r--r--socket.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/socket.c b/socket.c
index 0ef35048..5ecaa78c 100644
--- a/socket.c
+++ b/socket.c
@@ -787,7 +787,7 @@ static val sock_connect(val sock, val sockaddr, val timeout)
sockaddr_pack(sockaddr, family, &sa, &salen);
if (to_connect(c_num(sfd), coerce(struct sockaddr *, &sa), salen,
- sock, sockaddr, default_bool_arg(timeout)) != 0)
+ sock, sockaddr, default_null_arg(timeout)) != 0)
uw_throwf(socket_error_s, lit("sock-connect ~s to addr ~s: ~d/~s"),
sock, sockaddr, num(errno), string_utf8(strerror(errno)), nao);
@@ -861,7 +861,7 @@ static val sock_accept(val sock, val mode_str, val timeout_in)
struct sockaddr_storage sa;
socklen_t salen = sizeof sa;
val peer = nil;
- val timeout = default_bool_arg(timeout_in);
+ val timeout = default_null_arg(timeout_in);
if (!sfd)
goto badfd;