Builtin function argument parsing

2026-01-19 23:29:14 -08:00
parent c63b104bc6
commit 243a012d3e
11 changed files with 243 additions and 50 deletions
--- a/src/hashtable.h
+++ b/src/hashtable.h
@ -23,4 +23,9 @@ DECLARE_FUNCTION(puthash, (LispVal * ht, LispVal *key, LispVal *val));
 DECLARE_FUNCTION(remhash, (LispVal * ht, LispVal *key));
 DECLARE_FUNCTION(hash_table_count, (LispVal * ht));

+static ALWAYS_INLINE size_t HASH_TABLE_COUNT(LispVal *ht) {
+    assert(HASH_TABLE_P(ht));
+    return ((LispHashTable *) ht)->count;
+}
+
 #endif