From 13142dc7f38e6b148efadc97edffca8664b9cde7 Mon Sep 17 00:00:00 2001
From: Aryadev Chavali <aryadev@aryadevchavali.com>
Date: Wed, 20 Aug 2025 22:43:23 +0100
Subject: 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.
---
 tag.c | 12 ++++--------
 1 file changed, 4 insertions(+), 8 deletions(-)

(limited to 'tag.c')

diff --git a/tag.c b/tag.c
index f5338d6..874d532 100644
--- a/tag.c
+++ b/tag.c
@@ -27,9 +27,9 @@ lisp_t *tag_sym(sv_t *str)
   return TAG((u64)str, SYM);
 }
 
-lisp_t *tag_vec(lvec_t *lvec)
+lisp_t *tag_vec(vec_t *vec)
 {
-  return TAG((u64)lvec, VEC);
+  return TAG((u64)vec, VEC);
 }
 
 lisp_t *tag_cons(cons_t *cons)
@@ -69,12 +69,8 @@ cons_t *as_cons(lisp_t *obj)
   return (cons_t *)UNTAG(obj, CONS);
 }
 
-void *as_vec(lisp_t *obj)
+vec_t *as_vec(lisp_t *obj)
 {
   assert(IS_TAG(obj, VEC));
-  lvec_t *vec = (lvec_t *)UNTAG(obj, VEC);
-  if (vec)
-    return vec->data;
-  else
-    return NULL;
+  return (vec_t *)UNTAG(obj, VEC);
 }
-- 
cgit v1.2.3-13-gbd6f