diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2014-12-23 09:13:13 -0800 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2014-12-23 09:13:13 -0800 |
| commit | e68f3828d79d16d2afc929c83d499e8e2e0dd38a (patch) | |
| tree | b66ed1583320df34484fdb0c474d953ef48570a7 /eval.c | |
| parent | ebb980b2ee0414ca4369049f489ad8e6ce1ad148 (diff) | |
| download | txr-e68f3828d79d16d2afc929c83d499e8e2e0dd38a.tar.gz txr-e68f3828d79d16d2afc929c83d499e8e2e0dd38a.tar.bz2 txr-e68f3828d79d16d2afc929c83d499e8e2e0dd38a.zip | |
* eval.c (eval_init): Registered intrinsic function unique.
* lib.c (unique): New function.
(uniq): Becomes wrapper around unique.
* lib.h (unique): Declared.
* txr.1: Documented unique, and equivalence between uniq and unique.
* tl.vim, txr.vim: Regenerated.
Diffstat (limited to 'eval.c')
| -rw-r--r-- | eval.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -3776,6 +3776,7 @@ void eval_init(void) reg_fun(intern(lit("hash-isec"), user_package), func_n3o(hash_isec, 2)); reg_fun(intern(lit("group-by"), user_package), func_n2v(group_by)); reg_fun(intern(lit("sort-group"), user_package), func_n3o(sort_group, 1)); + reg_fun(intern(lit("unique"), user_package), func_n2ov(unique, 1)); reg_fun(intern(lit("uniq"), user_package), func_n1(uniq)); reg_fun(intern(lit("hash-update"), user_package), func_n2(hash_update)); reg_fun(intern(lit("hash-update-1"), user_package), |