diff options
| author | Todd C. Miller <millert@cvs.openbsd.org> | 2006-03-28 19:23:16 +0000 |
|---|---|---|
| committer | Todd C. Miller <millert@cvs.openbsd.org> | 2006-03-28 19:23:16 +0000 |
| commit | 17d22ff90d7678f627704149ed0e537b4380531e (patch) | |
| tree | e8df9aa3a393dcb98f06f2f1f5bb9ac88cd1b988 /gnu/usr.bin/perl/x2p/hash.h | |
| parent | 21e49c3d2e0bc23209dd78235f7cc3dc8802a2df (diff) | |
merge in perl 5.8.8
Diffstat (limited to 'gnu/usr.bin/perl/x2p/hash.h')
| -rw-r--r-- | gnu/usr.bin/perl/x2p/hash.h | 12 |
1 files changed, 3 insertions, 9 deletions
diff --git a/gnu/usr.bin/perl/x2p/hash.h b/gnu/usr.bin/perl/x2p/hash.h index bcab1ef4d52..ccc15620658 100644 --- a/gnu/usr.bin/perl/x2p/hash.h +++ b/gnu/usr.bin/perl/x2p/hash.h @@ -1,18 +1,16 @@ -/* $RCSfile: hash.h,v $$Revision: 4.1 $$Date: 92/08/07 18:29:21 $ +/* hash.h * * Copyright (C) 1991, 1992, 1993, 1994, 1995, 1999, 2000, * by Larry Wall and others * * 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 $ */ #define FILLPCT 60 /* don't make greater than 99 */ #ifdef DOINIT -char coeff[] = { +char const 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, @@ -22,7 +20,7 @@ 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}; #else -extern char coeff[]; +extern const char coeff[]; #endif typedef struct hentry HENT; @@ -42,12 +40,8 @@ struct htbl { HENT *tbl_eiter; /* current entry of iterator */ }; -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 ); |