Home
last modified time | relevance | path

Searched refs:dataStack (Results 1 – 8 of 8) sorted by relevance

/titanic_53/usr/src/common/ficl/
H A Dprimitives.c72 ficlStackPushPointer(vm->dataStack, dictionary->here); in markBranch()
73 ficlStackPushPointer(vm->dataStack, tag); in markBranch()
79 ficlStackPushPointer(vm->dataStack, tag); in markControlTag()
87 FICL_STACK_CHECK(vm->dataStack, 1, 0); in matchControlTag()
89 tag = (char *)ficlStackPopPointer(vm->dataStack); in matchControlTag()
113 FICL_STACK_CHECK(vm->dataStack, 1, 0); in resolveBackBranch()
115 patchAddr = (ficlCell *)ficlStackPopPointer(vm->dataStack); in resolveBackBranch()
134 FICL_STACK_CHECK(vm->dataStack, 1, 0); in resolveForwardBranch()
136 patchAddr = (ficlCell *)ficlStackPopPointer(vm->dataStack); in resolveForwardBranch()
152 FICL_STACK_CHECK(vm->dataStack, 2, 0); in resolveAbsBranch()
[all …]
H A Dfileaccess.c19 ficlStackPushInteger(vm->dataStack, ior); in pushIor()
26 int fam = ficlStackPopInteger(vm->dataStack); in ficlFileOpen()
27 int length = ficlStackPopInteger(vm->dataStack); in ficlFileOpen()
28 void *address = (void *)ficlStackPopPointer(vm->dataStack); in ficlFileOpen()
39 ficlStackPushPointer(vm->dataStack, NULL); in ficlFileOpen()
40 ficlStackPushInteger(vm->dataStack, EINVAL); in ficlFileOpen()
58 ficlStackPushPointer(vm->dataStack, NULL); in ficlFileOpen()
63 ficlStackPushPointer(vm->dataStack, ff); in ficlFileOpen()
100 ficlFile *ff = (ficlFile *)ficlStackPopPointer(vm->dataStack); in ficlPrimitiveCloseFile()
108 int length = ficlStackPopInteger(vm->dataStack); in ficlPrimitiveDeleteFile()
[all …]
H A Dsearch.c80 ficlStackPushPointer(vm->dataStack, hash); in ficlPrimitiveForthWordlist()
94 ficlStackPushPointer(vm->dataStack, dictionary->compilationWordlist); in ficlPrimitiveGetCurrent()
115 ficlStackPushPointer(vm->dataStack, dictionary->wordlists[i]); in ficlPrimitiveGetOrder()
118 ficlStackPushUnsigned(vm->dataStack, wordlistCount); in ficlPrimitiveGetOrder()
136 ficlHash *hash = ficlStackPopPointer(vm->dataStack); in ficlPrimitiveSearchWordlist()
138 name.length = (ficlUnsigned8)ficlStackPopUnsigned(vm->dataStack); in ficlPrimitiveSearchWordlist()
139 name.text = ficlStackPopPointer(vm->dataStack); in ficlPrimitiveSearchWordlist()
147 ficlStackPushPointer(vm->dataStack, word); in ficlPrimitiveSearchWordlist()
148 ficlStackPushInteger(vm->dataStack, in ficlPrimitiveSearchWordlist()
151 ficlStackPushUnsigned(vm->dataStack, 0); in ficlPrimitiveSearchWordlist()
[all …]
H A Dtools.c209 word = (ficlWord *)ficlStackPopPointer(vm->dataStack); in ficlPrimitiveSeeXT()
286 ficlWord *xt = ficlStackPopPointer(vm->dataStack); in ficlPrimitiveDebugXT()
289 ficlStackPushPointer(vm->dataStack, xt); in ficlPrimitiveDebugXT()
450 ficlStackPushPointer(vm->dataStack, xt); in ficlPrimitiveStepBreak()
592 ficlStackDisplay(vm->dataStack, NULL, NULL); in ficlVmDisplayDataStack()
610 ficlStack *stack = vm->dataStack; in ficlVmDisplayDataStackSimple()
679 hash = (ficlHash *)ficlStackPopPointer(vm->dataStack); in ficlPrimitiveForgetWid()
703 where = ((ficlWord *)ficlStackPopPointer(vm->dataStack))->name; in ficlPrimitiveForget()
865 FICL_STACK_CHECK(vm->dataStack, 1, 0); in ficlPrimitiveEnvConstant()
868 value = ficlStackPopUnsigned(vm->dataStack); in ficlPrimitiveEnvConstant()
[all …]
H A Dvm.c83 if (vm->dataStack) in ficlVmCreate()
84 ficlStackDestroy(vm->dataStack); in ficlVmCreate()
85 vm->dataStack = ficlStackCreate(vm, "data", nPStack); in ficlVmCreate()
110 ficlFree(vm->dataStack); in ficlVmDestroy()
198 _CHECK_STACK(vm->dataStack, dataTop, pop, push)
226 vm->dataStack->top = dataTop; \
233 dataTop = vm->dataStack->top; \
2233 return (ficlStackPop(vm->dataStack)); in ficlVmPop()
2242 ficlStackPush(vm->dataStack, c); in ficlVmPush()
2312 ficlStackReset(vm->dataStack); in ficlVmReset()
[all …]
H A Dprefix.c122 int base = ficlStackPopInteger(vm->dataStack); in ficlPrimitiveTempBase()
H A Dfloat.c205 FICL_STACK_CHECK(vm->dataStack, 0, 1); in ficlPrimitiveFDepth()
208 ficlStackPushInteger(vm->dataStack, i); in ficlPrimitiveFDepth()
H A Dficl.h1007 ficlStack *dataStack; member
1083 #define ficlVmGetDataStack(vm) ((vm)->dataStack)