@@ -87,7 +87,7 @@ static void print_info(struct EtsHashTable *hash_table)
87
87
}
88
88
#endif
89
89
90
- struct HNode * ets_hashtable_new_node (term entry , int keypos )
90
+ struct HNode * ets_hashtable_new_node (term entry , int key_index )
91
91
{
92
92
struct HNode * new_node = malloc (sizeof (struct HNode ));
93
93
if (IS_NULL_PTR (new_node )) {
@@ -101,8 +101,8 @@ struct HNode *ets_hashtable_new_node(term entry, int keypos)
101
101
102
102
term new_entry = memory_copy_term_tree (& new_node -> heap , entry );
103
103
assert (term_is_tuple (new_entry ));
104
- assert (term_get_tuple_arity (new_entry ) >= keypos );
105
- term key = term_get_tuple_element (new_entry , keypos );
104
+ assert (term_get_tuple_arity (new_entry ) >= key_index );
105
+ term key = term_get_tuple_element (new_entry , key_index );
106
106
107
107
new_node -> next = NULL ;
108
108
new_node -> key = key ;
@@ -167,14 +167,14 @@ EtsHashtableStatus ets_hashtable_insert(struct EtsHashTable *hash_table, struct
167
167
return EtsHashtableOk ;
168
168
}
169
169
170
- term ets_hashtable_lookup (struct EtsHashTable * hash_table , term key , size_t keypos , GlobalContext * global )
170
+ term ets_hashtable_lookup (struct EtsHashTable * hash_table , term key , size_t key_index , GlobalContext * global )
171
171
{
172
172
uint32_t hash = hash_term (key , global );
173
173
uint32_t index = hash % hash_table -> capacity ;
174
174
175
175
const struct HNode * node = hash_table -> buckets [index ];
176
176
while (node ) {
177
- term key_to_compare = term_get_tuple_element (node -> entry , keypos );
177
+ term key_to_compare = term_get_tuple_element (node -> entry , key_index );
178
178
if (term_compare (key , key_to_compare , TermCompareExact , global ) == TermEquals ) {
179
179
return node -> entry ;
180
180
}
@@ -184,15 +184,15 @@ term ets_hashtable_lookup(struct EtsHashTable *hash_table, term key, size_t keyp
184
184
return term_nil ();
185
185
}
186
186
187
- bool ets_hashtable_remove (struct EtsHashTable * hash_table , term key , size_t keypos , GlobalContext * global )
187
+ bool ets_hashtable_remove (struct EtsHashTable * hash_table , term key , size_t key_index , GlobalContext * global )
188
188
{
189
189
uint32_t hash = hash_term (key , global );
190
190
uint32_t index = hash % hash_table -> capacity ;
191
191
192
192
struct HNode * node = hash_table -> buckets [index ];
193
193
struct HNode * prev_node = NULL ;
194
194
while (node ) {
195
- term key_to_compare = term_get_tuple_element (node -> entry , keypos );
195
+ term key_to_compare = term_get_tuple_element (node -> entry , key_index );
196
196
if (term_compare (key , key_to_compare , TermCompareExact , global ) == TermEquals ) {
197
197
struct HNode * next_node = node -> next ;
198
198
ets_hashtable_free_node (node , global );
0 commit comments