X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=x2p%2Fhash.h;h=85ce07c2f762fe92b8c256ca60e9b42105ce0115;hb=158b3652342ca691c9e3b061a1d78456ae1a9b4a;hp=1a67ae8b736ec4beb0e5482359970d0e54ce4dfc;hpb=a687059cbaf2c6fdccb5e0fae2aee80ec15625a8;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/x2p/hash.h b/x2p/hash.h
index 1a67ae8..85ce07c 100644
--- a/x2p/hash.h
+++ b/x2p/hash.h
@@ -1,14 +1,11 @@
-/* $Header: hash.h,v 3.0 89/10/18 15:34:57 lwall Locked $
+/* $RCSfile: hash.h,v $$Revision: 4.1 $$Date: 92/08/07 18:29:21 $
  *
- *    Copyright (c) 1989, Larry Wall
+ *    Copyright (c) 1991-2002, 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 3.0  89/10/18  15:34:57  lwall
- * 3.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 );