Some work

2026-01-22 21:08:02 -08:00
parent eca8ae3d3e
commit f67ed56d52
12 changed files with 488 additions and 38 deletions
@@ -76,15 +76,16 @@ static ALWAYS_INLINE LispVal *MAKE_LISP_FLOAT(lisp_float_t flt) {
 // ###############
 // # Other types #
 // ###############
+// Make sure this is kept up to date with byterun.h
 typedef enum {
-    TYPE_FIXNUM,
-    TYPE_FLOAT,
-    TYPE_CONS,
-    TYPE_STRING,
-    TYPE_SYMBOL,
-    TYPE_VECTOR,
-    TYPE_HASH_TABLE,
-    TYPE_FUNCTION,
+    TYPE_FIXNUM = 0,
+    TYPE_FLOAT = 1,
+    TYPE_CONS = 2,
+    TYPE_STRING = 3,
+    TYPE_SYMBOL = 4,
+    TYPE_VECTOR = 5,
+    TYPE_HASH_TABLE = 6,
+    TYPE_FUNCTION = 7,
    N_LISP_TYPES,
 } LispValType;
 extern const char *LISP_TYPE_NAMES[N_LISP_TYPES];