* 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.

1 files changed, 7 insertions, 7 deletions

diff --git a/tl.vim b/tl.vim
index d514afe7..eec18127 100644
--- a/tl.vim
+++ b/tl.vim
@@ -177,13 +177,13 @@ syn keyword txl_keyword contained tree-find trie-add trie-compress trie-lookup-b
 syn keyword txl_keyword contained trie-lookup-feed-char trie-value-at trim-str true
 syn keyword txl_keyword contained trunc tuples txr-case txr-if
 syn keyword txl_keyword contained txr-when typeof unget-byte unget-char
-syn keyword txl_keyword contained uniq unless unquote until
-syn keyword txl_keyword contained upcase-str update url-decode url-encode
-syn keyword txl_keyword contained usleep uw-protect vec vec-push
-syn keyword txl_keyword contained vec-set-length vecref vector vector-list
-syn keyword txl_keyword contained vectorp when where while
-syn keyword txl_keyword contained with-saved-vars wrap wrap* zerop
-syn keyword txl_keyword contained zip
+syn keyword txl_keyword contained uniq unique unless unquote
+syn keyword txl_keyword contained until upcase-str update url-decode
+syn keyword txl_keyword contained url-encode usleep uw-protect vec
+syn keyword txl_keyword contained vec-push vec-set-length vecref vector
+syn keyword txl_keyword contained vector-list vectorp when where
+syn keyword txl_keyword contained while with-saved-vars wrap wrap*
+syn keyword txl_keyword contained zerop zip
 syn match txr_metanum "@[0-9]\+"
 syn match txr_nested_error "[^\t `]\+" contained