#ifndef INCLUDED_HASHTABLE_H
#define INCLUDED_HASHTABLE_H

#include "base.h"

struct HashTableBucket {
    uintptr_t hash;
    LispVal *key;
    LispVal *value;
};

DEFOBJTYPE(HashTable, HASH_TABLE, HASH_TABLE_P, {
    LispVal *hash_fn;
    LispVal *eq_fn;
    struct HashTableBucket *data;
    size_t size;
    size_t count;
});

DECLARE_FUNCTION(make_hash_table, (LispVal * hash_fn, LispVal *eq_fn));
DECLARE_FUNCTION(gethash, (LispVal * ht, LispVal *key, LispVal *def));
DECLARE_FUNCTION(puthash, (LispVal * ht, LispVal *key, LispVal *val));
DECLARE_FUNCTION(remhash, (LispVal * ht, LispVal *key));
DECLARE_FUNCTION(hash_table_count, (LispVal * ht));

#endif