X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=x2p%2Fhash.h;h=f61a29f4e6253d30bbeae71dd3f93b60fc6fba7a;hb=95146c060d4701c16367f59345531d4eb7a2d283;hp=14d2069362d5b15bd832f69786f5125e852329c5;hpb=fe14fcc35f78a371a174a1d14256c2f35ae4262b;p=p5sagit%2Fp5-mst-13.2.git diff --git a/x2p/hash.h b/x2p/hash.h index 14d2069..f61a29f 100644 --- a/x2p/hash.h +++ b/x2p/hash.h @@ -1,14 +1,11 @@ -/* $Header: hash.h,v 4.0 91/03/20 01:57:53 lwall Locked $ +/* $RCSfile: hash.h,v $$Revision: 4.1 $$Date: 92/08/07 18:29:21 $ * - * Copyright (c) 1989, Larry Wall + * Copyright (c) 1991, Larry Wall * - * You may distribute under the terms of the GNU General Public License - * as specified in the README file that comes with the perl 3.0 kit. + * You may distribute under the terms of either the GNU General Public + * License or the Artistic License, as specified in the README file. * * $Log: hash.h,v $ - * Revision 4.0 91/03/20 01:57:53 lwall - * 4.0 baseline. - * */ #define FILLPCT 60 /* don't make greater than 99 */ @@ -44,11 +41,12 @@ struct htbl { HENT *tbl_eiter; /* current entry of iterator */ }; -STR *hfetch(); -bool hstore(); -bool hdelete(); -HASH *hnew(); -int hiterinit(); -HENT *hiternext(); -char *hiterkey(); -STR *hiterval(); +bool hdelete _((HASH *tb, char *key)); +STR * hfetch _(( HASH *tb, char *key )); +int hiterinit _(( HASH *tb )); +char * hiterkey _(( HENT *entry )); +HENT * hiternext _(( HASH *tb )); +STR * hiterval _(( HENT *entry )); +HASH * hnew _(( void )); +void hsplit _(( HASH *tb )); +bool hstore _(( HASH *tb, char *key, STR *val ));