📄 pico.h
字号:
any doCar(any);any doCase(any);any doCatch(any);any doCd(any);any doCdaar(any);any doCdadr(any);any doCdar(any);any doCddar(any);any doCddddr(any);any doCdddr(any);any doCddr(any);any doCdr(any);any doChain(any);any doChar(any);any doChop(any);any doCirc(any);any doClip(any);any doClose(any);any doCnt(any);any doCol(any);any doCommit(any);any doCon(any);any doConc(any);any doCond(any);any doConnect(any);any doCons(any);any doCopy(any);any doCtl(any);any doCtty(any);any doCut(any);any doDate(any);any doDbck(any);any doDe(any);any doDec(any);any doDef(any);any doDefault(any);any doDel(any);any doDelete(any);any doDelq(any);any doDiff(any);any doDir(any);any doDiv(any);any doDm(any);any doDo(any);any doE(any);any doEcho(any);any doEnv(any);any doEof(any);any doEol(any);any doEq(any);any doEqual(any);any doEqual0(any);any doEqualT(any);any doEval(any);any doExtern(any);any doExtQ(any);any doExtra(any);any doFifo(any);any doFill(any);any doFilter(any);any doFin(any);any doFinally(any);any doFind(any);any doFish(any);any doFlgQ(any);any doFlip(any);any doFlush(any);any doFold(any);any doFor(any);any doFork(any);any doFormat(any);any doFree(any);any doFrom(any);any doFull(any);any doFunQ(any);any doGc(any);any doGe(any);any doGe0(any);any doGet(any);any doGetl(any);any doGlue(any);any doGt(any);any doGt0(any);any doHead(any);any doHeap(any);any doHear(any);any doHide(any);any doHost(any);any doId(any);any doIdx(any);any doIf(any);any doIf2(any);any doIfn(any);any doIn(any);any doInc(any);any doIndex(any);any doInfo(any);any doIntern(any);any doIpid(any);any doIsa(any);any doJob(any);any doJournal(any);any doKey(any);any doKill(any);any doLast(any);any doLe(any);any doLength(any);any doLet(any);any doLetQ(any);any doLieu(any);any doLine(any);any doLines(any);any doLink(any);any doList(any);any doListen(any);any doLit(any);any doLstQ(any);any doLoad(any);any doLock(any);any doLookup(any);any doLoop(any);any doLowQ(any);any doLowc(any);any doLt(any);any doLt0(any);any doLup(any);any doMade(any);any doMake(any);any doMap(any);any doMapc(any);any doMapcan(any);any doMapcar(any);any doMapcon(any);any doMaplist(any);any doMaps(any);any doMark(any);any doMatch(any);any doMax(any);any doMaxi(any);any doMember(any);any doMemq(any);any doMeta(any);any doMeth(any);any doMethod(any);any doMin(any);any doMini(any);any doMix(any);any doMmeq(any);any doMul(any);any doMulDiv(any);any doNagle(any);any doName(any);any doNand(any);any doNEq(any);any doNEq0(any);any doNEqT(any);any doNEqual(any);any doNeed(any);any doNew(any);any doNext(any);any doNil(any);any doNond(any);any doNor(any);any doNot(any);any doNth(any);any doNumQ(any);any doOff(any);any doOffset(any);any doOn(any);any doOne(any);any doOnOff(any);any doOpen(any);any doOpid(any);any doOpt(any);any doOr(any);any doOut(any);any doPack(any);any doPair(any);any doPass(any);any doPath(any);any doPatQ(any);any doPeek(any);any doPick(any);any doPid(any);any doPipe(any);any doPoll(any);any doPool(any);any doPop(any);any doPort(any);any doPr(any);any doPreQ(any);any doPrin(any);any doPrinl(any);any doPrint(any);any doPrintln(any);any doPrintsp(any);any doProg(any);any doProg1(any);any doProg2(any);any doProp(any);any doPropCol(any);any doProtect(any);any doProve(any);any doPush(any);any doPush1(any);any doPut(any);any doPutl(any);any doPwd(any);any doQueue(any);any doQuit(any);any doQuote(any);any doRand(any);any doRank(any);any doRaw(any);any doRd(any);any doRead(any);any doRem(any);any doReplace(any);any doRest(any);any doReverse(any);any doRewind(any);any doRollback(any);any doRot(any);any doRpc(any);any doRun(any);any doSect(any);any doSeed(any);any doSeek(any);any doSend(any);any doSeq(any);any doSet(any);any doSetCol(any);any doSetq(any);any doShift(any);any doSize(any);any doSkip(any);any doSort(any);any doSpace(any);any doSplit(any);any doSpQ(any);any doSqrt(any);any doState(any);any doStem(any);any doStk(any);any doStr(any);any doStrip(any);any doStrQ(any);any doSub(any);any doSubQ(any);any doSum(any);any doSuper(any);any doSym(any);any doSymQ(any);any doSync(any);any doSys(any);any doT(any);any doTail(any);any doTell(any);any doText(any);any doThrow(any);any doTick(any);any doTill(any);any doTime(any);any doTouch(any);any doTrace(any);any doTrim(any);any doTry(any);any doType(any);any doUdp(any);any doUnify(any);any doUnless(any);any doUntil(any);any doUp(any);any doUppQ(any);any doUppc(any);any doUse(any);any doUsec(any);any doVal(any);any doWait(any);any doWhen(any);any doWhile(any);any doWipe(any);any doWith(any);any doWr(any);any doXchg(any);any doXor(any);any doYoke(any);any doZap(any);any doZero(any);static inline long unBox(any x) { long n = unDig(x) / 2; return unDig(x) & 1? -n : n;}static inline any boxCnt(long n) {return box(n>=0? n*2 : -n*2+1);}/* List element access */static inline any nCdr(int n, any x) { while (--n >= 0) x = cdr(x); return x;}static inline any nth(int n, any x) { if (--n < 0) return Nil; return nCdr(n,x);}static inline any getn(any x, any y) { if (isNum(x)) { long n = unDig(x) / 2; if (isNeg(x)) { while (--n) y = cdr(y); return cdr(y); } if (n == 0) return Nil; while (--n) y = cdr(y); return car(y); } do if (isCell(car(y)) && x == caar(y)) return cdar(y); while (isCell(y = cdr(y))); return Nil;}/* List length calculation */static inline int length(any x) { int n; for (n = 0; isCell(x); x = cdr(x)) ++n; return n;}/* Membership */static inline any member(any x, any y) { any z = y; while (isCell(y)) { if (equal(x, car(y))) return y; if (z == (y = cdr(y))) return NULL; } return isNil(y) || !equal(x,y)? NULL : y;}static inline any memq(any x, any y) { any z = y; while (isCell(y)) { if (x == car(y)) return y; if (z == (y = cdr(y))) return NULL; } return isNil(y) || x != y? NULL : y;}static inline int indx(any x, any y) { int n = 1; any z = y; while (isCell(y)) { if (equal(x, car(y))) return n; ++n; if (z == (y = cdr(y))) return 0; } return 0;}/* List interpreter */static inline any prog(any x) { any y; do y = EVAL(car(x)); while (isCell(x = cdr(x))); return y;}static inline any run(any x) { any y; cell at; Push(at,val(At)); do y = EVAL(car(x)); while (isCell(x = cdr(x))); val(At) = Pop(at); return y;}⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -