From 399b4b6a5082aa6f14a98bc50b29baeca686aa39 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Tue, 11 Jun 2013 16:15:34 -0700 Subject: * eval.c (eval_init): tok-str acquires new parameter * lib.c (tok_str): New parameter, keep_sep. * lib.h (tok_str): Declaration updated. * txr.1: Documentation for tok-str updated. --- eval.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'eval.c') diff --git a/eval.c b/eval.c index 77209599..1c8664be 100644 --- a/eval.c +++ b/eval.c @@ -2368,7 +2368,7 @@ void eval_init(void) reg_fun(intern(lit("cat-str"), user_package), func_n2o(cat_str, 1)); reg_fun(intern(lit("split-str"), user_package), func_n2(split_str)); reg_fun(intern(lit("split-str-set"), user_package), func_n2(split_str_set)); - reg_fun(intern(lit("tok-str"), user_package), func_n2(tok_str)); + reg_fun(intern(lit("tok-str"), user_package), func_n3o(tok_str, 1)); reg_fun(intern(lit("list-str"), user_package), func_n1(list_str)); reg_fun(intern(lit("trim-str"), user_package), func_n1(trim_str)); reg_fun(intern(lit("string-lt"), user_package), func_n2(string_lt)); -- cgit v1.2.3