lh_insert(ret,(char *)f);
lh_insert(ret,f);
static LHASH *prog_init(void)	{	LHASH *ret;	FUNCTION *f;	int i;	/* Purely so it looks nice when the user hits ? */	for(i=0,f=functions ; f->name != NULL ; ++f,++i)	    ;	qsort(functions,i,sizeof *functions,SortFnByName);	if ((ret=lh_new(hash,cmp)) == NULL) return(NULL);	for (f=functions; f->name != NULL; f++)		lh_insert(ret,(char *)f);	return(ret);	}