-/* $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, 1992, 1993, 1994, 1995, 1999, 2000,
+ * by Larry Wall and others
*
- * 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 */
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 );