picolisp

Unnamed repository; edit this file to name it for gitweb.
git clone https://logand.com/git/picolisp.git/
Log | Files | Refs | README | LICENSE

commit d72293f7a47c406f0b5653fe608c724d4ba667e5
parent b95fdca390677624764042c84b458804729f8ccf
Author: Alexander Burger <abu@software-lab.de>
Date:   Sat, 14 Apr 2012 07:00:27 +0200

<forgot the tags)
Diffstat:
Mlib/map | 82++++++++++++++++++++++++++++++++++++++++----------------------------------------
Msrc64/tags | 110++++++++++++++++++++++++++++++++++++++++----------------------------------------
2 files changed, 96 insertions(+), 96 deletions(-)

diff --git a/lib/map b/lib/map @@ -8,15 +8,15 @@ $ (2950 . "@src64/flow.l") - (2209 . "@src64/big.l") -> (3916 . "@src64/subr.l") / (2513 . "@src64/big.l") -: (3048 . "@src64/sym.l") -:: (3072 . "@src64/sym.l") -; (2967 . "@src64/sym.l") +: (3051 . "@src64/sym.l") +:: (3075 . "@src64/sym.l") +; (2970 . "@src64/sym.l") < (2207 . "@src64/subr.l") <= (2237 . "@src64/subr.l") <> (2144 . "@src64/subr.l") = (2115 . "@src64/subr.l") =0 (2173 . "@src64/subr.l") -=: (2996 . "@src64/sym.l") +=: (2999 . "@src64/sym.l") == (2059 . "@src64/subr.l") ==== (1090 . "@src64/sym.l") =T (2181 . "@src64/subr.l") @@ -83,7 +83,7 @@ cddr (79 . "@src64/subr.l") cdr (17 . "@src64/subr.l") chain (1141 . "@src64/subr.l") char (3447 . "@src64/io.l") -chop (1216 . "@src64/sym.l") +chop (1219 . "@src64/sym.l") circ (816 . "@src64/subr.l") circ? (2402 . "@src64/subr.l") clip (1799 . "@src64/subr.l") @@ -100,14 +100,14 @@ cons (747 . "@src64/subr.l") copy (1225 . "@src64/subr.l") ctl (4254 . "@src64/io.l") ctty (2704 . "@src64/main.l") -cut (1919 . "@src64/sym.l") +cut (1922 . "@src64/sym.l") date (2418 . "@src64/main.l") dbck (2113 . "@src64/db.l") de (532 . "@src64/flow.l") dec (2323 . "@src64/big.l") def (448 . "@src64/flow.l") -default (1783 . "@src64/sym.l") -del (1974 . "@src64/sym.l") +default (1786 . "@src64/sym.l") +del (1977 . "@src64/sym.l") delete (1401 . "@src64/subr.l") delq (1452 . "@src64/subr.l") diff (2589 . "@src64/subr.l") @@ -127,7 +127,7 @@ ext? (1157 . "@src64/sym.l") extern (1023 . "@src64/sym.l") extra (1258 . "@src64/flow.l") extract (1218 . "@src64/apply.l") -fifo (2085 . "@src64/sym.l") +fifo (2088 . "@src64/sym.l") file (2784 . "@src64/main.l") fill (3243 . "@src64/subr.l") filter (1161 . "@src64/apply.l") @@ -138,7 +138,7 @@ fish (1613 . "@src64/apply.l") flg? (2445 . "@src64/subr.l") flip (1699 . "@src64/subr.l") flush (5121 . "@src64/io.l") -fold (3509 . "@src64/sym.l") +fold (3512 . "@src64/sym.l") for (2219 . "@src64/flow.l") fork (3253 . "@src64/flow.l") format (2089 . "@src64/big.l") @@ -148,10 +148,10 @@ full (1075 . "@src64/subr.l") fun? (750 . "@src64/sym.l") gc (435 . "@src64/gc.l") ge0 (2707 . "@src64/big.l") -get (2891 . "@src64/sym.l") +get (2894 . "@src64/sym.l") getd (758 . "@src64/sym.l") -getl (3192 . "@src64/sym.l") -glue (1357 . "@src64/sym.l") +getl (3195 . "@src64/sym.l") +glue (1360 . "@src64/sym.l") gt0 (2718 . "@src64/big.l") hash (2976 . "@src64/big.l") head (1820 . "@src64/subr.l") @@ -159,7 +159,7 @@ heap (517 . "@src64/main.l") hear (3228 . "@src64/io.l") host (190 . "@src64/net.l") id (1028 . "@src64/db.l") -idx (2159 . "@src64/sym.l") +idx (2162 . "@src64/sym.l") if (1794 . "@src64/flow.l") if2 (1813 . "@src64/flow.l") ifn (1854 . "@src64/flow.l") @@ -190,11 +190,11 @@ lit (150 . "@src64/flow.l") load (4171 . "@src64/io.l") lock (1185 . "@src64/db.l") loop (2162 . "@src64/flow.l") -low? (3375 . "@src64/sym.l") -lowc (3405 . "@src64/sym.l") +low? (3378 . "@src64/sym.l") +lowc (3408 . "@src64/sym.l") lst? (2415 . "@src64/subr.l") lt0 (2682 . "@src64/big.l") -lup (2348 . "@src64/sym.l") +lup (2351 . "@src64/sym.l") made (1107 . "@src64/subr.l") make (1088 . "@src64/subr.l") map (849 . "@src64/apply.l") @@ -210,7 +210,7 @@ max (2327 . "@src64/subr.l") maxi (1511 . "@src64/apply.l") member (2455 . "@src64/subr.l") memq (2477 . "@src64/subr.l") -meta (3295 . "@src64/sym.l") +meta (3298 . "@src64/sym.l") meth (1089 . "@src64/flow.l") method (1053 . "@src64/flow.l") min (2356 . "@src64/subr.l") @@ -232,17 +232,17 @@ nor (1669 . "@src64/flow.l") not (1721 . "@src64/flow.l") nth (685 . "@src64/subr.l") num? (2426 . "@src64/subr.l") -off (1720 . "@src64/sym.l") +off (1723 . "@src64/sym.l") offset (2677 . "@src64/subr.l") -on (1705 . "@src64/sym.l") -onOff (1735 . "@src64/sym.l") -one (1768 . "@src64/sym.l") +on (1708 . "@src64/sym.l") +onOff (1738 . "@src64/sym.l") +one (1771 . "@src64/sym.l") open (4338 . "@src64/io.l") opid (3214 . "@src64/flow.l") opt (3027 . "@src64/main.l") or (1629 . "@src64/flow.l") out (4214 . "@src64/io.l") -pack (1267 . "@src64/sym.l") +pack (1270 . "@src64/sym.l") pair (2394 . "@src64/subr.l") pass (754 . "@src64/apply.l") pat? (736 . "@src64/sym.l") @@ -252,10 +252,10 @@ pick (1369 . "@src64/apply.l") pipe (4275 . "@src64/io.l") poll (3320 . "@src64/io.l") pool (651 . "@src64/db.l") -pop (1895 . "@src64/sym.l") +pop (1898 . "@src64/sym.l") port (5 . "@src64/net.l") pr (5229 . "@src64/io.l") -pre? (1533 . "@src64/sym.l") +pre? (1536 . "@src64/sym.l") prin (5045 . "@src64/io.l") prinl (5059 . "@src64/io.l") print (5085 . "@src64/io.l") @@ -265,15 +265,15 @@ prior (2713 . "@src64/subr.l") prog (1749 . "@src64/flow.l") prog1 (1757 . "@src64/flow.l") prog2 (1774 . "@src64/flow.l") -prop (2922 . "@src64/sym.l") +prop (2925 . "@src64/sym.l") protect (507 . "@src64/main.l") prove (3530 . "@src64/subr.l") -push (1810 . "@src64/sym.l") -push1 (1846 . "@src64/sym.l") -put (2832 . "@src64/sym.l") -putl (3110 . "@src64/sym.l") +push (1813 . "@src64/sym.l") +push1 (1849 . "@src64/sym.l") +put (2835 . "@src64/sym.l") +putl (3113 . "@src64/sym.l") pwd (2668 . "@src64/main.l") -queue (2042 . "@src64/sym.l") +queue (2045 . "@src64/sym.l") quit (1083 . "@src64/main.l") quote (134 . "@src64/flow.l") rand (3003 . "@src64/big.l") @@ -294,8 +294,8 @@ seed (2961 . "@src64/big.l") seek (1275 . "@src64/apply.l") send (1127 . "@src64/flow.l") seq (1084 . "@src64/db.l") -set (1604 . "@src64/sym.l") -setq (1637 . "@src64/sym.l") +set (1607 . "@src64/sym.l") +setq (1640 . "@src64/sym.l") sigio (487 . "@src64/main.l") size (2809 . "@src64/subr.l") skip (3501 . "@src64/io.l") @@ -309,7 +309,7 @@ stem (1989 . "@src64/subr.l") str (4019 . "@src64/io.l") str? (1136 . "@src64/sym.l") strip (1576 . "@src64/subr.l") -sub? (1566 . "@src64/sym.l") +sub? (1569 . "@src64/sym.l") sum (1460 . "@src64/apply.l") super (1214 . "@src64/flow.l") sym (4005 . "@src64/io.l") @@ -320,7 +320,7 @@ sys (3050 . "@src64/flow.l") t (1740 . "@src64/flow.l") tail (1911 . "@src64/subr.l") tell (3260 . "@src64/io.l") -text (1395 . "@src64/sym.l") +text (1398 . "@src64/sym.l") throw (2482 . "@src64/flow.l") tick (3166 . "@src64/flow.l") till (3610 . "@src64/io.l") @@ -334,23 +334,23 @@ unify (3938 . "@src64/subr.l") unless (1890 . "@src64/flow.l") until (2074 . "@src64/flow.l") up (691 . "@src64/main.l") -upp? (3390 . "@src64/sym.l") -uppc (3457 . "@src64/sym.l") +upp? (3393 . "@src64/sym.l") +uppc (3460 . "@src64/sym.l") use (1562 . "@src64/flow.l") usec (2656 . "@src64/main.l") -val (1585 . "@src64/sym.l") +val (1588 . "@src64/sym.l") version (3041 . "@src64/main.l") wait (3150 . "@src64/io.l") when (1873 . "@src64/flow.l") while (2050 . "@src64/flow.l") -wipe (3250 . "@src64/sym.l") +wipe (3253 . "@src64/sym.l") with (1321 . "@src64/flow.l") wr (5246 . "@src64/io.l") -xchg (1660 . "@src64/sym.l") +xchg (1663 . "@src64/sym.l") xor (1690 . "@src64/flow.l") x| (2887 . "@src64/big.l") yield (2706 . "@src64/flow.l") yoke (1196 . "@src64/subr.l") zap (1186 . "@src64/sym.l") -zero (1753 . "@src64/sym.l") +zero (1756 . "@src64/sym.l") | (2847 . "@src64/big.l") diff --git a/src64/tags b/src64/tags @@ -444,7 +444,7 @@ bufStringE_SZ io.l 1142 byeE flow.l 3439 byteNumBCX_CX io.l 463 byteSymBCX_CX io.l 1291 -caseDataA_AC sym.l 3363 +caseDataA_AC sym.l 3366 caught flow.l 2472 cbl main.l 1845 cbl1 main.l 1878 @@ -620,7 +620,7 @@ doCddr subr.l 79 doCdr subr.l 17 doChain subr.l 1141 doChar io.l 3447 -doChop sym.l 1216 +doChop sym.l 1219 doCirc subr.l 816 doCircQ subr.l 2402 doClip subr.l 1799 @@ -628,7 +628,7 @@ doClose io.l 4381 doCmd main.l 2906 doCnt apply.l 1413 doCo flow.l 2537 -doCol sym.l 3048 +doCol sym.l 3051 doCommit db.l 1498 doCon subr.l 725 doConc subr.l 781 @@ -638,14 +638,14 @@ doCons subr.l 747 doCopy subr.l 1225 doCtl io.l 4254 doCtty main.l 2704 -doCut sym.l 1919 +doCut sym.l 1922 doDate main.l 2418 doDbck db.l 2113 doDe flow.l 532 doDec big.l 2323 doDef flow.l 448 -doDefault sym.l 1783 -doDel sym.l 1974 +doDefault sym.l 1786 +doDel sym.l 1977 doDelete subr.l 1401 doDelq subr.l 1452 doDiff subr.l 2589 @@ -670,7 +670,7 @@ doExtQ sym.l 1157 doExtern sym.l 1023 doExtra flow.l 1258 doExtract apply.l 1218 -doFifo sym.l 2085 +doFifo sym.l 2088 doFile main.l 2784 doFill subr.l 3243 doFilter apply.l 1161 @@ -681,7 +681,7 @@ doFish apply.l 1613 doFlgQ subr.l 2445 doFlip subr.l 1699 doFlush io.l 5121 -doFold sym.l 3509 +doFold sym.l 3512 doFor flow.l 2219 doFork flow.l 3253 doFormat big.l 2089 @@ -692,10 +692,10 @@ doFunQ sym.l 750 doGc gc.l 435 doGe subr.l 2297 doGe0 big.l 2707 -doGet sym.l 2891 +doGet sym.l 2894 doGetd sym.l 758 -doGetl sym.l 3192 -doGlue sym.l 1357 +doGetl sym.l 3195 +doGlue sym.l 1360 doGt subr.l 2267 doGt0 big.l 2718 doHash big.l 2976 @@ -705,7 +705,7 @@ doHear io.l 3228 doHide sym.l 1090 doHost net.l 190 doId db.l 1028 -doIdx sym.l 2159 +doIdx sym.l 2162 doIf flow.l 1794 doIf2 flow.l 1813 doIfn flow.l 1854 @@ -737,12 +737,12 @@ doLit flow.l 150 doLoad io.l 4171 doLock db.l 1185 doLoop flow.l 2162 -doLowQ sym.l 3375 -doLowc sym.l 3405 +doLowQ sym.l 3378 +doLowc sym.l 3408 doLstQ subr.l 2415 doLt subr.l 2207 doLt0 big.l 2682 -doLup sym.l 2348 +doLup sym.l 2351 doMade subr.l 1107 doMake subr.l 1088 doMap apply.l 849 @@ -758,7 +758,7 @@ doMax subr.l 2327 doMaxi apply.l 1511 doMember subr.l 2455 doMemq subr.l 2477 -doMeta sym.l 3295 +doMeta sym.l 3298 doMeth flow.l 1089 doMethod flow.l 1053 doMin subr.l 2356 @@ -783,17 +783,17 @@ doNor flow.l 1669 doNot flow.l 1721 doNth subr.l 685 doNumQ subr.l 2426 -doOff sym.l 1720 +doOff sym.l 1723 doOffset subr.l 2677 -doOn sym.l 1705 -doOnOff sym.l 1735 -doOne sym.l 1768 +doOn sym.l 1708 +doOnOff sym.l 1738 +doOne sym.l 1771 doOpen io.l 4338 doOpid flow.l 3214 doOpt main.l 3027 doOr flow.l 1629 doOut io.l 4214 -doPack sym.l 1267 +doPack sym.l 1270 doPair subr.l 2394 doPass apply.l 754 doPatQ sym.l 736 @@ -803,10 +803,10 @@ doPick apply.l 1369 doPipe io.l 4275 doPoll io.l 3320 doPool db.l 651 -doPop sym.l 1895 +doPop sym.l 1898 doPort net.l 5 doPr io.l 5229 -doPreQ sym.l 1533 +doPreQ sym.l 1536 doPrin io.l 5045 doPrinl io.l 5059 doPrint io.l 5085 @@ -816,16 +816,16 @@ doPrior subr.l 2713 doProg flow.l 1749 doProg1 flow.l 1757 doProg2 flow.l 1774 -doProp sym.l 2922 -doPropCol sym.l 3072 +doProp sym.l 2925 +doPropCol sym.l 3075 doProtect main.l 507 doProve subr.l 3530 -doPush sym.l 1810 -doPush1 sym.l 1846 -doPut sym.l 2832 -doPutl sym.l 3110 +doPush sym.l 1813 +doPush1 sym.l 1849 +doPut sym.l 2835 +doPutl sym.l 3113 doPwd main.l 2668 -doQueue sym.l 2042 +doQueue sym.l 2045 doQuit main.l 1083 doQuote flow.l 134 doRand big.l 3003 @@ -845,12 +845,12 @@ doRun flow.l 306 doSect subr.l 2541 doSeed big.l 2961 doSeek apply.l 1275 -doSemicol sym.l 2967 +doSemicol sym.l 2970 doSend flow.l 1127 doSeq db.l 1084 -doSet sym.l 1604 -doSetCol sym.l 2996 -doSetq sym.l 1637 +doSet sym.l 1607 +doSetCol sym.l 2999 +doSetq sym.l 1640 doShift big.l 2627 doSigio main.l 487 doSize subr.l 2809 @@ -866,7 +866,7 @@ doStr io.l 4019 doStrQ sym.l 1136 doStrip subr.l 1576 doSub big.l 2209 -doSubQ sym.l 1566 +doSubQ sym.l 1569 doSum apply.l 1460 doSuper flow.l 1214 doSym io.l 4005 @@ -877,7 +877,7 @@ doSys flow.l 3050 doT flow.l 1740 doTail subr.l 1911 doTell io.l 3260 -doText sym.l 1395 +doText sym.l 1398 doThrow flow.l 2482 doTick flow.l 3166 doTill io.l 3610 @@ -892,24 +892,24 @@ doUnify subr.l 3938 doUnless flow.l 1890 doUntil flow.l 2074 doUp main.l 691 -doUppQ sym.l 3390 -doUppc sym.l 3457 +doUppQ sym.l 3393 +doUppc sym.l 3460 doUse flow.l 1562 doUsec main.l 2656 -doVal sym.l 1585 +doVal sym.l 1588 doVersion main.l 3041 doWait io.l 3150 doWhen flow.l 1873 doWhile flow.l 2050 -doWipe sym.l 3250 +doWipe sym.l 3253 doWith flow.l 1321 doWr io.l 5246 -doXchg sym.l 1660 +doXchg sym.l 1663 doXor flow.l 1690 doYield flow.l 2706 doYoke subr.l 1196 doZap sym.l 1186 -doZero sym.l 1753 +doZero sym.l 1756 endString_E main.l 2253 eofErr err.l 534 eolA_F io.l 3684 @@ -961,19 +961,19 @@ getAdrZ_A db.l 6 getBinaryZ_FB io.l 447 getBlockZ_FB db.l 596 getChar_A io.l 1975 -getEC_E sym.l 2672 +getEC_E sym.l 2675 getParse_A io.l 1795 getStdin_A io.l 1724 getUdpZ_FB net.l 370 -getnECX_E sym.l 2631 +getnECX_E sym.l 2634 giveupX main.l 180 halfA_A big.l 87 heapAlloc main.l 217 iSignalCE main.l 192 idErrXL err.l 623 -idxDelXY_E sym.l 2289 -idxGetXY_E sym.l 2202 -idxPutXY_E sym.l 2219 +idxDelXY_E sym.l 2292 +idxGetXY_E sym.l 2205 +idxPutXY_E sym.l 2222 ignLog db.l 924 inReadyC_F io.l 2694 incE_A big.l 1491 @@ -991,7 +991,7 @@ ipSocketErrX err.l 652 ipV6onlyErrX err.l 662 isBlankE_F sym.l 704 isInternEXY_F sym.l 37 -isLetterOrDigitA_F sym.l 3581 +isLetterOrDigitA_F sym.l 3584 isLifeE_F db.l 525 isaCE_F flow.l 1012 jnlErrX err.l 618 @@ -1016,7 +1016,7 @@ makeErrX err.l 471 markE gc.l 5 matchCE_F subr.l 3147 memberXY_FY main.l 1065 -metaCX_E sym.l 3337 +metaCX_E sym.l 3340 methodEY_FCYZ flow.l 791 mkCharA_A sym.l 573 mkStrEZ_A sym.l 650 @@ -1054,7 +1054,7 @@ outStringC io.l 4731 outStringS io.l 4729 outWordA io.l 4684 packAoACX_CX db.l 108 -packECX_CX sym.l 1300 +packECX_CX sym.l 1303 packExtNmX_E db.l 87 packOctACX_CX db.l 120 parseBCE_E io.l 3893 @@ -1071,18 +1071,18 @@ prE io.l 728 prExtNmX io.l 4696 prNameX io.l 4749 prTellEZ io.l 722 -preCEXY_F sym.l 1467 +preCEXY_F sym.l 1470 prinE io.l 4990 prinE_E io.l 4981 printE io.l 4768 printE_E io.l 4759 -propEC_E sym.l 2742 +propEC_E sym.l 2745 protErrEX err.l 386 pushCtlFilesY io.l 1858 pushErrFilesY io.l 1853 pushInFilesY io.l 1818 pushOutFilesY io.l 1842 -putACE sym.l 2488 +putACE sym.l 2491 putBlockBZ db.l 612 putSrcEC_E flow.l 25 putStdoutB io.l 4625 @@ -1155,7 +1155,7 @@ stkErrE err.l 397 stkErrEX err.l 401 stkErrX err.l 399 subAE_A big.l 1542 -subStrAE_F sym.l 1482 +subStrAE_F sym.l 1485 subuAE_A big.l 682 suparErrE err.l 540 symByteCX_FACX io.l 1088 @@ -1201,7 +1201,7 @@ waitFdCEX_A io.l 2764 waitPidErrX err.l 520 wifsignaledS_F sys/x86-64.linux.code.l 27 wifstoppedS_F sys/x86-64.linux.code.l 22 -wipeE sym.l 3272 +wipeE sym.l 3275 wrBlockZ db.l 398 wrBytesCEX_F io.l 316 wrBytesErr err.l 563