n=(LHASH_NODE **)Realloc((char *)lh->b,
n=(LHASH_NODE **)Realloc(lh->b,
static void contract(LHASH *lh)	{	LHASH_NODE **n,*n1,*np;	np=lh->b[lh->p+lh->pmax-1];	lh->b[lh->p+lh->pmax-1]=NULL; /* 24/07-92 - eay - weird but :-( */	if (lh->p == 0)		{		n=(LHASH_NODE **)Realloc((char *)lh->b,			(unsigned int)(sizeof(LHASH_NODE *)*lh->pmax));		if (n == NULL)			{/*			fputs("realloc error in lhash",stderr); */			lh->error++;			return;			}		lh->num_contract_reallocs++;		lh->num_alloc_nodes/=2;		lh->pmax/=2;		lh->p=lh->pmax-1;		lh->b=n;		}	else		lh->p--;	lh->num_nodes--;	lh->num_contracts++;	n1=lh->b[(int)lh->p];	if (n1 == NULL)		lh->b[(int)lh->p]=np;	else		{		while (n1->next != NULL)			n1=n1->next;		n1->next=np;		}	}