From 3f4586d1ee813ecd23456956d5f2c7f4759a5922 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Fri, 17 Mar 2017 20:34:47 -0700 Subject: 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. --- sysif.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'sysif.c') diff --git a/sysif.c b/sysif.c index 9be964ed..d19c041d 100644 --- a/sysif.c +++ b/sysif.c @@ -112,7 +112,7 @@ static val at_exit_list; static val errno_wrap(val newval) { val oldval = num(errno); - if (default_bool_arg(newval)) + if (default_null_arg(newval)) errno = c_num(newval); return oldval; } @@ -558,7 +558,7 @@ static val dup_wrap(val old, val neu) val exec_wrap(val file, val args_opt) { - val args = default_bool_arg(args_opt); + val args = default_null_arg(args_opt); int nargs = c_num(length(args)) + 1; char **argv = coerce(char **, chk_malloc((nargs + 1) * sizeof *argv)); val iter; -- cgit v1.2.3