/freebsd/stand/ficl/ |
H A D | stack.c | 74 FICL_STACK *pStack = pVM->pStack; in vmCheckStack() local 75 int nFree = pStack->base + pStack->nCells - pStack->sp; in vmCheckStack() 124 pStack->sp = pStack->base; in stackCreate() 126 return pStack; in stackCreate() 137 if (pStack) in stackDelete() 207 stackPushPtr(pStack, pStack->pFrame); in stackLink() 208 pStack->pFrame = pStack->sp; in stackLink() 223 pStack->sp = pStack->pFrame; in stackUnlink() 224 pStack->pFrame = stackPopPtr(pStack); in stackUnlink() 236 stackPush(pStack, stackFetch(pStack, n)); in stackPick() [all …]
|
H A D | loader.c | 78 names = stackPopINT(pVM->pStack); in ficlSetenv() 171 stackPushINT(pVM->pStack, -1); in ficlGetenv() 216 len = stackPopINT(pVM->pStack); in ficlCopyin() 218 src = stackPopPtr(pVM->pStack); in ficlCopyin() 238 len = stackPopINT(pVM->pStack); in ficlCopyout() 240 src = stackPopINT(pVM->pStack); in ficlCopyout() 283 stackPushPtr(pVM->pStack, fp); in ficlFindfile() 379 stackPushPtr(pVM->pStack, u); in ficlUuidFromString() 466 c = stackPop(pVM->pStack); in displayCellNoPad() 586 stackPushINT(pVM->pStack, -1); in pfread() [all …]
|
H A D | gfx_loader.c | 173 wd = stackPopUNS(pVM->pStack); in ficl_fb_line() 174 y1 = stackPopUNS(pVM->pStack); in ficl_fb_line() 175 x1 = stackPopUNS(pVM->pStack); in ficl_fb_line() 176 y0 = stackPopUNS(pVM->pStack); in ficl_fb_line() 177 x0 = stackPopUNS(pVM->pStack); in ficl_fb_line() 191 y2 = stackPopUNS(pVM->pStack); in ficl_fb_bezier() 192 x2 = stackPopUNS(pVM->pStack); in ficl_fb_bezier() 193 y1 = stackPopUNS(pVM->pStack); in ficl_fb_bezier() 194 x1 = stackPopUNS(pVM->pStack); in ficl_fb_bezier() 195 y0 = stackPopUNS(pVM->pStack); in ficl_fb_bezier() [all …]
|
H A D | fileaccess.c | 26 stackPushINT(pVM->pStack, ior); in pushIor() 33 int fam = stackPopINT(pVM->pStack); in ficlFopen() 34 int length = stackPopINT(pVM->pStack); in ficlFopen() 73 stackPushPtr(pVM->pStack, NULL); in ficlFopen() 80 stackPushPtr(pVM->pStack, ff); in ficlFopen() 133 length = stackPopINT(pVM->pStack); in ficlRenameFile() 139 length = stackPopINT(pVM->pStack); in ficlRenameFile() 168 stackPushINT(pVM->pStack, 0); in ficlFileStatus() 182 stackPushINT(pVM->pStack, ud); in ficlFilePosition() 203 stackPushINT(pVM->pStack, ud); in ficlFileSize() [all …]
|
H A D | words.c | 630 c = stackPop(pVM->pStack); in twoConstant() 650 c = stackPop(pVM->pStack); in displayCell() 1427 stackDrop(pVM->pStack, 1); in ofParen() 2945 u = u64Pop(pVM->pStack); in numberSign() 2948 u64Push(pVM->pStack, u); in numberSign() 2991 u = u64Pop(pVM->pStack); in numberSignS() 3000 u64Push(pVM->pStack, u); in numberSignS() 3864 i64Push(pVM->pStack, d); in mStar() 4578 FICL_STACK pStack; in ficlCatch() local 4609 memcpy((void*)&pStack, (void*)pVM->pStack, sizeof(FICL_STACK)); in ficlCatch() [all …]
|
H A D | search.c | 82 stackPushPtr(pVM->pStack, pHash); in forthWordlist() 121 stackPushUNS(pVM->pStack, nLists); in getOrder() 140 FICL_HASH *pHash = stackPopPtr(pVM->pStack); in searchWordlist() 143 si.cp = stackPopPtr(pVM->pStack); in searchWordlist() 152 stackPushPtr(pVM->pStack, pFW); in searchWordlist() 157 stackPushUNS(pVM->pStack, 0); in searchWordlist() 171 FICL_HASH *pHash = stackPopPtr(pVM->pStack); in setCurrent() 194 int nLists = stackPopINT(pVM->pStack); in setOrder() 246 nBuckets = stackPopUNS(pVM->pStack); in ficlWordlist() 248 stackPushPtr(pVM->pStack, pHash); in ficlWordlist() [all …]
|
H A D | ficl.h | 403 #define PUSH(c) stackPush(pVM->pStack,c) 404 #define POPPTR() stackPopPtr(pVM->pStack) 405 #define POPUNS() stackPopUNS(pVM->pStack) 406 #define POPINT() stackPopINT(pVM->pStack) 408 #define POP() stackPop(pVM->pStack) 409 #define GETTOP() stackGetTop(pVM->pStack) 414 #define DEPTH() stackDepth(pVM->pStack) 415 #define DROP(n) stackDrop(pVM->pStack,n) 417 #define FETCH(n) stackFetch(pVM->pStack,n) 418 #define PICK(n) stackPick(pVM->pStack,n) [all …]
|
H A D | vm.c | 91 if (pVM->pStack) in vmCreate() 92 stackDelete(pVM->pStack); in vmCreate() 121 ficlFree(pVM->pStack); in vmDelete() 198 FICL_STACK *pStack = pVM->pStack; 222 stackDrop(pStack, 1); 225 stackRoll(pStack, 1); 228 stackPick(pStack, 0); 232 stackPick(pStack, c.i); 429 return stackPop(pVM->pStack); in vmPop() 439 stackPush(pVM->pStack, c); in vmPush() [all …]
|
H A D | math64.c | 215 void i64Push(FICL_STACK *pStack, DPINT i64) in i64Push() argument 217 stackPushINT(pStack, i64.lo); in i64Push() 218 stackPushINT(pStack, i64.hi); in i64Push() 224 stackPushINT(pStack, u64.lo); in u64Push() 225 stackPushINT(pStack, u64.hi); in u64Push() 236 DPINT i64Pop(FICL_STACK *pStack) in i64Pop() argument 239 ret.hi = stackPopINT(pStack); in i64Pop() 240 ret.lo = stackPopINT(pStack); in i64Pop() 244 DPUNS u64Pop(FICL_STACK *pStack) in u64Pop() argument 247 ret.hi = stackPopINT(pStack); in u64Pop() [all …]
|
H A D | math64.h | 57 void i64Push(FICL_STACK *pStack, DPINT i64); 58 DPINT i64Pop(FICL_STACK *pStack); 59 void u64Push(FICL_STACK *pStack, DPUNS u64); 60 DPUNS u64Pop(FICL_STACK *pStack);
|
H A D | tools.c | 306 pFW = (FICL_WORD *)stackPopPtr(pVM->pStack); in seeXT() 383 FICL_WORD *xt = stackPopPtr(pVM->pStack); in ficlDebugXT() 386 stackPushPtr(pVM->pStack, xt); in ficlDebugXT() 549 stackPushPtr(pVM->pStack, xt); in stepBreak() 624 FICL_STACK *pStk = pVM->pStack; in displayPStack() 699 pHash = (FICL_HASH *)stackPopPtr(pVM->pStack); in forgetWid() 725 where = ((FICL_WORD *)stackPopPtr(pVM->pStack))->name; in forget()
|
H A D | testmain.c | 266 stackPushUNS(pVM->pStack, (FICL_UNS)now); in ficlClock() 272 stackPushUNS(pVM->pStack, CLOCKS_PER_SEC); in clocksPerSec() 284 pFW = stackPopPtr(pVM->pStack); in execxt()
|
H A D | prefix.c | 134 int base = stackPopINT(pVM->pStack); in fTempBase()
|
H A D | float.c | 791 stackPush(pVM->pStack, c); in FFrom() 804 c = stackPop(pVM->pStack); in ToF()
|
/freebsd/stand/ficl/x86/ |
H A D | sysdep.c | 15 port=stackPopUNS(pVM->pStack); in ficlOutb() 16 c=(u_char)stackPopINT(pVM->pStack); in ficlOutb() 30 port=stackPopUNS(pVM->pStack); in ficlInb() 32 stackPushINT(pVM->pStack,c); in ficlInb()
|
/freebsd/stand/common/ |
H A D | interp_forth.c | 92 if (stackPopINT(vm->pStack)) { in bf_command() 100 nstrings = stackPopINT(vm->pStack); in bf_command() 102 len += stackFetch(vm->pStack, i * 2).i + 1; in bf_command() 108 len = stackPopINT(vm->pStack); in bf_command() 109 cp = stackPopPtr(vm->pStack); in bf_command() 156 stackPushINT(vm->pStack,result); in bf_command()
|