* hash.c (hash_revget): New function.

* hash.h (hash_revget): Declared.

* eval.c (eval_init): Registered hash-revget intrinsic.

* txr.1: Documented hash-revget.

1 files changed, 1 insertions, 0 deletions

diff --git a/hash.h b/hash.h
index a732698a..afc24a0c 100644
--- a/hash.h
+++ b/hash.h
@@ -62,6 +62,7 @@ val hash_subset(val hash1, val hash2);
 val hash_proper_subset(val hash1, val hash2);
 val hash_update(val hash, val fun);
 val hash_update_1(val hash, val key, val fun, val init);
+val hash_revget(val hash, val value, val test, val keyfun);
 
 void hash_process_weak(void);