* hash.c (hash_grow, make_hash, make_similar_hash, copy_hash):

Pass second argument to vector.

* lib.c (vector): Takes additional argument specifying the value
for the slots of the vector.
(vector_list, sub_vec): Pass second argument to vector.

* lib.h (vector): Declaration updated.

* eval.c (eval_init): Register vector as two-argument function
with one required arg.

* txr.1: Updated.

1 files changed, 3 insertions, 2 deletions

diff --git a/txr.1 b/txr.1
index d7bdfd0d..734c333e 100644
--- a/txr.1
+++ b/txr.1
@@ -8775,13 +8775,14 @@ collation orders.
 .TP
 Syntax:
 
-  (vector <length>)
+  (vector <length> [<initval>])
 
 .TP
 Description:
 
 The vector function creates and returns a vector object of the specified
-length.  The elements of the vector are initialized to nil.
+length.  The elements of the vector are initialized to <initval>,
+or to nil if <initval> is omitted.
 
 .SS Function vec