diff options
author | Aryadev Chavali <aryadev@aryadevchavali.com> | 2025-08-20 22:43:23 +0100 |
---|---|---|
committer | Aryadev Chavali <aryadev@aryadevchavali.com> | 2025-08-20 22:43:23 +0100 |
commit | 13142dc7f38e6b148efadc97edffca8664b9cde7 (patch) | |
tree | 068eb442645caf65e2ac2ff0a4d5f44f158c5a88 /constructor.c | |
parent | 6e2db6825d4ff4b57be3086f654a84cc9ff64bcf (diff) | |
download | alisp-13142dc7f38e6b148efadc97edffca8664b9cde7.tar.gz alisp-13142dc7f38e6b148efadc97edffca8664b9cde7.tar.bz2 alisp-13142dc7f38e6b148efadc97edffca8664b9cde7.zip |
refactor lisp runtime to use vec_t* instead of ivec_t*
bit nicer to look at, should have about the same painful performance
hit anyway.
Diffstat (limited to 'constructor.c')
-rw-r--r-- | constructor.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/constructor.c b/constructor.c index a20e66a..910ed2a 100644 --- a/constructor.c +++ b/constructor.c @@ -34,9 +34,9 @@ lisp_t *cons(sys_t *sys, lisp_t *car, lisp_t *cdr) lisp_t *make_vec(sys_t *sys, u64 capacity) { - lvec_t *lvec = calloc(1, sizeof(*lvec)); - ivec_make(&lvec->data, capacity); - lisp_t *ptr = tag_vec(lvec); + vec_t *vec = calloc(1, sizeof(*vec)); + vec_ensure_free(vec, MAX(capacity, VEC_DEFAULT_CAPACITY)); + lisp_t *ptr = tag_vec(vec); sys_register(sys, ptr); return ptr; } |