Searched refs:pSys (Results 1 - 14 of 14) sorted by relevance

/freebsd-current/stand/ficl/
H A Dficl.c82 static void ficlSetVersionEnv(FICL_SYSTEM *pSys);
100 FICL_SYSTEM *pSys = ficlMalloc(sizeof (FICL_SYSTEM)); local
102 assert(pSys);
105 memset(pSys, 0, sizeof (FICL_SYSTEM));
115 pSys->dp = dictCreateHashed((unsigned)nDictCells, HASHSIZE);
116 pSys->dp->pForthWords->name = "forth-wordlist";
118 pSys->envp = dictCreate((unsigned)nEnvCells);
119 pSys->envp->pForthWords->name = "environment";
121 pSys->textOut = fsi->textOut;
122 pSys
193 ficlAddParseStep(FICL_SYSTEM *pSys, FICL_WORD *pFW) argument
215 ficlAddPrecompiledParseStep(FICL_SYSTEM *pSys, char *name, FICL_PARSE_STEP pStep) argument
230 FICL_SYSTEM *pSys = pVM->pSys; local
253 ficlNewVM(FICL_SYSTEM *pSys) argument
275 FICL_SYSTEM *pSys = pVM->pSys; local
314 ficlBuild(FICL_SYSTEM *pSys, char *name, FICL_CODE code, char flags) argument
369 FICL_SYSTEM *pSys = pVM->pSys; local
542 ficlLookup(FICL_SYSTEM *pSys, char *name) argument
554 ficlGetDict(FICL_SYSTEM *pSys) argument
564 ficlGetEnv(FICL_SYSTEM *pSys) argument
575 ficlSetEnv(FICL_SYSTEM *pSys, char *name, FICL_UNS value) argument
597 ficlSetEnvD(FICL_SYSTEM *pSys, char *name, FICL_UNS hi, FICL_UNS lo) argument
627 ficlGetLoc(FICL_SYSTEM *pSys) argument
656 ficlTermSystem(FICL_SYSTEM *pSys) argument
689 ficlSetVersionEnv(FICL_SYSTEM *pSys) argument
[all...]
H A Dtestmain.c291 void buildTestInterface(FICL_SYSTEM *pSys) argument
293 ficlBuild(pSys, "break", ficlBreak, FW_DEFAULT);
294 ficlBuild(pSys, "clock", ficlClock, FW_DEFAULT);
295 ficlBuild(pSys, "cd", ficlChDir, FW_DEFAULT);
296 ficlBuild(pSys, "execxt", execxt, FW_DEFAULT);
297 ficlBuild(pSys, "load", ficlLoad, FW_DEFAULT);
298 ficlBuild(pSys, "pwd", ficlGetCWD, FW_DEFAULT);
299 ficlBuild(pSys, "system", ficlSystem, FW_DEFAULT);
300 ficlBuild(pSys, "spewhash", spewHash, FW_DEFAULT);
301 ficlBuild(pSys, "clock
312 FICL_SYSTEM *pSys; local
[all...]
H A Dwords.c472 pVM->pSys->nLocals = 0;
518 assert(pVM->pSys->pSemiParen);
522 assert(pVM->pSys->pUnLinkParen);
523 if (pVM->pSys->nLocals > 0)
525 FICL_DICT *pLoc = ficlGetLoc(pVM->pSys);
527 dictAppendCell(dp, LVALUEtoCELL(pVM->pSys->pUnLinkParen));
529 pVM->pSys->nLocals = 0;
532 dictAppendCell(dp, LVALUEtoCELL(pVM->pSys->pSemiParen));
557 assert(pVM->pSys->pExitParen);
561 if (pVM->pSys
1602 FICL_SYSTEM *pSys; local
4856 ficlCompileCore(FICL_SYSTEM *pSys) argument
[all...]
H A Dprefix.c76 FICL_WORD *pFW = ficlLookup(pVM->pSys, list_name);
157 void ficlCompilePrefix(FICL_SYSTEM *pSys) argument
159 FICL_DICT *dp = pSys->dp;
189 pFW = ficlLookup(pSys, "\\");
H A Dficl.h476 FICL_SYSTEM *pSys; /* Which system this VM belongs to */ member in struct:vm
771 FICL_WORD *ficlLookupLoc (FICL_SYSTEM *pSys, STRINGINFO si);
809 int ficlAddParseStep(FICL_SYSTEM *pSys, FICL_WORD *pFW); /* ficl.c */
810 void ficlAddPrecompiledParseStep(FICL_SYSTEM *pSys, char *name, FICL_PARSE_STEP pStep);
932 void ficlTermSystem(FICL_SYSTEM *pSys);
988 FICL_VM *ficlNewVM(FICL_SYSTEM *pSys);
1011 FICL_WORD *ficlLookup(FICL_SYSTEM *pSys, char *name);
1018 FICL_DICT *ficlGetDict(FICL_SYSTEM *pSys);
1019 FICL_DICT *ficlGetEnv (FICL_SYSTEM *pSys);
1020 void ficlSetEnv (FICL_SYSTEM *pSys, cha
[all...]
H A Dtools.c86 FICL_WORD *pStep = ficlLookup(pVM->pSys, "step-break");
191 FICL_WORD *pSemiParen = ficlLookup(pVM->pSys, "(;)");
397 vmSetBreak(pVM, &(pVM->pSys->bpStep));
427 vmSetBreak(pVM, &(pVM->pSys->bpStep));
444 FICL_WORD *pStep = ficlLookup(pVM->pSys, "step-break");
458 pVM->pSys->bpStep.address = pVM->ip + 1;
459 pVM->pSys->bpStep.origXT = pVM->ip[1];
496 assert(pVM->pSys->bpStep.address);
497 assert(pVM->pSys->bpStep.origXT);
503 pVM->ip = (IPTYPE)(pVM->pSys
878 ficlCompileTools(FICL_SYSTEM *pSys) argument
[all...]
H A Dsearch.c354 void ficlCompileSearch(FICL_SYSTEM *pSys) argument
356 FICL_DICT *dp = pSys->dp;
382 ficlSetEnv(pSys, "search-order", FICL_TRUE);
383 ficlSetEnv(pSys, "search-order-ext", FICL_TRUE);
384 ficlSetEnv(pSys, "wordlists", FICL_DEFAULT_VOCS);
H A Dloader.c813 stackPushINT(pVM->pStack, dictCellsAvail(ficlGetDict(pVM->pSys)));
833 void ficlCompilePlatform(FICL_SYSTEM *pSys) argument
836 FICL_DICT *dp = pSys->dp;
869 (*fnpp)(pSys);
872 ficlSetEnv(pSys, "arch-i386", FICL_TRUE);
873 ficlSetEnv(pSys, "arch-powerpc", FICL_FALSE);
875 ficlSetEnv(pSys, "arch-i386", FICL_FALSE);
876 ficlSetEnv(pSys, "arch-powerpc", FICL_TRUE);
H A Dfileaccess.c399 void ficlCompileFile(FICL_SYSTEM *pSys) argument
402 FICL_DICT *dp = pSys->dp;
425 ficlSetEnv(pSys, "file", FICL_TRUE);
426 ficlSetEnv(pSys, "file-ext", FICL_TRUE);
429 (void)pSys;
H A Dfloat.c661 FICL_WORD *pfLitParen = ficlLookup(pVM->pSys, "(fliteral)");
989 ** pSys -- Pointer to the FICL sytem to add float words to.
991 void ficlCompileFloat(FICL_SYSTEM *pSys) argument
993 FICL_DICT *dp = pSys->dp;
1060 ficlSetEnv(pSys, "floating", FICL_FALSE); /* not all required words are present */
1061 ficlSetEnv(pSys, "floating-ext", FICL_FALSE);
1062 ficlSetEnv(pSys, "floating-stack", FICL_DEFAULT_STACK);
H A Dgfx_loader.c238 static void ficlCompileGfx(FICL_SYSTEM *pSys) argument
241 FICL_DICT *dp = pSys->dp;
H A Ddict.c586 FICL_WORD *ficlLookupLoc(FICL_SYSTEM *pSys, STRINGINFO si) argument
589 FICL_DICT *pDict = pSys->dp;
590 FICL_HASH *pHash = ficlGetLoc(pSys)->pForthWords;
H A Dvm.c256 return pVM->pSys->dp;
/freebsd-current/stand/ficl/x86/
H A Dsysdep.c39 static void ficlCompileCpufunc(FICL_SYSTEM *pSys) argument
41 FICL_DICT *dp = pSys->dp;

Completed in 117 milliseconds