summaryrefslogtreecommitdiffstats
path: root/match.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 /match.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 'match.c')
-rw-r--r--match.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/match.c b/match.c
index 6fda6f19..b7692e11 100644
--- a/match.c
+++ b/match.c
@@ -4561,12 +4561,12 @@ val match_fun(val name, val args, val input_in, val files_in)
{
val call = cons(name, args);
val spec = cons(cons(call, nil), nil);
- val input = default_bool_arg(input_in);
+ val input = default_null_arg(input_in);
val in_stream_p = streamp(input);
val curfile = if3(in_stream_p,
stream_get_prop(input, name_k),
lit("list"));
- val files = cons(curfile, default_bool_arg(files_in));
+ val files = cons(curfile, default_null_arg(files_in));
val in_bindings = cdr(uw_get_match_context());
val data = if3(streamp(input),
lazy_stream_cons(input),