diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2017-08-07 13:09:42 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2017-08-07 13:09:42 -0700 |
| commit | bde7b8dfe688ce05f445b5ed18f22d6b2a526c3a (patch) | |
| tree | 51cdb9bd8ab7673dda15cbcbc5ac65be59ceb478 /eval.c | |
| parent | 1a18561313f4a66e5e454b48c08be160d9fe6c18 (diff) | |
| download | txr-bde7b8dfe688ce05f445b5ed18f22d6b2a526c3a.tar.gz txr-bde7b8dfe688ce05f445b5ed18f22d6b2a526c3a.tar.bz2 txr-bde7b8dfe688ce05f445b5ed18f22d6b2a526c3a.zip | |
New spl and tok: variants of tok-str and split-str.
* eval.c (eval_init): Register spl and tok intrinsics.
* lib.c (spl, tok): New functions.
* txr.1: Documented.
Diffstat (limited to 'eval.c')
| -rw-r--r-- | eval.c | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -6032,8 +6032,10 @@ void eval_init(void) reg_fun(intern(lit("replace-str"), user_package), func_n4o(replace_str, 2)); reg_fun(intern(lit("cat-str"), user_package), func_n2o(cat_str, 1)); reg_fun(intern(lit("split-str"), user_package), func_n3o(split_str_keep, 2)); + reg_fun(intern(lit("spl"), user_package), func_n3o(spl, 2)); reg_fun(intern(lit("split-str-set"), user_package), func_n2(split_str_set)); reg_fun(intern(lit("tok-str"), user_package), func_n3o(tok_str, 2)); + reg_fun(intern(lit("tok"), user_package), func_n3o(tok, 2)); reg_fun(intern(lit("tok-where"), user_package), func_n2(tok_where)); reg_fun(intern(lit("list-str"), user_package), func_n1(list_str)); reg_fun(intern(lit("trim-str"), user_package), func_n1(trim_str)); |