* hash.c (group_by): New function.

* hash.h (group_by): Declared.

* eval.c (eval_init): group_by registered as group-by intrinsic.

* txr.1: Documented.

1 files changed, 1 insertions, 0 deletions

diff --git a/hash.h b/hash.h
index e6b82881..f927889c 100644
--- a/hash.h
+++ b/hash.h
@@ -47,6 +47,7 @@ val hash_eql(val obj);
 val hash_equal(val obj);
 val hashv(val args);
 val hash_construct(val hashv_args, val pairs);
+val group_by(val func, val seq, val hashv_args);
 val hash_keys(val hash);
 val hash_values(val hash);
 val hash_pairs(val hash);