add dict

1 files changed, 4 insertions, 2 deletions

diff --git a/exts/vector.c b/exts/vector.c
index 0aa3006..d6d07dc 100644
--- a/exts/vector.c
+++ b/exts/vector.c
@@ -1,10 +1,12 @@
 #include "interp.h"
 #include "sexp.h"
 
+#define VECTOR_TYPEID "ext.core.vector"
+
 LispUserdataMeta bamboo_lisp_array_meta;
 
 static bool is_vector_impl(Interp *interp, SExpRef vec) {
-    if (VALTYPE(vec) == kUserDataSExp && strcmp("vector", REF(vec)->userdata_meta->type) == 0) {
+    if (VALTYPE(vec) == kUserDataSExp && strcmp(VECTOR_TYPEID, REF(vec)->userdata_meta->type) == 0) {
         return true;
     }
     return false;
@@ -112,7 +114,7 @@ static void vector_gcmark(Interp *interp, SExpPtrVector *gcstack, void *vself) {
 
 
 int bamboo_lisp_ext_init(Interp *interp) {
-    bamboo_lisp_array_meta.type = "vector";
+    bamboo_lisp_array_meta.type = VECTOR_TYPEID;
     bamboo_lisp_array_meta.free = &vector_free;
     bamboo_lisp_array_meta.gcmark = &vector_gcmark;