Lines Matching refs:word
77 ficlWord *word; in ficlDictionaryAbortDefinition() local
79 word = dictionary->smudge; in ficlDictionaryAbortDefinition()
81 if (word->flags & FICL_WORD_SMUDGED) in ficlDictionaryAbortDefinition()
82 dictionary->here = (ficlCell *)word->name; in ficlDictionaryAbortDefinition()
207 ficlWord *word = ficlDictionaryAppendWord(dictionary, name, in ficlDictionaryAppendConstantInstruction() local
210 if (word != NULL) in ficlDictionaryAppendConstantInstruction()
212 return (word); in ficlDictionaryAppendConstantInstruction()
219 ficlWord *word = ficlDictionaryAppendWord(dictionary, name, in ficlDictionaryAppend2ConstantInstruction() local
222 if (word != NULL) { in ficlDictionaryAppend2ConstantInstruction()
228 return (word); in ficlDictionaryAppend2ConstantInstruction()
255 ficlWord *word = ficlDictionaryLookup(dictionary, name); in ficlDictionarySetConstantInstruction() local
258 if (word == NULL) { in ficlDictionarySetConstantInstruction()
259 word = ficlDictionaryAppendConstantInstruction(dictionary, in ficlDictionarySetConstantInstruction()
262 word->code = (ficlPrimitive)instruction; in ficlDictionarySetConstantInstruction()
264 word->param[0] = c; in ficlDictionarySetConstantInstruction()
266 return (word); in ficlDictionarySetConstantInstruction()
283 ficlWord *word; in ficlDictionarySet2ConstantInstruction() local
284 word = ficlDictionaryLookup(dictionary, s); in ficlDictionarySet2ConstantInstruction()
291 if ((word != NULL) && in ficlDictionarySet2ConstantInstruction()
292 ((((ficlInstruction)word->code) == ficlInstruction2ConstantParen) || in ficlDictionarySet2ConstantInstruction()
293 (((ficlInstruction)word->code) == ficlInstructionF2ConstantParen))) in ficlDictionarySet2ConstantInstruction()
295 if ((word != NULL) && in ficlDictionarySet2ConstantInstruction()
296 ((((ficlInstruction)word->code) == ficlInstruction2ConstantParen))) in ficlDictionarySet2ConstantInstruction()
299 word->code = (ficlPrimitive)instruction; in ficlDictionarySet2ConstantInstruction()
300 word->param[0].u = FICL_2UNSIGNED_GET_HIGH(value); in ficlDictionarySet2ConstantInstruction()
301 word->param[1].u = FICL_2UNSIGNED_GET_LOW(value); in ficlDictionarySet2ConstantInstruction()
303 word = ficlDictionaryAppend2ConstantInstruction(dictionary, s, in ficlDictionarySet2ConstantInstruction()
307 return (word); in ficlDictionarySet2ConstantInstruction()
346 ficlWord *word; in ficlDictionaryAppendWord() local
355 word = (ficlWord *)dictionary->here; in ficlDictionaryAppendWord()
356 dictionary->smudge = word; in ficlDictionaryAppendWord()
357 word->hash = ficlHashCode(name); in ficlDictionaryAppendWord()
358 word->code = code; in ficlDictionaryAppendWord()
359 word->semiParen = ficlInstructionSemiParen; in ficlDictionaryAppendWord()
360 word->flags = (ficlUnsigned8)(flags | FICL_WORD_SMUDGED); in ficlDictionaryAppendWord()
361 word->length = length; in ficlDictionaryAppendWord()
362 word->name = nameCopy; in ficlDictionaryAppendWord()
367 dictionary->here = word->param; in ficlDictionaryAppendWord()
373 return (word); in ficlDictionaryAppendWord()
396 ficlWord *word; in ficlDictionarySetPrimitive() local
399 word = ficlDictionaryLookup(dictionary, s); in ficlDictionarySetPrimitive()
401 if (word == NULL) { in ficlDictionarySetPrimitive()
402 word = ficlDictionaryAppendPrimitive(dictionary, name, in ficlDictionarySetPrimitive()
405 word->code = (ficlPrimitive)code; in ficlDictionarySetPrimitive()
406 word->flags = flags; in ficlDictionarySetPrimitive()
408 return (word); in ficlDictionarySetPrimitive()
542 ficlDictionaryIsAWord(ficlDictionary *dictionary, ficlWord *word) in ficlDictionaryIsAWord() argument
544 if ((((ficlInstruction)word) > ficlInstructionInvalid) && in ficlDictionaryIsAWord()
545 (((ficlInstruction)word) < ficlInstructionLast)) in ficlDictionaryIsAWord()
548 if (!ficlDictionaryIncludes(dictionary, word)) in ficlDictionaryIsAWord()
551 if (!ficlDictionaryIncludes(dictionary, word->name)) in ficlDictionaryIsAWord()
554 if ((word->link != NULL) && in ficlDictionaryIsAWord()
555 !ficlDictionaryIncludes(dictionary, word->link)) in ficlDictionaryIsAWord()
558 if ((word->length <= 0) || (word->name[word->length] != '\0')) in ficlDictionaryIsAWord()
561 if (strlen(word->name) != word->length) in ficlDictionaryIsAWord()
580 ficlWord *word; in ficlDictionaryFindEnclosingWord() local
587 word = (ficlWord *) in ficlDictionaryFindEnclosingWord()
589 if (ficlDictionaryIsAWord(dictionary, word)) in ficlDictionaryFindEnclosingWord()
590 return (word); in ficlDictionaryFindEnclosingWord()
617 ficlWord *word = NULL; in ficlDictionaryLookup() local
626 for (i = (int)dictionary->wordlistCount - 1; (i >= 0) && (!word); --i) { in ficlDictionaryLookup()
628 word = ficlHashLookup(hash, name, hashCode); in ficlDictionaryLookup()
632 return (word); in ficlDictionaryLookup()
658 ficlDictionarySee(ficlDictionary *dictionary, ficlWord *word, in ficlDictionarySee() argument
662 ficlCell *cell = word->param; in ficlDictionarySee()
667 ficlWord *word = (ficlWord *)(cell->p); in ficlDictionarySee() local
676 if (ficlDictionaryIsAWord(dictionary, word)) { in ficlDictionarySee()
677 ficlWordKind kind = ficlWordClassify(word); in ficlDictionarySee()
683 ficlDictionaryInstructionNames[(long)word], in ficlDictionarySee()
684 (long)word); in ficlDictionarySee()
690 ficlDictionaryInstructionNames[(long)word], in ficlDictionarySee()
691 (long)word, (long)c.i, (unsigned long)c.u); in ficlDictionarySee()
696 word->name, in ficlDictionarySee()
698 (long)word->code], (long)word->code); in ficlDictionarySee()
704 ficlWord *word = (ficlWord *)c.p; in ficlDictionarySee() local
707 word->length, word->name, in ficlDictionarySee()
786 (void) sprintf(trace, "%.*s", word->length, in ficlDictionarySee()
787 word->name); in ficlDictionarySee()
860 ficlWord *word = dictionary->smudge; in ficlDictionaryUnsmudge() local
864 FICL_DICTIONARY_ASSERT(dictionary, word); in ficlDictionaryUnsmudge()
869 if (word->length > 0) in ficlDictionaryUnsmudge()
870 ficlHashInsertWord(hash, word); in ficlDictionaryUnsmudge()
871 word->flags &= ~(FICL_WORD_SMUDGED); in ficlDictionaryUnsmudge()