shithub: sl

ref: 9ceaddc0e5d8146dabfe56aea3acd54bf7e25ea3
dir: /src/equalhash.c/

View raw version 
#include "flisp.h"
#include "equalhash.h"
#include "equal.h"

#define HTNAME(suffix) equalhash##suffix
#define HFUNC(v) hash_lispvalue((value_t)(v))
#define EQFUNC(x, y) equal_lispvalue((value_t)(x), (value_t)(y))

#include "htable.inc"