Adding clearhash function.

This is needed for an upcoming bugfix, so why not expose it as
an intrinsic.

* hash.c (clearhash): New function.
(hash_init): clearhash intrinsic registered.

* hash.h (clearhash): Declared.

* txr.1: Documented clearhash.

1 files changed, 1 insertions, 0 deletions

diff --git a/hash.h b/hash.h
index a0c40797..0f0db6df 100644
--- a/hash.h
+++ b/hash.h
@@ -39,6 +39,7 @@ val gethash_f(val hash, val key, loc found);
 val sethash(val hash, val key, val value);
 val pushhash(val hash, val key, val value);
 val remhash(val hash, val key);
+val clearhash(val hash);
 val hash_count(val hash);
 val get_hash_userdata(val hash);
 val set_hash_userdata(val hash, val data);