Avoid casts from pointers to integers
[suif.git] / src / baseparsuif / moo / variables.h
blobc0c5012405a1951dfb03723d9e48be68cb82e5e1
1 /* file "variables.h" */
3 /* Copyright (c) 1994 Stanford University
5 All rights reserved.
7 This software is provided under the terms described in
8 the "suif_copyright.h" include file. */
10 #include <suif_copyright.h>
12 #pragma interface
14 inline int var_sym_hash(var_sym *v) { return ((long)v)>>2; }
15 inline int compare_vars(var_sym **a,var_sym **b) { return *a == *b; }
17 DECLARE_ASSOC_TABLE(Variable_bit_index, var_sym*, int, var_sym_hash,
18 compare_vars);
19 DECLARE_X_ARRAY0(Variable_list, var_sym*, 256);