if(hashp->fp != NO_FILE) close(hashp->fp); if(hashp->filename) unlink(hashp->filename); dbp->internal = NULL;
hdestroy(hashp); dbp->internal = NULL;
__remove_database(DB *dbp){	HTAB *hashp = (HTAB *)dbp->internal;	if (!hashp)		return;	if(hashp->fp != NO_FILE)		close(hashp->fp);	if(hashp->filename)		unlink(hashp->filename);	dbp->internal = NULL; /* zero the internal stuff */}