| /titanic_51/usr/src/common/ficl/ |
| H A D | primitives.c | 70 markBranch(ficlDictionary *dictionary, ficlVm *vm, char *tag) in markBranch() argument 72 ficlStackPushPointer(vm->dataStack, dictionary->here); in markBranch() 73 ficlStackPushPointer(vm->dataStack, tag); in markBranch() 77 markControlTag(ficlVm *vm, char *tag) in markControlTag() argument 79 ficlStackPushPointer(vm->dataStack, tag); in markControlTag() 83 matchControlTag(ficlVm *vm, char *wantTag) in matchControlTag() argument 87 FICL_STACK_CHECK(vm->dataStack, 1, 0); in matchControlTag() 89 tag = (char *)ficlStackPopPointer(vm->dataStack); in matchControlTag() 96 ficlVmThrowError(vm, in matchControlTag() 107 resolveBackBranch(ficlDictionary *dictionary, ficlVm *vm, cha argument 127 resolveForwardBranch(ficlDictionary * dictionary,ficlVm * vm,char * tag) resolveForwardBranch() argument 147 resolveAbsBranch(ficlDictionary * dictionary,ficlVm * vm,char * wantTag) resolveAbsBranch() argument 178 ficlPrimitiveColon(ficlVm * vm) ficlPrimitiveColon() argument 195 ficlPrimitiveSemicolonCoIm(ficlVm * vm) ficlPrimitiveSemicolonCoIm() argument 227 ficlPrimitiveExitCoIm(ficlVm * vm) ficlPrimitiveExitCoIm() argument 248 ficlPrimitiveConstant(ficlVm * vm) ficlPrimitiveConstant() argument 260 ficlPrimitive2Constant(ficlVm * vm) ficlPrimitive2Constant() argument 277 ficlPrimitiveDot(ficlVm * vm) ficlPrimitiveDot() argument 290 ficlPrimitiveUDot(ficlVm * vm) ficlPrimitiveUDot() argument 303 ficlPrimitiveHexDot(ficlVm * vm) ficlPrimitiveHexDot() argument 324 ficlPrimitiveStrlen(ficlVm * vm) ficlPrimitiveStrlen() argument 357 ficlPrimitiveSprintf(ficlVm * vm) ficlPrimitiveSprintf() argument 477 ficlPrimitiveDepth(ficlVm * vm) ficlPrimitiveDepth() argument 491 ficlPrimitiveEmit(ficlVm * vm) ficlPrimitiveEmit() argument 505 ficlPrimitiveCR(ficlVm * vm) ficlPrimitiveCR() argument 511 ficlPrimitiveBackslash(ficlVm * vm) ficlPrimitiveBackslash() argument 546 ficlPrimitiveParenthesis(ficlVm * vm) ficlPrimitiveParenthesis() argument 563 ficlPrimitiveIfCoIm(ficlVm * vm) ficlPrimitiveIfCoIm() argument 587 ficlPrimitiveElseCoIm(ficlVm * vm) ficlPrimitiveElseCoIm() argument 612 ficlPrimitiveEndifCoIm(ficlVm * vm) ficlPrimitiveEndifCoIm() argument 632 ficlPrimitiveCaseCoIm(ficlVm * vm) ficlPrimitiveCaseCoIm() argument 645 ficlPrimitiveEndcaseCoIm(ficlVm * vm) ficlPrimitiveEndcaseCoIm() argument 690 ficlPrimitiveOfCoIm(ficlVm * vm) ficlPrimitiveOfCoIm() argument 721 ficlPrimitiveEndofCoIm(ficlVm * vm) ficlPrimitiveEndofCoIm() argument 765 ficlPrimitiveFallthroughCoIm(ficlVm * vm) ficlPrimitiveFallthroughCoIm() argument 805 ficlPrimitiveHash(ficlVm * vm) ficlPrimitiveHash() argument 833 ficlPrimitiveInterpret(ficlVm * vm) ficlPrimitiveInterpret() argument 887 ficlPrimitiveLookup(ficlVm * vm) ficlPrimitiveLookup() argument 903 ficlPrimitiveParseStepParen(ficlVm * vm) ficlPrimitiveParseStepParen() argument 916 ficlPrimitiveAddParseStep(ficlVm * vm) ficlPrimitiveAddParseStep() argument 936 ficlPrimitiveLiteralIm(ficlVm * vm) ficlPrimitiveLiteralIm() argument 993 ficlPrimitive2LiteralIm(ficlVm * vm) ficlPrimitive2LiteralIm() argument 1027 ficlPrimitiveDoCoIm(ficlVm * vm) ficlPrimitiveDoCoIm() argument 1045 ficlPrimitiveQDoCoIm(ficlVm * vm) ficlPrimitiveQDoCoIm() argument 1064 ficlPrimitiveLoopCoIm(ficlVm * vm) ficlPrimitiveLoopCoIm() argument 1074 ficlPrimitivePlusLoopCoIm(ficlVm * vm) ficlPrimitivePlusLoopCoIm() argument 1087 ficlPrimitiveVariable(ficlVm * vm) ficlPrimitiveVariable() argument 1098 ficlPrimitive2Variable(ficlVm * vm) ficlPrimitive2Variable() argument 1112 ficlPrimitiveBase(ficlVm * vm) ficlPrimitiveBase() argument 1124 ficlPrimitiveDecimal(ficlVm * vm) ficlPrimitiveDecimal() argument 1131 ficlPrimitiveHex(ficlVm * vm) ficlPrimitiveHex() argument 1140 ficlPrimitiveAllot(ficlVm * vm) ficlPrimitiveAllot() argument 1156 ficlPrimitiveHere(ficlVm * vm) ficlPrimitiveHere() argument 1174 ficlPrimitiveTick(ficlVm * vm) ficlPrimitiveTick() argument 1190 ficlPrimitiveBracketTickCoIm(ficlVm * vm) ficlPrimitiveBracketTickCoIm() argument 1203 ficlPrimitivePostponeCoIm(ficlVm * vm) ficlPrimitivePostponeCoIm() argument 1230 ficlPrimitiveExecute(ficlVm * vm) ficlPrimitiveExecute() argument 1247 ficlPrimitiveImmediate(ficlVm * vm) ficlPrimitiveImmediate() argument 1254 ficlPrimitiveCompileOnly(ficlVm * vm) ficlPrimitiveCompileOnly() argument 1261 ficlPrimitiveSetObjectFlag(ficlVm * vm) ficlPrimitiveSetObjectFlag() argument 1268 ficlPrimitiveIsObject(ficlVm * vm) ficlPrimitiveIsObject() argument 1280 ficlPrimitiveCountedStringQuoteIm(ficlVm * vm) ficlPrimitiveCountedStringQuoteIm() argument 1314 ficlPrimitiveDotQuoteCoIm(ficlVm * vm) ficlPrimitiveDotQuoteCoIm() argument 1333 ficlPrimitiveDotParen(ficlVm * vm) ficlPrimitiveDotParen() argument 1365 ficlPrimitiveSLiteralCoIm(ficlVm * vm) ficlPrimitiveSLiteralCoIm() argument 1396 ficlPrimitiveState(ficlVm * vm) ficlPrimitiveState() argument 1409 ficlPrimitiveCreate(ficlVm * vm) ficlPrimitiveCreate() argument 1420 ficlPrimitiveDoesCoIm(ficlVm * vm) ficlPrimitiveDoesCoIm() argument 1446 ficlPrimitiveToBody(ficlVm * vm) ficlPrimitiveToBody() argument 1460 ficlPrimitiveFromBody(ficlVm * vm) ficlPrimitiveFromBody() argument 1475 ficlPrimitiveToName(ficlVm * vm) ficlPrimitiveToName() argument 1487 ficlPrimitiveLastWord(ficlVm * vm) ficlPrimitiveLastWord() argument 1503 ficlPrimitiveLeftBracketCoIm(ficlVm * vm) ficlPrimitiveLeftBracketCoIm() argument 1509 ficlPrimitiveRightBracket(ficlVm * vm) ficlPrimitiveRightBracket() argument 1522 ficlPrimitiveLessNumberSign(ficlVm * vm) ficlPrimitiveLessNumberSign() argument 1537 ficlPrimitiveNumberSign(ficlVm * vm) ficlPrimitiveNumberSign() argument 1559 ficlPrimitiveNumberSignGreater(ficlVm * vm) ficlPrimitiveNumberSignGreater() argument 1581 ficlPrimitiveNumberSignS(ficlVm * vm) ficlPrimitiveNumberSignS() argument 1609 ficlPrimitiveHold(ficlVm * vm) ficlPrimitiveHold() argument 1628 ficlPrimitiveSign(ficlVm * vm) ficlPrimitiveSign() argument 1656 ficlPrimitiveToNumber(ficlVm * vm) ficlPrimitiveToNumber() argument 1709 ficlPrimitiveQuit(ficlVm * vm) ficlPrimitiveQuit() argument 1715 ficlPrimitiveAbort(ficlVm * vm) ficlPrimitiveAbort() argument 1739 ficlPrimitiveAccept(ficlVm * vm) ficlPrimitiveAccept() argument 1767 ficlPrimitiveAlign(ficlVm * vm) ficlPrimitiveAlign() argument 1778 ficlPrimitiveAligned(ficlVm * vm) ficlPrimitiveAligned() argument 1798 ficlPrimitiveBeginCoIm(ficlVm * vm) ficlPrimitiveBeginCoIm() argument 1805 ficlPrimitiveUntilCoIm(ficlVm * vm) ficlPrimitiveUntilCoIm() argument 1815 ficlPrimitiveWhileCoIm(ficlVm * vm) ficlPrimitiveWhileCoIm() argument 1833 ficlPrimitiveRepeatCoIm(ficlVm * vm) ficlPrimitiveRepeatCoIm() argument 1846 ficlPrimitiveAgainCoIm(ficlVm * vm) ficlPrimitiveAgainCoIm() argument 1871 ficlPrimitiveChar(ficlVm * vm) ficlPrimitiveChar() argument 1882 ficlPrimitiveCharCoIm(ficlVm * vm) ficlPrimitiveCharCoIm() argument 1894 ficlPrimitiveCharPlus(ficlVm * vm) ficlPrimitiveCharPlus() argument 1915 ficlPrimitiveChars(ficlVm * vm) ficlPrimitiveChars() argument 1940 ficlPrimitiveCount(ficlVm * vm) ficlPrimitiveCount() argument 1965 ficlPrimitiveEnvironmentQ(ficlVm * vm) ficlPrimitiveEnvironmentQ() argument 1998 ficlPrimitiveEvaluate(ficlVm * vm) ficlPrimitiveEvaluate() argument 2026 ficlPrimitiveStringQuoteIm(ficlVm * vm) ficlPrimitiveStringQuoteIm() argument 2051 ficlPrimitiveType(ficlVm * vm) ficlPrimitiveType() argument 2096 ficlPrimitiveWord(ficlVm * vm) ficlPrimitiveWord() argument 2132 ficlPrimitiveParseNoCopy(ficlVm * vm) ficlPrimitiveParseNoCopy() argument 2153 ficlPrimitiveParse(ficlVm * vm) ficlPrimitiveParse() argument 2178 do_find(ficlVm * vm,ficlString name,void * returnForFailure) do_find() argument 2204 ficlPrimitiveCFind(ficlVm * vm) ficlPrimitiveCFind() argument 2222 ficlPrimitiveSFind(ficlVm * vm) ficlPrimitiveSFind() argument 2238 ficlPrimitiveRecurseCoIm(ficlVm * vm) ficlPrimitiveRecurseCoIm() argument 2255 ficlPrimitiveSource(ficlVm * vm) ficlPrimitiveSource() argument 2268 ficlPrimitiveVersion(ficlVm * vm) ficlPrimitiveVersion() argument 2278 ficlPrimitiveToIn(ficlVm * vm) ficlPrimitiveToIn() argument 2292 ficlPrimitiveColonNoName(ficlVm * vm) ficlPrimitiveColonNoName() argument 2328 ficlPrimitiveUser(ficlVm * vm) ficlPrimitiveUser() argument 2355 ficlLocalParenIm(ficlVm * vm,int isDouble,int isFloat) ficlLocalParenIm() argument 2410 ficlPrimitiveDoLocalIm(ficlVm * vm) ficlPrimitiveDoLocalIm() argument 2416 ficlPrimitiveDo2LocalIm(ficlVm * vm) ficlPrimitiveDo2LocalIm() argument 2423 ficlPrimitiveDoFLocalIm(ficlVm * vm) ficlPrimitiveDoFLocalIm() argument 2429 ficlPrimitiveDoF2LocalIm(ficlVm * vm) ficlPrimitiveDoF2LocalIm() argument 2459 ficlLocalParen(ficlVm * vm,int isDouble,int isFloat) ficlLocalParen() argument 2540 ficlPrimitiveLocalParen(ficlVm * vm) ficlPrimitiveLocalParen() argument 2546 ficlPrimitive2LocalParen(ficlVm * vm) ficlPrimitive2LocalParen() argument 2561 ficlPrimitiveToValue(ficlVm * vm) ficlPrimitiveToValue() argument 2698 ficlPrimitiveFMSlashMod(ficlVm * vm) ficlPrimitiveFMSlashMod() argument 2723 ficlPrimitiveSMSlashRem(ficlVm * vm) ficlPrimitiveSMSlashRem() argument 2740 ficlPrimitiveMod(ficlVm * vm) ficlPrimitiveMod() argument 2764 ficlPrimitiveUMSlashMod(ficlVm * vm) ficlPrimitiveUMSlashMod() argument 2784 ficlPrimitiveMStar(ficlVm * vm) ficlPrimitiveMStar() argument 2799 ficlPrimitiveUMStar(ficlVm * vm) ficlPrimitiveUMStar() argument 2818 ficlPrimitive2Rot(ficlVm * vm) ficlPrimitive2Rot() argument 2838 ficlPrimitivePad(ficlVm * vm) ficlPrimitivePad() argument 2855 ficlPrimitiveSourceID(ficlVm * vm) ficlPrimitiveSourceID() argument 2874 ficlPrimitiveRefill(ficlVm * vm) ficlPrimitiveRefill() argument 2904 ficlPrimitiveCatch(ficlVm * vm) ficlPrimitiveCatch() argument 3007 ficlPrimitiveThrow(ficlVm * vm) ficlPrimitiveThrow() argument 3022 ficlPrimitiveAllocate(ficlVm * vm) ficlPrimitiveAllocate() argument 3041 ficlPrimitiveFree(ficlVm * vm) ficlPrimitiveFree() argument 3055 ficlPrimitiveResize(ficlVm * vm) ficlPrimitiveResize() argument 3078 ficlPrimitiveExitInner(ficlVm * vm) ficlPrimitiveExitInner() argument [all...] |
| H A D | tools.c | 61 static void ficlPrimitiveStepIn(ficlVm *vm); 62 static void ficlPrimitiveStepOver(ficlVm *vm); 63 static void ficlPrimitiveStepBreak(ficlVm *vm); 92 ficlVmSetBreak(ficlVm *vm, ficlBreakpoint *pBP) in ficlVmSetBreak() argument 94 ficlWord *pStep = ficlSystemLookup(vm->callback.system, "step-break"); in ficlVmSetBreak() 95 FICL_VM_ASSERT(vm, pStep); in ficlVmSetBreak() 97 pBP->address = vm->ip; in ficlVmSetBreak() 98 pBP->oldXT = *vm->ip; in ficlVmSetBreak() 99 *vm->ip = pStep; in ficlVmSetBreak() 106 ficlDebugPrompt(ficlVm *vm, in argument 137 ficlPrimitiveHashSummary(ficlVm * vm) ficlPrimitiveHashSummary() argument 204 ficlPrimitiveSeeXT(ficlVm * vm) ficlPrimitiveSeeXT() argument 269 ficlPrimitiveSee(ficlVm * vm) ficlPrimitiveSee() argument 284 ficlPrimitiveDebugXT(ficlVm * vm) ficlPrimitiveDebugXT() argument 315 ficlPrimitiveStepIn(ficlVm * vm) ficlPrimitiveStepIn() argument 336 ficlPrimitiveStepOver(ficlVm * vm) ficlPrimitiveStepOver() argument 383 ficlPrimitiveStepBreak(ficlVm * vm) ficlPrimitiveStepBreak() argument 515 ficlPrimitiveBye(ficlVm * vm) ficlPrimitiveBye() argument 528 ficlVm *vm; global() member 556 ficlVm *vm = stack->vm; ficlStackDisplay() local 590 ficlVmDisplayDataStack(ficlVm * vm) ficlVmDisplayDataStack() argument 608 ficlVmDisplayDataStackSimple(ficlVm * vm) ficlVmDisplayDataStackSimple() argument 660 ficlVmDisplayReturnStack(ficlVm * vm) ficlVmDisplayReturnStack() argument 674 ficlPrimitiveForgetWid(ficlVm * vm) ficlPrimitiveForgetWid() argument 696 ficlPrimitiveForget(ficlVm * vm) ficlPrimitiveForget() argument 714 ficlPrimitiveWords(ficlVm * vm) ficlPrimitiveWords() argument 807 ficlPrimitiveListEnv(ficlVm * vm) ficlPrimitiveListEnv() argument 838 ficlPrimitiveParseStepList(ficlVm * vm) ficlPrimitiveParseStepList() argument 862 ficlPrimitiveEnvConstant(ficlVm * vm) ficlPrimitiveEnvConstant() argument 874 ficlPrimitiveEnv2Constant(ficlVm * vm) ficlPrimitiveEnv2Constant() argument [all...] |
| H A D | fileaccess.c | 12 pushIor(ficlVm *vm, int success) in pushIor() argument 19 ficlStackPushInteger(vm->dataStack, ior); in pushIor() 24 ficlFileOpen(ficlVm *vm, char *writeMode) in ficlFileOpen() argument 26 int fam = ficlStackPopInteger(vm->dataStack); in ficlFileOpen() 27 int length = ficlStackPopInteger(vm->dataStack); in ficlFileOpen() 28 void *address = (void *)ficlStackPopPointer(vm->dataStack); in ficlFileOpen() 39 ficlStackPushPointer(vm->dataStack, NULL); in ficlFileOpen() 40 ficlStackPushInteger(vm->dataStack, EINVAL); in ficlFileOpen() 58 ficlStackPushPointer(vm->dataStack, NULL); in ficlFileOpen() 63 ficlStackPushPointer(vm in ficlFileOpen() 75 ficlPrimitiveOpenFile(ficlVm * vm) ficlPrimitiveOpenFile() argument 82 ficlPrimitiveCreateFile(ficlVm * vm) ficlPrimitiveCreateFile() argument 98 ficlPrimitiveCloseFile(ficlVm * vm) ficlPrimitiveCloseFile() argument 106 ficlPrimitiveDeleteFile(ficlVm * vm) ficlPrimitiveDeleteFile() argument 121 ficlPrimitiveRenameFile(ficlVm * vm) ficlPrimitiveRenameFile() argument 149 ficlPrimitiveFileStatus(ficlVm * vm) ficlPrimitiveFileStatus() argument 170 ficlPrimitiveFilePosition(ficlVm * vm) ficlPrimitiveFilePosition() argument 180 ficlPrimitiveFileSize(ficlVm * vm) ficlPrimitiveFileSize() argument 191 ficlPrimitiveIncludeFile(ficlVm * vm) ficlPrimitiveIncludeFile() argument 232 ficlPrimitiveReadFile(ficlVm * vm) ficlPrimitiveReadFile() argument 248 ficlPrimitiveReadLine(ficlVm * vm) ficlPrimitiveReadLine() argument 288 ficlPrimitiveWriteFile(ficlVm * vm) ficlPrimitiveWriteFile() argument 301 ficlPrimitiveWriteLine(ficlVm * vm) ficlPrimitiveWriteLine() argument 315 ficlPrimitiveRepositionFile(ficlVm * vm) ficlPrimitiveRepositionFile() argument 325 ficlPrimitiveFlushFile(ficlVm * vm) ficlPrimitiveFlushFile() argument 334 ficlPrimitiveResizeFile(ficlVm * vm) ficlPrimitiveResizeFile() argument [all...] |
| H A D | search.c | 56 ficlPrimitiveDefinitions(ficlVm *vm) in ficlPrimitiveDefinitions() argument 58 ficlDictionary *dictionary = ficlVmGetDictionary(vm); in ficlPrimitiveDefinitions() 60 FICL_VM_ASSERT(vm, dictionary); in ficlPrimitiveDefinitions() 62 ficlVmThrowError(vm, "DEFINITIONS error - empty search order"); in ficlPrimitiveDefinitions() 77 ficlPrimitiveForthWordlist(ficlVm *vm) in ficlPrimitiveForthWordlist() argument 79 ficlHash *hash = ficlVmGetDictionary(vm)->forthWordlist; in ficlPrimitiveForthWordlist() 80 ficlStackPushPointer(vm->dataStack, hash); in ficlPrimitiveForthWordlist() 90 ficlPrimitiveGetCurrent(ficlVm *vm) in ficlPrimitiveGetCurrent() argument 92 ficlDictionary *dictionary = ficlVmGetDictionary(vm); in ficlPrimitiveGetCurrent() 94 ficlStackPushPointer(vm in ficlPrimitiveGetCurrent() 107 ficlPrimitiveGetOrder(ficlVm * vm) ficlPrimitiveGetOrder() argument 131 ficlPrimitiveSearchWordlist(ficlVm * vm) ficlPrimitiveSearchWordlist() argument 161 ficlPrimitiveSetCurrent(ficlVm * vm) ficlPrimitiveSetCurrent() argument 182 ficlPrimitiveSetOrder(ficlVm * vm) ficlPrimitiveSetOrder() argument 224 ficlPrimitiveFiclWordlist(ficlVm * vm) ficlPrimitiveFiclWordlist() argument 243 ficlPrimitiveSearchPop(ficlVm * vm) ficlPrimitiveSearchPop() argument 264 ficlPrimitiveSearchPush(ficlVm * vm) ficlPrimitiveSearchPush() argument 283 ficlPrimitiveWidGetName(ficlVm * vm) ficlPrimitiveWidGetName() argument 311 ficlPrimitiveWidSetName(ficlVm * vm) ficlPrimitiveWidSetName() argument 326 ficlPrimitiveSetParentWid(ficlVm * vm) ficlPrimitiveSetParentWid() argument [all...] |
| H A D | extras.c | 15 ficlPrimitiveSystem(ficlVm *vm) in ficlPrimitiveSystem() argument 17 ficlCountedString *counted = (ficlCountedString *)vm->pad; in ficlPrimitiveSystem() 19 ficlVmGetString(vm, counted, '\n'); in ficlPrimitiveSystem() 24 sprintf(vm->pad, "System call returned %d\n", in ficlPrimitiveSystem() 26 ficlVmTextOut(vm, vm->pad); in ficlPrimitiveSystem() 27 ficlVmThrow(vm, FICL_VM_STATUS_QUIT); in ficlPrimitiveSystem() 30 ficlVmTextOut(vm, "Warning (system): nothing happened\n"); in ficlPrimitiveSystem() 43 ficlPrimitiveLoad(ficlVm *vm) in ficlPrimitiveLoad() argument 54 ficlVmGetString(vm, counte in ficlPrimitiveLoad() 125 ficlPrimitiveSpewHash(ficlVm * vm) ficlPrimitiveSpewHash() argument 166 ficlPrimitiveBreak(ficlVm * vm) ficlPrimitiveBreak() argument [all...] |
| H A D | vm.c | 6 * $Id: vm.c,v 1.17 2010/09/13 18:43:04 asau Exp $ 53 #define FICL_VM_CHECK(vm) \ argument 54 FICL_VM_ASSERT(vm, (*(vm->ip - 1)) == vm->runningWord) 56 #define FICL_VM_CHECK(vm) argument 63 ficlVmBranchRelative(ficlVm *vm, int offset) in ficlVmBranchRelative() argument 65 vm->ip += offset; in ficlVmBranchRelative() 70 * Creates a virtual machine either from scratch (if vm is NULL on entry) 75 ficlVmCreate(ficlVm *vm, unsigne argument 107 ficlVmDestroy(ficlVm * vm) ficlVmDestroy() argument 127 ficlVmExecuteWord(ficlVm * vm,ficlWord * pWord) ficlVmExecuteWord() argument 133 ficlVmOptimizeJumpToJump(ficlVm * vm,ficlIp ip) ficlVmOptimizeJumpToJump() argument 239 ficlVmInnerLoop(ficlVm * vm,ficlWord * fw) ficlVmInnerLoop() argument 2065 ficlVmGetDictionary(ficlVm * vm) ficlVmGetDictionary() argument 2080 ficlVmGetString(ficlVm * vm,ficlCountedString * counted,char delimiter) ficlVmGetString() argument 2102 ficlVmGetWord(ficlVm * vm) ficlVmGetWord() argument 2123 ficlVmGetWord0(ficlVm * vm) ficlVmGetWord0() argument 2163 ficlVmGetWordToPad(ficlVm * vm) ficlVmGetWordToPad() argument 2188 ficlVmParseString(ficlVm * vm,char delimiter) ficlVmParseString() argument 2194 ficlVmParseStringEx(ficlVm * vm,char delimiter,char skipLeadingDelimiters) ficlVmParseStringEx() argument 2231 ficlVmPop(ficlVm * vm) ficlVmPop() argument 2240 ficlVmPush(ficlVm * vm,ficlCell c) ficlVmPush() argument 2249 ficlVmPopIP(ficlVm * vm) ficlVmPopIP() argument 2258 ficlVmPushIP(ficlVm * vm,ficlIp newIP) ficlVmPushIP() argument 2269 ficlVmPushTib(ficlVm * vm,char * text,ficlInteger nChars,ficlTIB * pSaveTib) ficlVmPushTib() argument 2280 ficlVmPopTib(ficlVm * vm,ficlTIB * pTib) ficlVmPopTib() argument 2291 ficlVmQuit(ficlVm * vm) ficlVmQuit() argument 2309 ficlVmReset(ficlVm * vm) ficlVmReset() argument 2325 ficlVmSetTextOut(ficlVm * vm,ficlOutputFunction textOut) ficlVmSetTextOut() argument 2331 ficlVmTextOut(ficlVm * vm,char * text) ficlVmTextOut() argument 2338 ficlVmErrorOut(ficlVm * vm,char * text) ficlVmErrorOut() argument 2348 ficlVmThrow(ficlVm * vm,int except) ficlVmThrow() argument 2355 ficlVmThrowError(ficlVm * vm,char * fmt,...) ficlVmThrowError() argument 2369 ficlVmThrowErrorVararg(ficlVm * vm,char * fmt,va_list list) ficlVmThrowErrorVararg() argument 2388 ficlVmEvaluate(ficlVm * vm,char * s) ficlVmEvaluate() argument 2419 ficlVmExecuteString(ficlVm * vm,ficlString s) ficlVmExecuteString() argument 2525 ficlVmExecuteXT(ficlVm * vm,ficlWord * pWord) ficlVmExecuteXT() argument 2592 ficlVmParseNumber(ficlVm * vm,ficlString s) ficlVmParseNumber() argument 2672 ficlVmDictionarySimpleCheck(ficlVm * vm,ficlDictionary * dictionary,int cells) ficlVmDictionarySimpleCheck() argument 2694 ficlVmDictionaryCheck(ficlVm * vm,ficlDictionary * dictionary,int cells) ficlVmDictionaryCheck() argument 2714 ficlVmDictionaryAllot(ficlVm * vm,ficlDictionary * dictionary,int n) ficlVmDictionaryAllot() argument 2722 ficlVmDictionaryAllotCells(ficlVm * vm,ficlDictionary * dictionary,int cells) ficlVmDictionaryAllotCells() argument 2750 ficlVmParseWord(ficlVm * vm,ficlString name) ficlVmParseWord() argument [all...] |
| H A D | float.c | 56 ficlPrimitiveFConstant(ficlVm *vm) in ficlPrimitiveFConstant() argument 58 ficlDictionary *dictionary = ficlVmGetDictionary(vm); in ficlPrimitiveFConstant() 59 ficlString name = ficlVmGetWord(vm); in ficlPrimitiveFConstant() 61 FICL_STACK_CHECK(vm->floatStack, 1, 0); in ficlPrimitiveFConstant() 65 ficlDictionaryAppendCell(dictionary, ficlStackPop(vm->floatStack)); in ficlPrimitiveFConstant() 94 ficlPrimitiveF2Constant(ficlVm *vm) in ficlPrimitiveF2Constant() argument 96 ficlDictionary *dictionary = ficlVmGetDictionary(vm); in ficlPrimitiveF2Constant() 97 ficlString name = ficlVmGetWord(vm); in ficlPrimitiveF2Constant() 99 FICL_STACK_CHECK(vm->floatStack, 2, 0); in ficlPrimitiveF2Constant() 103 ficlDictionaryAppendCell(dictionary, ficlStackPop(vm in ficlPrimitiveF2Constant() 132 ficlPrimitiveFDot(ficlVm * vm) ficlPrimitiveFDot() argument 148 ficlPrimitiveEDot(ficlVm * vm) ficlPrimitiveEDot() argument 166 ficlVm *vm; global() member 187 ficlVmDisplayFloatStack(ficlVm * vm) ficlVmDisplayFloatStack() argument 201 ficlPrimitiveFDepth(ficlVm * vm) ficlPrimitiveFDepth() argument 215 ficlPrimitiveFLiteralImmediate(ficlVm * vm) ficlPrimitiveFLiteralImmediate() argument 260 ficlVmParseFloatNumber(ficlVm * vm,ficlString s) ficlVmParseFloatNumber() argument 391 ficlPrimitiveFLocalParen(ficlVm * vm) ficlPrimitiveFLocalParen() argument 397 ficlPrimitiveF2LocalParen(ficlVm * vm) ficlPrimitiveF2LocalParen() argument [all...] |
| /titanic_51/usr/src/lib/libast/common/vmalloc/ |
| H A D | vmwalk.c | 36 int vmwalk(Vmalloc_t* vm, int(*segf)(Vmalloc_t*, Void_t*, size_t, Vmdisc_t*, Void_t*), Void_t* hand… in vmwalk() argument 38 int vmwalk(vm, segf, handle) in vmwalk() 39 Vmalloc_t* vm; in vmwalk() 47 if(!vm) 48 { for(vm = Vmheap; vm; vm = vm->next) 49 { if(!(vm->data->mode&VM_TRUST) && ISLOCK(vm->data,0) ) 52 SETLOCK(vm->data,0); 53 for(seg = vm->data->seg; seg; seg = seg->next) 54 { rv = (*segf)(vm, seg->addr, seg->extent, vm->disc, handle); 58 CLRLOCK(vm->data,0); [all …]
|
| H A D | vmdebug.c | 82 static void vmdbwarn(Vmalloc_t* vm, char* mesg, int n) in vmdbwarn() argument 84 static void vmdbwarn(vm, mesg, n) in vmdbwarn() 85 Vmalloc_t* vm; in vmdbwarn() 90 reg Vmdata_t* vd = vm->data; 99 static void dbwarn(Vmalloc_t* vm, Void_t* data, int where, in dbwarn() argument 102 static void dbwarn(vm, data, where, file, line, func, type) in dbwarn() 103 Vmalloc_t* vm; /* region holding the block */ in dbwarn() 133 bufp = (*_Vmstrcpy)(bufp, (*_Vmitoa)(VLONG(vm), 0), ':'); 183 vmdbwarn(vm,buf,(bufp-buf)); 188 static void dbwatch(Vmalloc_t* vm, Void_t* data, in dbwatch() argument [all …]
|
| H A D | vmpool.c | 42 static Void_t* poolalloc(Vmalloc_t* vm, reg size_t size) in poolalloc() argument 44 static Void_t* poolalloc(vm, size ) in poolalloc() 45 Vmalloc_t* vm; in poolalloc() 49 reg Vmdata_t* vd = vm->data; 88 { if((tp = (*_Vmextend)(vm,ROUND(size,vd->incr),NIL(Vmsearch_f))) ) 117 (*_Vmtrace)(vm,NIL(Vmuchar_t*),(Vmuchar_t*)tp,vd->pool,0); 120 ANNOUNCE(local, vm, VM_ALLOC, (Void_t*)tp, vm->disc); 126 static long pooladdr(Vmalloc_t* vm, reg Void_t* addr) in pooladdr() argument 128 static long pooladdr(vm, addr) in pooladdr() 129 Vmalloc_t* vm; in pooladdr() [all …]
|
| H A D | vmprofile.c | 36 #define PFVM(pf) ((pf)->data.data.vm) 54 Vmalloc_t* vm; /* region alloc from */ member 76 static Pfobj_t* pfsearch(Vmalloc_t* vm, const char* file, int line) in pfsearch() argument 78 static Pfobj_t* pfsearch(vm, file, line) in pfsearch() 79 Vmalloc_t* vm; /* region allocating from */ in pfsearch() 101 h = line + (((Vmulong_t)vm)>>4); 106 if(PFLINE(pf) == line && PFVM(pf) == vm && strcmp(PFFILE(pf),file) == 0) 137 if(vm >= PFVM(pfvm)) 139 if(!pfvm || PFVM(pfvm) > vm) 153 PFVM(pfvm) = vm; [all …]
|
| H A D | vmclose.c | 35 int vmclose(Vmalloc_t* vm) in vmclose() argument 37 int vmclose(vm) in vmclose() 38 Vmalloc_t* vm; in vmclose() 43 Vmdata_t* vd = vm->data; 46 if(vm == Vmheap) 52 if(vm->disc->exceptf && 53 (ev = (*vm->disc->exceptf)(vm,VM_CLOSE,NIL(Void_t*),vm->disc)) < 0 ) 61 (*_Vmpfclose)(vm); 65 { if(v == vm) 77 else (*vm->disc->memoryf)(vm,seg->addr,seg->extent,0,vm->disc); [all …]
|
| /titanic_51/usr/src/contrib/ast/src/lib/libast/vmalloc/ |
| H A D | vmpool.c | 42 static Void_t* poolalloc(Vmalloc_t* vm, reg size_t size, int local) in poolalloc() argument 44 static Void_t* poolalloc(vm, size, local ) in poolalloc() 45 Vmalloc_t* vm; in poolalloc() 53 reg Vmdata_t *vd = vm->data; 64 SETLOCK(vm, local); 80 if((tp = (*_Vmextend)(vm,ROUND(size,vd->incr),NIL(Vmsearch_f))) ) 106 (*_Vmtrace)(vm,NIL(Vmuchar_t*),(Vmuchar_t*)tp,vd->pool,0); 108 CLRLOCK(vm, local); 114 static long pooladdr(Vmalloc_t* vm, reg Void_t* addr, int local) in pooladdr() argument 116 static long pooladdr(vm, add in pooladdr() 159 poolfree(reg Vmalloc_t * vm,reg Void_t * data,int local) poolfree() argument 192 poolresize(Vmalloc_t * vm,Void_t * data,size_t size,int type,int local) poolresize() argument 232 poolsize(Vmalloc_t * vm,Void_t * addr,int local) poolsize() argument 244 poolcompact(Vmalloc_t * vm,int local) poolcompact() argument 282 poolalign(Vmalloc_t * vm,size_t size,size_t align,int local) poolalign() argument [all...] |
| H A D | vmdebug.c | 81 static void vmdbwarn(Vmalloc_t* vm, char* mesg, int n) in vmdbwarn() argument 83 static void vmdbwarn(vm, mesg, n) in vmdbwarn() 84 Vmalloc_t* vm; in vmdbwarn() 89 reg Vmdata_t* vd = vm->data; 98 static void dbwarn(Vmalloc_t* vm, Void_t* data, int where, in dbwarn() argument 101 static void dbwarn(vm, data, where, file, line, func, type) in dbwarn() 102 Vmalloc_t* vm; /* region holding the block */ in dbwarn() 132 bufp = (*_Vmstrcpy)(bufp, (*_Vmitoa)(VLONG(vm), 0), ':'); 182 vmdbwarn(vm,buf,(int)(bufp-buf)); 187 static void dbwatch(Vmalloc_t* vm, Void_ argument 264 dbaddr(Vmalloc_t * vm,Void_t * addr,int local) dbaddr() argument 323 dbsize(Vmalloc_t * vm,Void_t * addr,int local) dbsize() argument 362 dballoc(Vmalloc_t * vm,size_t size,int local) dballoc() argument 411 dbfree(Vmalloc_t * vm,Void_t * data,int local) dbfree() argument 463 dbresize(Vmalloc_t * vm,Void_t * addr,reg size_t size,int type,int local) dbresize() argument 549 dbcompact(Vmalloc_t * vm,int local) dbcompact() argument 561 vmdbcheck(Vmalloc_t * vm) vmdbcheck() argument 654 dbalign(Vmalloc_t * vm,size_t size,size_t align,int local) dbalign() argument 696 vmdbstat(Vmalloc_t * vm) vmdbstat() argument [all...] |
| H A D | vmwalk.c | 36 int vmwalk(Vmalloc_t* vm, int(*segf)(Vmalloc_t*, Void_t*, size_t, Vmdisc_t*, Void_t*), Void_t* handle ) in vmwalk() argument 38 int vmwalk(vm, segf, handle) in vmwalk() 39 Vmalloc_t* vm; in vmwalk() 47 if(!vm) 49 for(vm = Vmheap; vm; vm = vm->next) 50 { SETLOCK(vm, 0); 51 for(seg = vm [all...] |
| H A D | vmprofile.c | 36 #define PFVM(pf) ((pf)->data.data.vm) 54 Vmalloc_t* vm; /* region alloc from */ member 76 static Pfobj_t* pfsearch(Vmalloc_t* vm, char* file, int line) in pfsearch() argument 78 static Pfobj_t* pfsearch(vm, file, line) in pfsearch() 79 Vmalloc_t* vm; /* region allocating from */ in pfsearch() 100 /* see if it's there with a combined hash value of vm,file,line */ 101 h = line + (((Vmulong_t)vm)>>4); 106 if(PFLINE(pf) == line && PFVM(pf) == vm && strcmp(PFFILE(pf),file) == 0) 134 /* get region record; note that these are ordered by vm */ 137 if(vm > 182 pfclose(Vmalloc_t * vm) pfclose() argument 210 pfsetinfo(Vmalloc_t * vm,Vmuchar_t * data,size_t size,char * file,int line) pfsetinfo() argument 354 vmprofile(Vmalloc_t * vm,int fd) vmprofile() argument 464 pfalloc(Vmalloc_t * vm,size_t size,int local) pfalloc() argument 499 pffree(Vmalloc_t * vm,Void_t * data,int local) pffree() argument 545 pfresize(Vmalloc_t * vm,Void_t * data,size_t size,int type,int local) pfresize() argument 621 pfsize(Vmalloc_t * vm,Void_t * addr,int local) pfsize() argument 633 pfaddr(Vmalloc_t * vm,Void_t * addr,int local) pfaddr() argument 645 pfcompact(Vmalloc_t * vm,int local) pfcompact() argument 656 pfalign(Vmalloc_t * vm,size_t size,size_t align,int local) pfalign() argument [all...] |
| H A D | vmlast.c | 36 static Void_t* lastalloc(Vmalloc_t* vm, size_t size, int local) in lastalloc() argument 38 static Void_t* lastalloc(vm, size, local) in lastalloc() 39 Vmalloc_t* vm; in lastalloc() 47 Vmdata_t *vd = vm->data; 50 SETLOCK(vm, local); 65 if((tp = (*_Vmextend)(vm,size,NIL(Vmsearch_f))) ) 83 (*_Vmtrace)(vm, NIL(Vmuchar_t*), (Vmuchar_t*)tp, orgsize, 0); 86 CLRLOCK(vm, local); 92 static int lastfree(Vmalloc_t* vm, reg Void_t* data, int local ) in lastfree() argument 94 static int lastfree(vm, dat in lastfree() 135 lastresize(Vmalloc_t * vm,reg Void_t * data,size_t size,int type,int local) lastresize() argument 271 lastaddr(Vmalloc_t * vm,Void_t * addr,int local) lastaddr() argument 294 lastsize(Vmalloc_t * vm,Void_t * addr,int local) lastsize() argument 319 lastcompact(Vmalloc_t * vm,int local) lastcompact() argument 356 lastalign(Vmalloc_t * vm,size_t size,size_t align,int local) lastalign() argument [all...] |
| H A D | vmclose.c | 35 int vmclose(Vmalloc_t* vm) in vmclose() argument 37 int vmclose(vm) in vmclose() 38 Vmalloc_t* vm; in vmclose() 43 Vmdata_t* vd = vm->data; 44 Vmdisc_t* disc = vm->disc; 47 if(vm == Vmheap) /* the heap is never freed */ 50 if(vm->disc->exceptf && /* announcing closing event */ 51 (rv = (*vm->disc->exceptf)(vm,VM_CLOSE,(Void_t*)1,vm [all...] |
| H A D | vmprivate.c | 40 static Block_t* _vmextend(reg Vmalloc_t* vm, size_t size, Vmsearch_f searchf ) in _vmextend() argument 42 static Block_t* _vmextend(vm, size, searchf ) in _vmextend() 43 reg Vmalloc_t* vm; /* region to increase in size */ in _vmextend() 52 reg Vmdata_t* vd = vm->data; 67 if(size > 2*vd->incr && vm->disc->round < vd->incr) 73 { addr = (Vmuchar_t*)(*vm->disc->memoryf)(vm,seg->addr,seg->extent, 74 seg->extent+size,vm->disc); 81 { if(!(addr = (Vmuchar_t*)(*vm->disc->memoryf)(vm, NI 186 _vmtruncate(Vmalloc_t * vm,Seg_t * seg,size_t size,int exact) _vmtruncate() argument 257 _vmlock(Vmalloc_t * vm,int locking) _vmlock() argument [all...] |
| /titanic_51/usr/src/lib/libast/sparc/include/ast/ |
| H A D | vmalloc.h | 199 #define _VM_(vm) ((Vmalloc_t*)(vm)) argument 205 #define _VMFILE_(vm) (_VM_(vm)->file = (char*)__FILE__) argument 207 #define _VMFILE_(vm) (_VM_(vm)->file = 0) 211 #define _VMLINE_(vm) (_VM_(vm)->line = __LINE__) argument 213 #define _VMLINE_(vm) (_VM_(vm)->line = 0) 217 #define _VMFUNC_(vm) (_VM_(vm)->func = (Void_t*)__FUNCTION__) argument 219 #define _VMFUNC_(vm) (_VM_(vm)->func = 0) 222 #define _VMFL_(vm) (_VMFILE_(vm), _VMLINE_(vm), _VMFUNC_(vm)) argument 224 #define vmalloc(vm,sz) (_VMFL_(vm), \ argument 225 (*(_VM_(vm)->meth.allocf))((vm),(sz)) ) [all …]
|
| /titanic_51/usr/src/lib/libast/common/include/ |
| H A D | vmalloc.h | 199 #define _VM_(vm) ((Vmalloc_t*)(vm)) argument 205 #define _VMFILE_(vm) (_VM_(vm)->file = (char*)__FILE__) argument 207 #define _VMFILE_(vm) (_VM_(vm)->file = 0) 211 #define _VMLINE_(vm) (_VM_(vm)->line = __LINE__) argument 213 #define _VMLINE_(vm) (_VM_(vm)->line = 0) 217 #define _VMFUNC_(vm) (_VM_(vm)->func = (Void_t*)__FUNCTION__) argument 219 #define _VMFUNC_(vm) (_VM_(vm)->func = 0) 222 #define _VMFL_(vm) (_VMFILE_(vm), _VMLINE_(vm), _VMFUNC_(vm)) argument 224 #define vmalloc(vm,sz) (_VMFL_(vm), \ argument 225 (*(_VM_(vm)->meth.allocf))((vm),(sz)) ) [all …]
|
| /titanic_51/usr/src/lib/libast/i386/include/ast/ |
| H A D | vmalloc.h | 199 #define _VM_(vm) ((Vmalloc_t*)(vm)) argument 205 #define _VMFILE_(vm) (_VM_(vm)->file = (char*)__FILE__) argument 207 #define _VMFILE_(vm) (_VM_(vm)->file = 0) 211 #define _VMLINE_(vm) (_VM_(vm)->line = __LINE__) argument 213 #define _VMLINE_(vm) (_VM_(vm)->line = 0) 217 #define _VMFUNC_(vm) (_VM_(vm)->func = (Void_t*)__FUNCTION__) argument 219 #define _VMFUNC_(vm) (_VM_(vm)->func = 0) 222 #define _VMFL_(vm) (_VMFILE_(vm), _VMLINE_(vm), _VMFUNC_(vm)) argument 224 #define vmalloc(vm,sz) (_VMFL_(vm), \ argument 225 (*(_VM_(vm)->meth.allocf))((vm),(sz)) ) [all …]
|
| /titanic_51/usr/src/lib/libast/amd64/include/ast/ |
| H A D | vmalloc.h | 199 #define _VM_(vm) ((Vmalloc_t*)(vm)) argument 205 #define _VMFILE_(vm) (_VM_(vm)->file = (char*)__FILE__) argument 207 #define _VMFILE_(vm) (_VM_(vm)->file = 0) 211 #define _VMLINE_(vm) (_VM_(vm)->line = __LINE__) argument 213 #define _VMLINE_(vm) (_VM_(vm)->line = 0) 217 #define _VMFUNC_(vm) (_VM_(vm)->func = (Void_t*)__FUNCTION__) argument 219 #define _VMFUNC_(vm) (_VM_(vm)->func = 0) 222 #define _VMFL_(vm) (_VMFILE_(vm), _VMLINE_(vm), _VMFUNC_(vm)) argument 224 #define vmalloc(vm,sz) (_VMFL_(vm), \ argument 225 (*(_VM_(vm)->meth.allocf))((vm),(sz)) ) [all …]
|
| /titanic_51/usr/src/lib/libast/sparcv9/include/ast/ |
| H A D | vmalloc.h | 199 #define _VM_(vm) ((Vmalloc_t*)(vm)) argument 205 #define _VMFILE_(vm) (_VM_(vm)->file = (char*)__FILE__) argument 207 #define _VMFILE_(vm) (_VM_(vm)->file = 0) 211 #define _VMLINE_(vm) (_VM_(vm)->line = __LINE__) argument 213 #define _VMLINE_(vm) (_VM_(vm)->line = 0) 217 #define _VMFUNC_(vm) (_VM_(vm)->func = (Void_t*)__FUNCTION__) argument 219 #define _VMFUNC_(vm) (_VM_(vm)->func = 0) 222 #define _VMFL_(vm) (_VMFILE_(vm), _VMLINE_(vm), _VMFUNC_(vm)) argument 224 #define vmalloc(vm,sz) (_VMFL_(vm), \ argument 225 (*(_VM_(vm)->meth.allocf))((vm),(sz)) ) [all …]
|
| /titanic_51/usr/src/contrib/ast/src/lib/libast/include/ |
| H A D | vmalloc.h | 95 #define VM_MEMORYF 0000020 /* vm was allocated by memoryf */ 210 #define _VM_(vm) ((Vmalloc_t*)(vm)) argument 216 #define _VMFILE_(vm) (_VM_(vm)->file = (char*)__FILE__) argument 218 #define _VMFILE_(vm) (_VM_(vm)->file = (char*)0) 222 #define _VMLINE_(vm) (_VM_(vm)->line = __LINE__) argument 224 #define _VMLINE_(vm) (_VM 228 _VMFUNC_(vm) global() argument 233 _VMFL_(vm) global() argument 235 vmalloc(vm,sz) global() argument 237 vmresize(vm,d,sz,type) global() argument 240 vmfree(vm,d) global() argument 242 vmalign(vm,sz,align) global() argument 308 vmalloc(vm,sz) global() argument 312 vmresize(vm,d,sz,type) global() argument 317 vmfree(vm,d) global() argument 321 vmalign(vm,sz,align) global() argument 324 vmaddr(vm,addr) global() argument 325 vmsize(vm,addr) global() argument 326 vmcompact(vm) global() argument 332 vmdata(vm) global() argument 333 vmlocked(vm) global() argument [all...] |