ref: 2e916a41db4a82fa7f90ae1805dc7b0dc8c43d3a
dir: /equalhash.c/
#ifdef PLAN9 #include <u.h> #include <libc.h> #else #include <stdlib.h> #include <stdio.h> #include <string.h> #include <assert.h> #include <limits.h> #include <setjmp.h> #endif #include "llt.h" #include "flisp.h" #include "equalhash.h" #include "htable.inc" #define _equal_lispvalue_(x,y) equal_lispvalue((value_t)(x),(value_t)(y)) HTIMPL(equalhash, hash_lispvalue, _equal_lispvalue_)