ref: 9b49e112e8c21038d7c8b8d45eb4ac48b68e045b
dir: /equalhash.c/
#include "flisp.h" #include "equalhash.h" #include "equal.h" #include "htable.inc" #define _equal_lispvalue_(x, y) equal_lispvalue((value_t)(x), (value_t)(y)) HTIMPL(equalhash, hash_lispvalue, _equal_lispvalue_)