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 8163fa995759e1d1eeafdaed9240e3fb661392fb
parent 53148f0c2f8619bea016b22c2c8d203c2ba96fd0
Author: Alexander Burger <abu@software-lab.de>
Date:   Thu, 23 May 2013 14:18:50 +0200

Move 'Catch' global into coroutine environment
Diffstat:
Msrc64/glob.l | 6+++---
Msrc64/tags | 222++++++++++++++++++++++++++++++++++++++++----------------------------------------
2 files changed, 114 insertions(+), 114 deletions(-)

diff --git a/src64/glob.l b/src64/glob.l @@ -1,4 +1,4 @@ -# 19may13abu +# 23may13abu # (c) Software Lab. Alexander Burger (data 'Data) @@ -17,8 +17,6 @@ : Stacks word 0 # Stack segment bitmask : StkSize word STACK # Coroutine stack segment size : StkLimit word 0 # Stack limit: StackN-Size+4096 -: Link word 0 # Saved link register -: Catch word 0 # Catch frames : Termio word 0 # Raw mode terminal I/O : Tv word 0 # 'timeval' structure word 0 @@ -594,6 +592,8 @@ :: Get_A word 0 # Character input function :: InFile word 0 # Input file :: OutFile word 0 # Output file +: Link word 0 # Saved link register +: Catch word 0 # Catch frames : Env # <Catch III> environment : EnvBind word 0 # <III> Bind frames (first item in Env) : EnvInFrames word 0 # Input frames diff --git a/src64/tags b/src64/tags @@ -162,7 +162,7 @@ sys/x86-64.linux.defs.l,1959 AI_ADDR147,2488 AI_NEXT148,2505 -./glob.l,4326 +./glob.l,4330 Data4,51 AV7,77 AV08,141 @@ -175,116 +175,116 @@ sys/x86-64.linux.defs.l,1959 Stacks17,525 StkSize18,582 StkLimit19,646 -Link20,711 -Catch21,766 -Termio22,814 -Tv23,871 -Time25,949 -USec26,1010 -TtyPid27,1066 -InFDs28,1121 -InFiles29,1185 -OutFDs30,1232 -OutFiles31,1297 -PutBinBZ32,1345 -GetBinZ_FB33,1403 -Seed34,1460 -TickU36,1563 -TickS37,1617 -Slot38,1673 -Spkr39,1720 -Mic40,1771 -SpMiPipe41,1821 -Hear42,1880 -Tell43,1928 -TellBuf44,1979 -Talking45,2025 -Children46,2073 -Child47,2134 -ExtN48,2181 -Extn49,2239 -StrX50,2262 -StrC51,2311 -LineC52,2334 -Break53,2358 -GcCount54,2404 -Sep055,2455 -Sep356,2508 -BufEnd57,2562 -Penv59,2624 -Pnl60,2677 -Signal63,2713 -DBs66,2760 -DbFile67,2821 -DbFiles68,2864 -DbBlock69,2908 -MaxBlkSize70,2956 -BlkIndex71,3010 -BlkLink72,3057 -DbJnl73,3103 -DbLog74,3151 -GcMark77,3227 -Transient78,3236 -Alarm80,3349 -Sigio81,3398 -LineX82,3447 -Lisp83,3495 -LispEnd131,5020 -GcMarkEnd132,5030 -SymTab136,5059 -Nil137,5076 -Pico140,5233 -pico145,5375 -CPU146,5413 -OS147,5452 -DB148,5490 -Meth149,5527 -Quote150,5567 -TSym151,5608 -ISym154,5667 -NSym155,5704 -SSym156,5741 -CSym157,5778 -BSym158,5815 -Solo159,5852 -PPid160,5890 -Pid161,5927 -At162,5962 -At2163,5999 -At3164,6036 -This165,6073 -Prompt166,6110 -Dbg167,6147 -Zap168,6184 -Ext169,6221 -Scl170,6258 -Class171,6296 -Run172,6333 -Hup173,6370 -Sig1174,6407 -Sig2175,6444 -Up176,6481 -Err177,6518 -Msg178,6555 -Uni179,6592 -Led180,6629 -Tsm181,6666 -Adr182,6703 -Fork183,6740 -Bye184,6777 -SymTabEnd563,21339 -TgCPU566,21372 -TgOS567,21414 -Db1571,21505 -Extern573,21532 -GcSymEnd577,21603 -Version580,21632 -EnvCo591,21839 -Chr592,21872 -PutB593,21926 -Get_A594,21987 -InFile595,22047 -OutFile596,22093 +Termio20,711 +Tv21,768 +Time23,846 +USec24,907 +TtyPid25,963 +InFDs26,1018 +InFiles27,1082 +OutFDs28,1129 +OutFiles29,1194 +PutBinBZ30,1242 +GetBinZ_FB31,1300 +Seed32,1357 +TickU34,1460 +TickS35,1514 +Slot36,1570 +Spkr37,1617 +Mic38,1668 +SpMiPipe39,1718 +Hear40,1777 +Tell41,1825 +TellBuf42,1876 +Talking43,1922 +Children44,1970 +Child45,2031 +ExtN46,2078 +Extn47,2136 +StrX48,2159 +StrC49,2208 +LineC50,2231 +Break51,2255 +GcCount52,2301 +Sep053,2352 +Sep354,2405 +BufEnd55,2459 +Penv57,2521 +Pnl58,2574 +Signal61,2610 +DBs64,2657 +DbFile65,2718 +DbFiles66,2761 +DbBlock67,2805 +MaxBlkSize68,2853 +BlkIndex69,2907 +BlkLink70,2954 +DbJnl71,3000 +DbLog72,3048 +GcMark75,3124 +Transient76,3133 +Alarm78,3246 +Sigio79,3295 +LineX80,3344 +Lisp81,3392 +LispEnd129,4917 +GcMarkEnd130,4927 +SymTab134,4956 +Nil135,4973 +Pico138,5130 +pico143,5272 +CPU144,5310 +OS145,5349 +DB146,5387 +Meth147,5424 +Quote148,5464 +TSym149,5505 +ISym152,5564 +NSym153,5601 +SSym154,5638 +CSym155,5675 +BSym156,5712 +Solo157,5749 +PPid158,5787 +Pid159,5824 +At160,5859 +At2161,5896 +At3162,5933 +This163,5970 +Prompt164,6007 +Dbg165,6044 +Zap166,6081 +Ext167,6118 +Scl168,6155 +Class169,6193 +Run170,6230 +Hup171,6267 +Sig1172,6304 +Sig2173,6341 +Up174,6378 +Err175,6415 +Msg176,6452 +Uni177,6489 +Led178,6526 +Tsm179,6563 +Adr180,6600 +Fork181,6637 +Bye182,6674 +SymTabEnd561,21236 +TgCPU564,21269 +TgOS565,21311 +Db1569,21402 +Extern571,21429 +GcSymEnd575,21500 +Version578,21529 +EnvCo589,21736 +Chr590,21769 +PutB591,21823 +Get_A592,21884 +InFile593,21944 +OutFile594,21990 +Link595,22037 +Catch596,22092 Env597,22140 EnvBind598,22173 EnvInFrames599,22246