Lines Matching refs:pVM
73 int ficlParsePrefix(FICL_VM *pVM, STRINGINFO si)
77 FICL_WORD *pFW = ficlLookup(pVM->pSys, list_name);
104 vmSetTibIndex(pVM, si.cp + n - pVM->tib.cp );
105 vmExecute(pVM, pFW);
117 static void tempBase(FICL_VM *pVM, int base)
119 int oldbase = pVM->base;
120 STRINGINFO si = vmGetWord0(pVM);
122 pVM->base = base;
123 if (!ficlParseNumber(pVM, si))
126 vmThrowErr(pVM, "%.*s not recognized", i, SI_PTR(si));
129 pVM->base = oldbase;
133 static void fTempBase(FICL_VM *pVM)
135 int base = stackPopINT(pVM->pStack);
136 tempBase(pVM, base);
140 static void prefixHex(FICL_VM *pVM)
142 tempBase(pVM, 16);
145 static void prefixTen(FICL_VM *pVM)
147 tempBase(pVM, 10);