Home
last modified time | relevance | path

Searched refs:pStack (Results 1 – 16 of 16) sorted by relevance

/NextBSD/sys/boot/ficl/
HDstack.c75 FICL_STACK *pStack = pVM->pStack; in vmCheckStack() local
76 int nFree = pStack->base + pStack->nCells - pStack->sp; in vmCheckStack()
78 if (popCells > STKDEPTH(pStack)) in vmCheckStack()
117 FICL_STACK *pStack = ficlMalloc(size); in stackCreate() local
121 assert (pStack != NULL); in stackCreate()
124 pStack->nCells = nCells; in stackCreate()
125 pStack->sp = pStack->base; in stackCreate()
126 pStack->pFrame = NULL; in stackCreate()
127 return pStack; in stackCreate()
136 void stackDelete(FICL_STACK *pStack) in stackDelete() argument
[all …]
HDloader.c77 names = stackPopINT(pVM->pStack); in ficlSetenv()
78 namep = (char*) stackPopPtr(pVM->pStack); in ficlSetenv()
79 values = stackPopINT(pVM->pStack); in ficlSetenv()
80 valuep = (char*) stackPopPtr(pVM->pStack); in ficlSetenv()
114 overwrite = stackPopINT(pVM->pStack); in ficlSetenvq()
115 names = stackPopINT(pVM->pStack); in ficlSetenvq()
116 namep = (char*) stackPopPtr(pVM->pStack); in ficlSetenvq()
117 values = stackPopINT(pVM->pStack); in ficlSetenvq()
118 valuep = (char*) stackPopPtr(pVM->pStack); in ficlSetenvq()
152 names = stackPopINT(pVM->pStack); in ficlGetenv()
[all …]
HDfileaccess.c27 stackPushINT(pVM->pStack, ior); in pushIor()
34 int fam = stackPopINT(pVM->pStack); in ficlFopen()
35 int length = stackPopINT(pVM->pStack); in ficlFopen()
36 void *address = (void *)stackPopPtr(pVM->pStack); in ficlFopen()
49 stackPushPtr(pVM->pStack, NULL); in ficlFopen()
50 stackPushINT(pVM->pStack, EINVAL); in ficlFopen()
68 stackPushPtr(pVM->pStack, NULL); in ficlFopen()
74 stackPushPtr(pVM->pStack, ff); in ficlFopen()
104 ficlFILE *ff = (ficlFILE *)stackPopPtr(pVM->pStack); in ficlCloseFile()
110 int length = stackPopINT(pVM->pStack); in ficlDeleteFile()
[all …]
HDwords.c109 cp = (char *)stackPopPtr(pVM->pStack); in matchControlTag()
136 patchAddr = (CELL *)stackPopPtr(pVM->pStack); in resolveBackBranch()
159 patchAddr = (CELL *)stackPopPtr(pVM->pStack); in resolveForwardBranch()
179 cp = stackPopPtr(pVM->pStack); in resolveAbsBranch()
189 patchAddr = (CELL *)stackPopPtr(pVM->pStack); in resolveAbsBranch()
285 i = stackPopINT(pVM->pStack); in add()
286 i += stackGetTop(pVM->pStack).i; in add()
287 stackSetTop(pVM->pStack, LVALUEtoCELL(i)); in add()
297 i = stackPopINT(pVM->pStack); in sub()
298 i = stackGetTop(pVM->pStack).i - i; in sub()
[all …]
HDsearch.c83 stackPushPtr(pVM->pStack, pHash); in forthWordlist()
96 stackPushPtr(pVM->pStack, vmGetDict(pVM)->pCompile); in getCurrent()
119 stackPushPtr(pVM->pStack, pDict->pSearch[i]); in getOrder()
122 stackPushUNS(pVM->pStack, nLists); in getOrder()
141 FICL_HASH *pHash = stackPopPtr(pVM->pStack); in searchWordlist()
143 si.count = (FICL_COUNT)stackPopUNS(pVM->pStack); in searchWordlist()
144 si.cp = stackPopPtr(pVM->pStack); in searchWordlist()
153 stackPushPtr(pVM->pStack, pFW); in searchWordlist()
154 stackPushINT(pVM->pStack, (wordIsImmediate(pFW) ? 1 : -1)); in searchWordlist()
158 stackPushUNS(pVM->pStack, 0); in searchWordlist()
[all …]
HDficl.h371 void stackDelete (FICL_STACK *pStack);
372 int stackDepth (FICL_STACK *pStack);
373 void stackDrop (FICL_STACK *pStack, int n);
374 CELL stackFetch (FICL_STACK *pStack, int n);
375 CELL stackGetTop (FICL_STACK *pStack);
376 void stackLink (FICL_STACK *pStack, int nCells);
377 void stackPick (FICL_STACK *pStack, int n);
378 CELL stackPop (FICL_STACK *pStack);
379 void *stackPopPtr (FICL_STACK *pStack);
380 FICL_UNS stackPopUNS (FICL_STACK *pStack);
[all …]
HDvm.c92 if (pVM->pStack) in vmCreate()
93 stackDelete(pVM->pStack); in vmCreate()
94 pVM->pStack = stackCreate(nPStack); in vmCreate()
122 ficlFree(pVM->pStack); in vmDelete()
199 FICL_STACK *pStack = pVM->pStack;
208 stackPushINT(pStack, 0);
211 stackPushINT(pStack, 1);
214 stackPushINT(pStack, 2);
217 stackPushINT(pStack, -1);
220 stackPushINT(pStack, -2);
[all …]
HDmath64.c216 void i64Push(FICL_STACK *pStack, DPINT i64) in i64Push() argument
218 stackPushINT(pStack, i64.lo); in i64Push()
219 stackPushINT(pStack, i64.hi); in i64Push()
223 void u64Push(FICL_STACK *pStack, DPUNS u64) in u64Push() argument
225 stackPushINT(pStack, u64.lo); in u64Push()
226 stackPushINT(pStack, u64.hi); in u64Push()
237 DPINT i64Pop(FICL_STACK *pStack) in i64Pop() argument
240 ret.hi = stackPopINT(pStack); in i64Pop()
241 ret.lo = stackPopINT(pStack); in i64Pop()
245 DPUNS u64Pop(FICL_STACK *pStack) in u64Pop() argument
[all …]
HDmath64.h58 void i64Push(FICL_STACK *pStack, DPINT i64);
59 DPINT i64Pop(FICL_STACK *pStack);
60 void u64Push(FICL_STACK *pStack, DPUNS u64);
61 DPUNS u64Pop(FICL_STACK *pStack);
HDtools.c307 pFW = (FICL_WORD *)stackPopPtr(pVM->pStack); in seeXT()
384 FICL_WORD *xt = stackPopPtr(pVM->pStack); in ficlDebugXT()
387 stackPushPtr(pVM->pStack, xt); in ficlDebugXT()
550 stackPushPtr(pVM->pStack, xt); in stepBreak()
625 FICL_STACK *pStk = pVM->pStack; in displayPStack()
700 pHash = (FICL_HASH *)stackPopPtr(pVM->pStack); in forgetWid()
726 where = ((FICL_WORD *)stackPopPtr(pVM->pStack))->name; in forget()
HDtestmain.c267 stackPushUNS(pVM->pStack, (FICL_UNS)now); in ficlClock()
273 stackPushUNS(pVM->pStack, CLOCKS_PER_SEC); in clocksPerSec()
285 pFW = stackPopPtr(pVM->pStack); in execxt()
HDprefix.c135 int base = stackPopINT(pVM->pStack); in fTempBase()
HDfloat.c792 stackPush(pVM->pStack, c); in FFrom()
805 c = stackPop(pVM->pStack); in ToF()
/NextBSD/sys/boot/common/
HDinterp_forth.c96 if (stackPopINT(vm->pStack)) { in bf_command()
104 nstrings = stackPopINT(vm->pStack); in bf_command()
106 len += stackFetch(vm->pStack, i * 2).i + 1; in bf_command()
112 len = stackPopINT(vm->pStack); in bf_command()
113 cp = stackPopPtr(vm->pStack); in bf_command()
149 stackPushINT(vm->pStack,result); in bf_command()
HDinterp.c42 #define RETURN(x) stackPushINT(bf_vm->pStack,!x); return(x)
/NextBSD/sys/boot/ficl/i386/
HDsysdep.c95 port=stackPopUNS(pVM->pStack); in ficlOutb()
96 c=(u_char)stackPopINT(pVM->pStack); in ficlOutb()
110 port=stackPopUNS(pVM->pStack); in ficlInb()
112 stackPushINT(pVM->pStack,c); in ficlInb()