From 93e4c50d09dcc20d7b244b66987f869143d45dd0 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Wed, 14 Dec 2011 17:14:29 -0800 Subject: * eval.c (eval_init): Removed registration for vec_get_fil. Renamed vec_set_fill to vec-set-length. * hash.c (equal_hash): vec_fill to vec_length name change. (hash_grow, make_hash): No need to call vec_set_length. * lib.c (equal, vecref, vec_push, length_vec, list_vector, obj_print, obj_pprint): vec_fill to vec_length name change. (vector): Argument now represents actual length, not just allocated size. (vec_get_fill): Function removed; did exactly the same thing as length_vec. (vec_set_fill): Function renamed to vec_set_length. (vector_list): Allocate a 0 length vector initially. * lib.h (enum vecindex): member changes name from vec_fill to vec_length. (vector): Parameter name changed. (vec_set_fill): Redeclared. (vec_get_fill): Declaration removed. * txr.1: Doc stubs updated. --- lib.h | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) (limited to 'lib.h') diff --git a/lib.h b/lib.h index c4a0f72a..30fd35c1 100644 --- a/lib.h +++ b/lib.h @@ -118,7 +118,7 @@ struct func { } f; }; -enum vecindex { vec_alloc = -2, vec_fill = -1 }; +enum vecindex { vec_alloc = -2, vec_length = -1 }; struct vec { type_t type; @@ -491,9 +491,8 @@ val chain(val first_fun, ...); val andf(val first_fun, ...); val orf(val first_fun, ...); val swap_12_21(val fun); -val vector(val alloc); -val vec_get_fill(val vec); -val vec_set_fill(val vec, val fill); +val vector(val length); +val vec_set_length(val vec, val fill); val vecref(val vec, val ind); val *vecref_l(val vec, val ind); val vec_push(val vec, val item); -- cgit v1.2.3