Mercurial > hg > Members > anatofuz > test_perl1_alpine
view hash.h @ 2:9f567da916dd default tip
cancel rev 1
author | anatofuz <anatofuz@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Thu, 13 Jun 2019 20:51:20 +0900 |
parents | 0240ed5457bb |
children |
line wrap: on
line source
/* $Header: hash.h,v 1.0.1.1 88/03/10 16:28:43 root Exp $ * * $Log: hash.h,v $ * Revision 1.0.1.1 88/03/10 16:28:43 root * patch29: added hclear() * * Revision 1.0 87/12/18 13:05:20 root * Initial revision * */ #define FILLPCT 60 /* don't make greater than 99 */ #ifdef DOINIT char coeff[] = { 61,59,53,47,43,41,37,31,29,23,17,13,11,7,3,1, 61,59,53,47,43,41,37,31,29,23,17,13,11,7,3,1, 61,59,53,47,43,41,37,31,29,23,17,13,11,7,3,1, 61,59,53,47,43,41,37,31,29,23,17,13,11,7,3,1, 61,59,53,47,43,41,37,31,29,23,17,13,11,7,3,1, 61,59,53,47,43,41,37,31,29,23,17,13,11,7,3,1, 61,59,53,47,43,41,37,31,29,23,17,13,11,7,3,1, 61,59,53,47,43,41,37,31,29,23,17,13,11,7,3,1}; #else extern char coeff[]; #endif typedef struct hentry HENT; struct hentry { HENT *hent_next; char *hent_key; STR *hent_val; int hent_hash; }; struct htbl { HENT **tbl_array; int tbl_max; int tbl_fill; int tbl_riter; /* current root of iterator */ HENT *tbl_eiter; /* current entry of iterator */ }; STR *hfetch(); bool hstore(); bool hdelete(); HASH *hnew(); void hclear(); void hfree(); void hentfree(); int hiterinit(); HENT *hiternext(); char *hiterkey(); STR *hiterval();