| /freebsd-13.1/stand/ficl/ |
| H A D | stack.c | 75 FICL_STACK *pStack = pVM->pStack; in vmCheckStack() local 76 int nFree = pStack->base + pStack->nCells - pStack->sp; in vmCheckStack() 125 pStack->sp = pStack->base; in stackCreate() 127 return pStack; in stackCreate() 138 if (pStack) in stackDelete() 208 stackPushPtr(pStack, pStack->pFrame); in stackLink() 209 pStack->pFrame = pStack->sp; in stackLink() 224 pStack->sp = pStack->pFrame; in stackUnlink() 225 pStack->pFrame = stackPopPtr(pStack); in stackUnlink() 237 stackPush(pStack, stackFetch(pStack, n)); in stackPick() [all …]
|
| H A D | loader.c | 185 wd = stackPopUNS(pVM->pStack); in ficl_fb_line() 186 y1 = stackPopUNS(pVM->pStack); in ficl_fb_line() 187 x1 = stackPopUNS(pVM->pStack); in ficl_fb_line() 188 y0 = stackPopUNS(pVM->pStack); in ficl_fb_line() 189 x0 = stackPopUNS(pVM->pStack); in ficl_fb_line() 203 y2 = stackPopUNS(pVM->pStack); in ficl_fb_bezier() 204 x2 = stackPopUNS(pVM->pStack); in ficl_fb_bezier() 205 y1 = stackPopUNS(pVM->pStack); in ficl_fb_bezier() 206 x1 = stackPopUNS(pVM->pStack); in ficl_fb_bezier() 207 y0 = stackPopUNS(pVM->pStack); in ficl_fb_bezier() [all …]
|
| H A D | fileaccess.c | 27 stackPushINT(pVM->pStack, ior); in pushIor() 34 int fam = stackPopINT(pVM->pStack); in ficlFopen() 35 int length = stackPopINT(pVM->pStack); in ficlFopen() 74 stackPushPtr(pVM->pStack, NULL); in ficlFopen() 81 stackPushPtr(pVM->pStack, ff); in ficlFopen() 134 length = stackPopINT(pVM->pStack); in ficlRenameFile() 140 length = stackPopINT(pVM->pStack); in ficlRenameFile() 169 stackPushINT(pVM->pStack, 0); in ficlFileStatus() 183 stackPushINT(pVM->pStack, ud); in ficlFilePosition() 204 stackPushINT(pVM->pStack, ud); in ficlFileSize() [all …]
|
| H A D | words.c | 631 c = stackPop(pVM->pStack); in twoConstant() 651 c = stackPop(pVM->pStack); in displayCell() 1428 stackDrop(pVM->pStack, 1); in ofParen() 2946 u = u64Pop(pVM->pStack); in numberSign() 2949 u64Push(pVM->pStack, u); in numberSign() 2992 u = u64Pop(pVM->pStack); in numberSignS() 3001 u64Push(pVM->pStack, u); in numberSignS() 3865 i64Push(pVM->pStack, d); in mStar() 4579 FICL_STACK pStack; in ficlCatch() local 4610 memcpy((void*)&pStack, (void*)pVM->pStack, sizeof(FICL_STACK)); in ficlCatch() [all …]
|
| H A D | search.c | 83 stackPushPtr(pVM->pStack, pHash); in forthWordlist() 122 stackPushUNS(pVM->pStack, nLists); in getOrder() 141 FICL_HASH *pHash = stackPopPtr(pVM->pStack); in searchWordlist() 144 si.cp = stackPopPtr(pVM->pStack); in searchWordlist() 153 stackPushPtr(pVM->pStack, pFW); in searchWordlist() 158 stackPushUNS(pVM->pStack, 0); in searchWordlist() 172 FICL_HASH *pHash = stackPopPtr(pVM->pStack); in setCurrent() 195 int nLists = stackPopINT(pVM->pStack); in setOrder() 247 nBuckets = stackPopUNS(pVM->pStack); in ficlWordlist() 249 stackPushPtr(pVM->pStack, pHash); in ficlWordlist() [all …]
|
| H A D | ficl.h | 404 #define PUSH(c) stackPush(pVM->pStack,c) 405 #define POPPTR() stackPopPtr(pVM->pStack) 406 #define POPUNS() stackPopUNS(pVM->pStack) 407 #define POPINT() stackPopINT(pVM->pStack) 409 #define POP() stackPop(pVM->pStack) 410 #define GETTOP() stackGetTop(pVM->pStack) 415 #define DEPTH() stackDepth(pVM->pStack) 416 #define DROP(n) stackDrop(pVM->pStack,n) 418 #define FETCH(n) stackFetch(pVM->pStack,n) 419 #define PICK(n) stackPick(pVM->pStack,n) [all …]
|
| H A D | vm.c | 92 if (pVM->pStack) in vmCreate() 93 stackDelete(pVM->pStack); in vmCreate() 122 ficlFree(pVM->pStack); in vmDelete() 199 FICL_STACK *pStack = pVM->pStack; 223 stackDrop(pStack, 1); 226 stackRoll(pStack, 1); 229 stackPick(pStack, 0); 233 stackPick(pStack, c.i); 430 return stackPop(pVM->pStack); in vmPop() 440 stackPush(pVM->pStack, c); in vmPush() [all …]
|
| H A D | math64.c | 216 void i64Push(FICL_STACK *pStack, DPINT i64) in i64Push() argument 218 stackPushINT(pStack, i64.lo); in i64Push() 219 stackPushINT(pStack, i64.hi); in i64Push() 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 248 ret.hi = stackPopINT(pStack); in u64Pop() [all …]
|
| H A D | math64.h | 58 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);
|
| H A D | tools.c | 307 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()
|
| H A D | testmain.c | 267 stackPushUNS(pVM->pStack, (FICL_UNS)now); in ficlClock() 273 stackPushUNS(pVM->pStack, CLOCKS_PER_SEC); in clocksPerSec() 285 pFW = stackPopPtr(pVM->pStack); in execxt()
|
| H A D | prefix.c | 135 int base = stackPopINT(pVM->pStack); in fTempBase()
|
| H A D | float.c | 792 stackPush(pVM->pStack, c); in FFrom() 805 c = stackPop(pVM->pStack); in ToF()
|
| /freebsd-13.1/stand/ficl/x86/ |
| H A D | sysdep.c | 16 port=stackPopUNS(pVM->pStack); in ficlOutb() 17 c=(u_char)stackPopINT(pVM->pStack); in ficlOutb() 31 port=stackPopUNS(pVM->pStack); in ficlInb() 33 stackPushINT(pVM->pStack,c); in ficlInb()
|
| /freebsd-13.1/stand/common/ |
| H A D | interp_forth.c | 96 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() 160 stackPushINT(vm->pStack,result); in bf_command()
|