* hash.c (hash_construct): Nullify the pairs argument so that

it works correctly with an empty vector.

* txr.1: Write missing documentation for hash-construct.

1 files changed, 2 insertions, 0 deletions

diff --git a/hash.c b/hash.c
index f4692d56..92a05191 100644
--- a/hash.c
+++ b/hash.c
@@ -812,6 +812,8 @@ val hash_construct(val hashv_args, val pairs)
 {
   val hash = hashv(hashv_args);
 
+  pairs = nullify(pairs);
+
   for (; pairs; pairs = cdr(pairs)) {
     val pair = car(pairs);
     sethash(hash, first(pair), second(pair));