The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
/* Mini EMBED (pair.c) */
#define chkpage sdbm__chkpage
#define delpair sdbm__delpair
#define duppair sdbm__duppair
#define exipair sdbm__exipair
#define fitpair sdbm__fitpair
#define getnkey sdbm__getnkey
#define getpair sdbm__getpair
#define putpair sdbm__putpair
#define splpage sdbm__splpage

extern int fitpair(char *, int);
extern void  putpair(char *, datum, datum);
extern datum	getpair(char *, datum);
extern int  exipair(char *, datum);
extern int  delpair(char *, datum);
extern int  chkpage(char *);
extern datum getnkey(char *, int);
extern void splpage(char *, char *, long);
#ifdef SEEDUPS
extern int duppair(char *, datum);
#endif