2019-08-09 13:20:17 -04:00
|
|
|
#include <stdarg.h>
|
2008-11-28 16:44:59 -05:00
|
|
|
#include <stdlib.h>
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <string.h>
|
|
|
|
#include <assert.h>
|
|
|
|
#include <limits.h>
|
2010-05-02 14:17:47 -04:00
|
|
|
#include <setjmp.h>
|
2008-11-28 16:44:59 -05:00
|
|
|
|
2019-08-09 12:00:17 -04:00
|
|
|
#include "dtypes.h"
|
|
|
|
#include "utils.h"
|
|
|
|
#include "utf8.h"
|
|
|
|
#include "ios.h"
|
|
|
|
#include "socket.h"
|
|
|
|
#include "timefuncs.h"
|
|
|
|
#include "hashing.h"
|
|
|
|
#include "htable.h"
|
|
|
|
#include "htableh_inc.h"
|
|
|
|
#include "bitvector.h"
|
|
|
|
#include "dirpath.h"
|
|
|
|
#include "random.h"
|
2008-11-28 16:44:59 -05:00
|
|
|
#include "llt.h"
|
2019-08-09 12:00:17 -04:00
|
|
|
|
2008-11-28 16:44:59 -05:00
|
|
|
#include "flisp.h"
|
2010-08-04 15:03:19 -04:00
|
|
|
#include "equalhash.h"
|
2008-11-28 16:44:59 -05:00
|
|
|
|
2019-08-09 10:18:36 -04:00
|
|
|
#include "htable_inc.h"
|
2008-11-28 16:44:59 -05:00
|
|
|
|
2019-08-09 07:02:02 -04:00
|
|
|
#define _equal_lispvalue_(x, y) equal_lispvalue((value_t)(x), (value_t)(y))
|
2010-08-04 15:03:19 -04:00
|
|
|
|
|
|
|
HTIMPL(equalhash, hash_lispvalue, _equal_lispvalue_)
|