hyung-hwan/qse
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
hyung-hwan 2005-05-09 15:55:04 +00:00
parent 15d81e593f
commit 1465153007
1 changed files with 20 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
ase/stx/hash.c
View File

@ -1,11 +1,10 @@
/* /*
* $Id: hash.c,v 1.1 2005-05-08 15:54:44 bacon Exp $ * $Id: hash.c,v 1.2 2005-05-09 15:55:04 bacon Exp $
*/ */
#include <xp/stx/hash.h> #include <xp/stx/hash.h>
int xp_stx_new_link ( int xp_stx_new_link (xp_stx_t* stx, xp_stx_word_t key, xp_stx_word_t value)
xp_stx_t* stx, xp_stx_word_t key, xp_stx_word_t value)
{ {
xp_stx_word_t x; xp_stx_word_t x;
@ -19,16 +18,28 @@ int xp_stx_new_link (
} }
void xp_stx_hash_insert ( void xp_stx_hash_insert (
xp_stx_t* stx, xp_stx_word_t key, xp_stx_word_t value) xp_stx_t* stx, xp_stx_word_t hash,
xp_stx_word_t key, xp_stx_word_t value)
{ {
xp_stx_word_t table; xp_stx_word_t oaha, link;
table = XP_STX_AT(stx,stx->globals,0); /* the first instance variable is an open addressing hash array */
hash = __hash(key); oaha = XP_STX_AT(stx,stx->globals,0);
link = XP_STX_AT(stx,table,hash); hash = hash % oaha_size;
link = XP_STX_AT(stx,oaha,hash);
if (link == stx->nil || link == key) {
XP_STX_AT(oaha, hash + 1
}
for (;;) { for (;;) {
if (link == stx->nil) {
new = xp_stx_new_link (stx, key, value);
}
/*
if (XP_STX_AT(stx,link,0) == key) { if (XP_STX_AT(stx,link,0) == key) {
XP_STX_AT(stx,link,1) = value; XP_STX_AT(stx,link,1) = value;
break; break;
@ -42,5 +53,6 @@ void xp_stx_hash_insert (
} }
link = next; link = next;
*/
} }
} }