diff options
| author | Paul A. Patience <paul@apatience.com> | 2021-07-09 23:59:09 -0400 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2021-07-09 23:28:14 -0700 |
| commit | 0287650c7477bf6b5811f0456b6fc3e9bbd3d245 (patch) | |
| tree | b3e2cecfd224365a759b5e63f6eebc422bd5b478 /eval.c | |
| parent | 004bcff7d950b277378536a21ea9cba34edf6b03 (diff) | |
| download | txr-0287650c7477bf6b5811f0456b6fc3e9bbd3d245.tar.gz txr-0287650c7477bf6b5811f0456b6fc3e9bbd3d245.tar.bz2 txr-0287650c7477bf6b5811f0456b6fc3e9bbd3d245.zip | |
lib: new function separate.
* lib.c (separate): New function.
* lib.h (separate): Declared.
* eval.c (eval_init): Register separate intrinsic.
* txr.1: Documented.
* stdlib/doc-syms.tl: Updated.
Diffstat (limited to 'eval.c')
| -rw-r--r-- | eval.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -6867,6 +6867,7 @@ void eval_init(void) reg_fun(intern(lit("keepql"), user_package), func_n3o(keepql, 2)); reg_fun(intern(lit("keepqual"), user_package), func_n3o(keepqual, 2)); reg_fun(intern(lit("keep-if"), user_package), func_n3o(keep_if, 2)); + reg_fun(intern(lit("separate"), user_package), func_n3o(separate, 2)); reg_fun(intern(lit("remq*"), user_package), func_n2(remq_lazy)); reg_fun(intern(lit("remql*"), user_package), func_n2(remql_lazy)); reg_fun(intern(lit("remqual*"), user_package), func_n2(remqual_lazy)); |