stand/ficl/tools.c

698     FICL_HASH *pHash;
700     pHash = (FICL_HASH *)stackPopPtr(pVM->pStack);
701     hashForget(pHash, pDict->here);
723     FICL_HASH *pHash = pDict->pCompile;
727     hashForget(pHash, where);
742     FICL_HASH *pHash = dp->pSearch[dp->nLists - 1];
752     for (i = 0; i < pHash->size; i++)
754         for (wp = pHash->table[i]; wp != NULL; wp = wp->link, nWords++)
819     FICL_HASH *pHash = dp->pForthWords;
824     for (i = 0; i < pHash->size; i++)
826         for (wp = pHash->table[i]; wp != NULL; wp = wp->link, nWords++)