wisp-cvs Mailing List for Wisp interpreter (Page 19)
Status: Alpha
Brought to you by:
digg
Menu
▾
▴
wisp-cvs — Automatic announcements of commits to the CVS repository
You can subscribe to this list here.
| 2002 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
(30) |
Sep
(312) |
Oct
|
Nov
|
Dec
|
|---|---|---|---|---|---|---|---|---|---|---|---|---|
| 2003 |
Jan
(5) |
Feb
(131) |
Mar
(17) |
Apr
(184) |
May
(252) |
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
| 2004 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
(2) |
Nov
|
Dec
|
|
From: <di...@us...> - 2003-03-09 07:10:32
|
Update of /cvsroot/wisp/wisp/users/dig
In directory sc8-pr-cvs1:/tmp/cvs-serv16439
Modified Files:
linkie.py
Log Message:
made Linkie.dump ignore symbols starting by a '#'
Index: linkie.py
===================================================================
RCS file: /cvsroot/wisp/wisp/users/dig/linkie.py,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -d -r1.12 -r1.13
--- linkie.py 9 Mar 2003 06:19:33 -0000 1.12
+++ linkie.py 9 Mar 2003 07:10:28 -0000 1.13
@@ -249,7 +249,7 @@
rsymbols = {}; othersymbols = []
rnotes = {}; othernotes = []
for sym, val in this._symbols:
- if 0 <= val < this.memsz():
+ if sym[0] != '#' and 0 <= val < this.memsz():
if rsymbols.has_key(val): rsymbols[val].append(sym)
else: rsymbols[val] = [sym]
else: othersymbols.append((sym, val))
|
|
From: <di...@us...> - 2003-03-09 06:19:36
|
Update of /cvsroot/wisp/wisp/users/dig
In directory sc8-pr-cvs1:/tmp/cvs-serv4513
Modified Files:
linkie.py
Log Message:
wrote Linkie.get_symbol_dict
Index: linkie.py
===================================================================
RCS file: /cvsroot/wisp/wisp/users/dig/linkie.py,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -d -r1.11 -r1.12
--- linkie.py 16 Feb 2003 10:48:17 -0000 1.11
+++ linkie.py 9 Mar 2003 06:19:33 -0000 1.12
@@ -183,6 +183,16 @@
place_symbol."""
if this._unresolved_locals: raise 'Incomplete linkie', this
return this._symbols[:]
+ def get_symbol_dict (this):
+ """get_symbols() -> dictionary of string -> int
+ Returns a dictionary of symbols placed in the linkie by
+ place_symbol. Checks uniqueness of such symbols."""
+ if this._unresolved_locals: raise 'Incomplete linkie', this
+ d = {}
+ for name, value in this._symbols:
+ if d.has_key(name): raise 'Symbol not unique', name
+ else: d[name] = value
+ return d
def get_notes (this):
"""get_notes() -> list of (offset, type, argument) tuples
Returns a list of the linker notes from the linkie."""
|
|
From: <di...@us...> - 2003-03-01 08:32:40
|
Update of /cvsroot/wisp/wisp/doc In directory sc8-pr-cvs1:/tmp/cvs-serv7659/doc Modified Files: wisp.vim Log Message: wrote |unknown?| Index: wisp.vim =================================================================== RCS file: /cvsroot/wisp/wisp/doc/wisp.vim,v retrieving revision 1.232 retrieving revision 1.233 diff -u -d -r1.232 -r1.233 --- wisp.vim 28 Feb 2003 22:39:17 -0000 1.232 +++ wisp.vim 1 Mar 2003 08:31:37 -0000 1.233 @@ -218,9 +218,10 @@ syn keyword wispFunc tcgetattr-raw tcsetattr-raw tenth third toposplit syn keyword wispFunc transcript-off transcript-on translate tree-copy syn keyword wispFunc truncate tty? type-of u8vector? ubyte? unix-time -syn keyword wispFunc unpack-be-integer unpack-le-integer unsure-collect -syn keyword wispFunc utf-8->c16string utf-8-first-byte->length uwyde? -syn keyword wispFunc vector vector->list vector-append vector-copy +syn keyword wispFunc unknown? unpack-be-integer unpack-le-integer +syn keyword wispFunc unsure-collect utf-8->c16string +syn keyword wispFunc utf-8-first-byte->length uwyde? vector +syn keyword wispFunc vector->list vector-append vector-copy syn keyword wispFunc vector-fill! vector-move! vector? void? syn keyword wispFunc wisp-string-hash with-errors-to with-input-from syn keyword wispFunc with-input-from-file with-output-to |
|
From: <di...@us...> - 2003-03-01 08:32:19
|
Update of /cvsroot/wisp/wisp/src
In directory sc8-pr-cvs1:/tmp/cvs-serv7659/src
Modified Files:
essence.c wordlist.txt
Log Message:
wrote |unknown?|
Index: essence.c
===================================================================
RCS file: /cvsroot/wisp/wisp/src/essence.c,v
retrieving revision 1.231
retrieving revision 1.232
diff -u -d -r1.231 -r1.232
--- essence.c 28 Feb 2003 22:39:19 -0000 1.231
+++ essence.c 1 Mar 2003 08:31:37 -0000 1.232
@@ -559,549 +559,550 @@
void*Y115[]={binc,&branch_EVM_invargc,mca,subc,V 1,binzc,&branch_EVM_invargca,dig,V 0,q,mha,l0,q,qi,W(real_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,ds,V 1,r};
void*Y116[]={binc,&branch_EVM_invargc,mca,subc,V 1,binzc,&branch_EVM_invargca,dig,V 0,q,mha,l,V 1,l,V 90,tc,V 1,c,jinf,V 11,dig,V 0,q,mha,l,V 1,l,V 108,tc,V 1,c,ds,V 1,r};
void*Y117[]={binc,&branch_EVM_invargc,mca,subc,V 1,binzc,&branch_EVM_invargca,dig,V 0,q,mha,l0,q,qi,W(number_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jinf,V 74,dig,V 0,q,mha,l,V 1,l,V 121,tc,V 1,c,jinf,V 61,dig,V 0,q,mha,l,V 1,l,V 77,tc,V 1,c,jinf,V 48,dig,V 0,q,mha,l0,q,qi,W(boolean_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jinf,V 30,dig,V 0,xri,Q,jinz,V 4,t,T,j,V 2,t,F,jinf,V 16,dig,V 0,q,mha,l0,q,qi,W(void_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,ds,V 1,r};
-void*Y118[]={binc,&branch_EVM_invargc,hop,V 6,mca,subc,V 2,binc,&branch_EVM_invargca,mlt,qi,Q,inc,dcc,jizc,V 15,t,rvec,sc,V 12,t,&NN_cons,tc,V 2,c,q,li,rvec+12,mac,j,V -18,p,mlt,s,V 2,p,s,V 1,p,s,V 0,mla,l,V 2,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 3,mla,l,V 3,xri,I(2),jinz,V 209,mla,l,V 2,q,li,rvec+10,tc,V 1,c,ct,q,l0,mlt,s,V 4,p,l,V 1,q,li,rvec+10,tc,V 1,c,ct,l0,mlt,s,V 5,mla,l,V 4,xri,W(DOTDOTDOT),jinz,V 15,mla,l,V 5,xri,W(DOTDOTDOT),jiz,V 4,t,T,j,V 2,t,F,j,V 2,t,F,jif,V 50,qi,W(slice),mla,l,V 1,q,qi,F,mla,l,V 5,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r,mla,l,V 4,xri,W(DOTDOTDOT),jiz,V 15,mla,l,V 5,xri,W(DOTDOTDOT),jinz,V 4,t,T,j,V 2,t,F,j,V 2,t,F,jif,V 50,qi,W(slice),mla,l,V 1,q,mla,l,V 4,q,qi,F,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r,qi,W(ref),mla,l,V 1,q,mla,l,V 2,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r,mla,l,V 3,xri,I(3),jinz,V 123,mla,l,V 2,q,mha,l0,q,qi,W(second),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,W(DOTDOTDOT),jinz,V 74,qi,W(slice),mla,l,V 1,q,mla,l,V 2,q,li,rvec+10,tc,V 1,c,ct,l0,q,mla,l,V 2,q,mha,l0,q,qi,W(third),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r,qi,W(ref),mla,l,V 1,q,mla,l,V 2,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r,qi,W(ref),mla,l,V 1,q,mla,l,V 2,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r};
-void*Y119[]={binc,&branch_EVM_invargc,hop,V 3,mca,subc,V 1,binc,&branch_EVM_invargca,mlt,qi,Q,inc,dcc,jizc,V 15,t,rvec,sc,V 12,t,&NN_cons,tc,V 2,c,q,li,rvec+12,mac,j,V -18,p,mlt,s,V 1,p,s,V 0,mla,l,V 0,mlt,s,V 2,mla,l,V 2,q,mha,l,V 1,l,V 120,tc,V 1,c,jif,V 28,mha,l0,q,qi,W(substring),t,&NN_dict_ref_2,tc,V 2,c,q,mla,l,V 0,q,mla,l,V 1,q,mha,l,V 1,l,V 11,tc,V 3,c,r,qi,W(compound_huh),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r};
-void*Y120[]={binc,&branch_EVM_invargc,mca,subc,V 1,binzc,&branch_EVM_invargca,qi,W(eqv_huh),qi,W(sig),qi,W(quote),dig,V 3,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,ds,V 1,r};
-void*Y121[]={binc,&branch_EVM_invargc,hop,V 12,mca,subc,V 2,binc,&branch_EVM_invargca,mlt,qi,Q,inc,dcc,jizc,V 15,t,rvec,sc,V 12,t,&NN_cons,tc,V 2,c,q,li,rvec+12,mac,j,V -18,p,mlt,s,V 2,p,s,V 1,p,s,V 0,mla,l,V 1,mlt,s,V 3,mla,l,V 2,mlt,s,V 4,mla,l,V 4,xri,Q,jiz,V 775,mla,l,V 4,q,li,rvec+10,tc,V 1,c,ct,l0,mlt,s,V 5,t,T,mlt,s,V 6,mla,l,V 5,q,mha,l,V 1,l,V 79,tc,V 1,c,jinf,V 16,qi,W(invalid_try_clause),mla,l,V 5,q,mha,l,V 1,l,V 110,tc,V 2,c,j,V 0,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,q,l0,mlt,s,V 7,p,l,V 1,mlt,s,V 8,mla,l,V 7,mlt,s,V 9,mla,l,V 9,xri,W(finally),jinz,V 340,qi,W(my),qi,W(cleanup),qi,W(lambda),qi,Q,mla,l,V 8,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,qi,W(catch),qi,T,qi,W(lambda),qi,W(sig),qi,W(dat),qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,qi,W(cleanup),qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,qi,W(raise),qi,W(sig),qi,W(dat),qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,qi,W(lambda),qi,Q,qi,W(hold),qi,W(hide),qi,W(cleanup),mla,l,V 3,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,qi,W(cleanup),qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,mlt,s,V 3,j,V 335,mla,l,V 9,xri,W(except),jinz,V 314,mla,l,V 8,q,li,rvec+10,tc,V 1,c,ct,q,l0,mlt,s,V 10,p,l,V 1,mlt,s,V 11,qi,W(catch),qi,T,qi,W(lambda),qi,W(sig),qi,W(dat),qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mla,l,V 10,xri,Q,jinz,V 16,qi,W(begin),mla,l,V 11,q,mha,l,V 1,l,V 78,tc,V 2,c,j,V 131,qi,W(if),qi,W(or),t,B 120,q,qi,V 2,qh,ql,li,rvec+19,tc,V 4,c,q,mla,l,V 10,q,mha,l0,q,qi,W(map),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,qi,W(begin),mla,l,V 11,q,mha,l,V 1,l,V 78,tc,V 2,c,q,qi,W(raise),qi,W(sig),qi,W(dat),qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,qi,W(lambda),qi,Q,mla,l,V 3,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,mlt,s,V 3,j,V 14,qi,W(invalid_try_clause),mla,l,V 5,q,mha,l,V 1,l,V 110,tc,V 2,c,mla,l,V 4,q,li,rvec+10,tc,V 1,c,ct,l,V 1,mlt,s,V 4,j,V -782,mla,l,V 3,r};
-void*Y122[]={binc,&branch_EVM_invargc,mca,subc,V 2,binzc,&branch_EVM_invargca,dig,V 1,q,mha,l,V 1,l,V 79,tc,V 1,c,jif,V 65,dig,V 1,q,li,rvec+10,tc,V 1,c,ct,l0,q,dig,V 1,q,li,rvec+10,tc,V 1,c,ct,l0,q,mha,l,V 2,l,V 3,tc,V 2,c,dig,V 1,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,dig,V 1,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mha,l,V 2,l,V 3,tc,V 2,c,ds,V 2,r,dig,V 1,xri,Q,jinz,V 5,t,Z,ds,V 2,r,mha,l,V 2,l,V 0,q,dig,V 2,q,dig,V 2,q,mha,l0,q,qi,W(dict_ref),t,&NN_dict_ref_2,tc,V 2,c,tc,V -3,c,t,Z,ds,V 2,r};
-void*Y123[]={binc,&branch_EVM_invargc,hop,V 4,mca,subc,V 3,binzc,&branch_EVM_invargca,mlt,p,s,V 2,p,s,V 1,p,s,V 0,t,Q,mlt,s,V 3,t,B 122,q,qi,V 2,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 3,mla,l,V 1,q,mla,l,V 2,q,mla,l,V 3,tc,V 2,c,r};
-void*Y124[]={binc,&branch_EVM_invargc,mca,subc,V 3,binzc,&branch_EVM_invargca,qi,W(dict_bind_bang),qi,W(quote),dig,V 4,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,qi,W(quote),dig,V 4,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,dig,V 3,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,ds,V 3,r};
-void*Y125[]={binc,&branch_EVM_invargc,hop,V 1,mca,subc,V 1,binzc,&branch_EVM_invargca,dig,V 0,mlt,s,V 0,mla,l,V 0,q,mha,l,V 1,l,V 79,tc,V 1,c,jif,V 52,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l0,q,mha,l,V 2,l,V 1,tc,V 1,c,q,dig,V 1,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mha,l,V 2,l,V 1,tc,V 1,c,q,mha,l,V 1,l,V 78,tc,V 2,c,ds,V 1,r,mla,l,V 0,q,mha,l,V 1,l,V 120,tc,V 1,c,jif,V 19,dig,V 0,q,mha,l0,q,qi,W(string_copy),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,ds,V 1,r,mla,l,V 0,q,mha,l,V 1,l,V 146,tc,V 1,c,jif,V 42,dig,V 0,q,mha,l0,q,qi,W(vector2list),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 2,l,V 1,tc,V 1,c,q,mha,l0,q,qi,W(list2vector),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,ds,V 1,r,mla,l,V 0,q,mha,l,V 1,l,V 86,tc,V 1,c,jif,V 37,dig,V 0,q,mha,l,V 1,l,V 82,tc,V 1,c,q,mha,l,V 2,l,V 1,tc,V 1,c,q,mha,l0,q,qi,W(alist2dict),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,ds,V 1,r,dig,V 0,ds,V 1,r};
[...1353 lines suppressed...]
[325]{car:W(LTGT),cdr:BC 324},
-[326]{car:B 720,cdr:Q},
-[327]{car:B 719,cdr:BC 326},
+[326]{car:B 721,cdr:Q},
+[327]{car:B 720,cdr:BC 326},
[328]{car:CH('i'),cdr:Q},
[329]{car:CH('c'),cdr:BC 328},
[330]{car:CH('C'),cdr:BC 329},
[331]{car:CH('A'),cdr:BC 330},
[332]{car:CH('e'),cdr:BC 331},
-[333]{car:B 731,cdr:Q},
+[333]{car:B 732,cdr:Q},
};
/* The root node of the compiled builtin library */
struct node *
-builtin_root = B 733;
+builtin_root = B 734;
/* essence.c ends here */
Index: wordlist.txt
===================================================================
RCS file: /cvsroot/wisp/wisp/src/wordlist.txt,v
retrieving revision 1.592
retrieving revision 1.593
diff -u -d -r1.592 -r1.593
--- wordlist.txt 28 Feb 2003 22:40:55 -0000 1.592
+++ wordlist.txt 1 Mar 2003 08:32:15 -0000 1.593
@@ -177,7 +177,7 @@
translate tree-copy true truncate truncate-not try tty? type type-of u
u8 u8vector? ubyte? uid undefined unix-time unknown unknown-context
unknown-local unknown-open-input-file-flag
-unknown-open-output-file-flag unknown-option unpack-be-integer
+unknown-open-output-file-flag unknown-option unknown? unpack-be-integer
unpack-le-integer unquote unquote-splicing unreadable unreadable-port
unseekable-port unsure-collect unwritable-port use utf-8->c16string
utf-8-continuer? utf-8-first-byte->length uwyde? val valloc value
|
|
From: <di...@us...> - 2003-03-01 08:32:19
|
Update of /cvsroot/wisp/wisp/src/builtin
In directory sc8-pr-cvs1:/tmp/cvs-serv7659/src/builtin
Modified Files:
builtin.wisp stdenv.wisp
Log Message:
wrote |unknown?|
Index: builtin.wisp
===================================================================
RCS file: /cvsroot/wisp/wisp/src/builtin/builtin.wisp,v
retrieving revision 1.213
retrieving revision 1.214
diff -u -d -r1.213 -r1.214
--- builtin.wisp 20 Sep 2002 18:35:44 -0000 1.213
+++ builtin.wisp 1 Mar 2003 08:32:15 -0000 1.214
@@ -544,6 +544,9 @@
(null? x)
(void? x)))
+(define (unknown? x)
+ (eq? x #u))
+
;;;; The |sub| macro
;; |sub| is used to parse foo[bar]. The macro has to translate the
Index: stdenv.wisp
===================================================================
RCS file: /cvsroot/wisp/wisp/src/builtin/stdenv.wisp,v
retrieving revision 1.374
retrieving revision 1.375
diff -u -d -r1.374 -r1.375
--- stdenv.wisp 20 Sep 2002 18:35:44 -0000 1.374
+++ stdenv.wisp 1 Mar 2003 08:32:15 -0000 1.375
@@ -91,11 +91,11 @@
symbol<? symbol>=? symbol>? symbol? system-constant
tcchangeattr tcgetattr tcgetattr-raw tcsetattr-raw tenth
third toposplit translate tree-copy truncate try tty? type
- type-of u8vector? ubyte? unix-time unpack-be-integer
- unpack-le-integer unsure-collect use utf-8->c16string
- utf-8-first-byte->length uwyde? vector vector->list
- vector-append vector-copy vector-fill! vector-move!
- vector? void? wisp-string-hash with-errors-to
+ type-of u8vector? ubyte? unix-time unknown?
+ unpack-be-integer unpack-le-integer unsure-collect use
+ utf-8->c16string utf-8-first-byte->length uwyde? vector
+ vector->list vector-append vector-copy vector-fill!
+ vector-move! vector? void? wisp-string-hash with-errors-to
with-input-from with-output-to write write-char
write-string writeln zero?)))))
((*origin obj) ; => (original-name source-data ...) | #f
|
|
From: <pi...@us...> - 2003-02-28 23:01:10
|
Update of /cvsroot/wisp/wisp
In directory sc8-pr-cvs1:/tmp/cvs-serv704
Modified Files:
NEWS
Log Message:
announce #unknown
Index: NEWS
===================================================================
RCS file: /cvsroot/wisp/wisp/NEWS,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- NEWS 9 Feb 2003 09:30:03 -0000 1.4
+++ NEWS 28 Feb 2003 23:01:02 -0000 1.5
@@ -8,3 +8,4 @@
Added: wrapper for socket(2)
Added: users directory for sandbox games
Added: the |system-path-ref| accessor
+ Added: the #unknown object (a.k.a #u)
|
|
From: <di...@us...> - 2003-02-28 22:55:56
|
Update of /cvsroot/wisp/wisp/src/builtin
In directory sc8-pr-cvs1:/tmp/cvs-serv30889/src/builtin
Modified Files:
tostring.wisp
Log Message:
cosmetical fix
Index: tostring.wisp
===================================================================
RCS file: /cvsroot/wisp/wisp/src/builtin/tostring.wisp,v
retrieving revision 1.83
retrieving revision 1.84
diff -u -d -r1.83 -r1.84
--- tostring.wisp 28 Feb 2003 22:40:56 -0000 1.83
+++ tostring.wisp 28 Feb 2003 22:55:51 -0000 1.84
@@ -114,7 +114,7 @@
((null? s) (emit "()"))
((eq? s #t) (emit "#t"))
((eq? s #f) (emit "#f"))
- ((eq? s '#u) (emit "#u"))
+ ((eq? s #u) (emit "#u"))
((symbol? s) (emit (symbol->string s)))
((vector? s) (if (not (check-duplicity s))
(begin
|
|
From: <di...@us...> - 2003-02-28 22:41:30
|
Update of /cvsroot/wisp/wisp/src
In directory sc8-pr-cvs1:/tmp/cvs-serv24163/src
Modified Files:
boot.wisp essence.c node.h wordlist.txt
Log Message:
created the #unknown special object
Index: boot.wisp
===================================================================
RCS file: /cvsroot/wisp/wisp/src/boot.wisp,v
retrieving revision 1.261
retrieving revision 1.262
diff -u -d -r1.261 -r1.262
--- boot.wisp 18 Sep 2002 21:13:27 -0000 1.261
+++ boot.wisp 28 Feb 2003 22:39:18 -0000 1.262
@@ -31,6 +31,8 @@
'#\T)
((eq? s #f)
'#\F)
+ ((eq? s #unknown)
+ "UNKNOWN")
((cons? s)
`(CONS ,(fullify (car s)) ,(fullify (cdr s))))
((integer? s)
Index: essence.c
===================================================================
RCS file: /cvsroot/wisp/wisp/src/essence.c,v
retrieving revision 1.230
retrieving revision 1.231
diff -u -d -r1.230 -r1.231
--- essence.c 8 Feb 2003 18:13:16 -0000 1.230
+++ essence.c 28 Feb 2003 22:39:19 -0000 1.231
@@ -967,7 +967,7 @@
void*Y528[]={binc,&branch_EVM_invargc,mca,subc,V 1,binzc,&branch_EVM_invargca,dig,V 0,q,mha,l,V 1,l,V 79,tc,V 1,c,jif,V 34,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l0,q,dig,V 1,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mha,l,V 1,l,V 78,tc,V 2,c,ds,V 1,r,dig,V 0,ds,V 1,r};
void*Y529[]={binc,&branch_EVM_invargc,mca,subc,V 1,binzc,&branch_EVM_invargca,dig,V 0,xri,Q,jinz,V 49,mha,l,V 3,l,V 13,q,mha,l,V 1,l,V 121,tc,V 1,c,jif,V 28,qi,W(COLONEQ),mha,l,V 3,l,V 13,q,mha,l,V 1,l,V 97,tc,V 2,c,q,mha,l,V 1,l,V 97,tc,V 1,c,ds,V 1,r,t,Q,ds,V 1,r,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l0,jinf,V 5,t,F,ds,V 1,r,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l,V 1,xri,Q,jinz,V 17,mha,l,V 3,l,V 13,xri,CH('S'),jinz,V 4,t,T,j,V 2,t,F,j,V 2,t,F,jif,V 33,t,F,mat,mha,l,V 3,st,V 13,qi,W(COLONEQ),dig,V 1,q,mha,l,V 3,l,V 17,tc,V 1,c,q,mha,l,V 1,l,V 78,tc,V 2,c,ds,V 1,r,dig,V 0,q,mha,l0,q,qi,W(caar),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,W(_bang),jinz,V 49,dig,V 0,q,mha,l0,q,qi,W(cadar),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,dig,V 1,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mha,l,V 3,l,V 17,tc,V 1,c,q,mha,l,V 1,l,V 78,tc,V 2,c,ds,V 1,r,dig,V 0,q,mha,l0,q,qi,W(caar),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,W(TIMES),jinz,V 60,dig,V 0,q,mha,l0,q,qi,W(cadar),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,qi,W(DOTDOTDOT),dig,V 2,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mha,l,V 3,l,V 17,tc,V 1,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,ds,V 1,r,dig,V 0,q,mha,l0,q,qi,W(caar),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,W(_huh),jinz,V 49,dig,V 0,q,mha,l0,q,qi,W(cdar),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,dig,V 1,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mha,l,V 3,l,V 17,tc,V 1,c,q,mha,l,V 1,l,V 78,tc,V 2,c,ds,V 1,r,qi,W(internal_trouble),dig,V 1,q,mha,l,V 1,l,V 110,tc,V 2,c,ds,V 1,r};
void*Y530[]={binc,&branch_EVM_invargc,hop,V 2,mca,subc,V 1,binzc,&branch_EVM_invargca,dig,V 0,xri,Q,jinz,V 5,t,Q,ds,V 1,r,dig,V 0,q,mha,l0,q,qi,W(fit_for_variable_name_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 123,dig,V 0,q,mha,l,V 3,l,V 22,q,mha,l0,q,qi,W(memq),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,jif,V 18,qi,W(invalid_my_target),mha,l,V 3,l,V 18,q,mha,l,V 1,l,V 110,tc,V 2,c,j,V 0,mha,l,V 2,l,V 3,tc,V 0,c,mlt,s,V 0,dig,V 0,q,mla,l,V 0,q,mha,l,V 1,l,V 78,tc,V 2,c,q,dig,V 1,q,mha,l,V 3,l,V 22,q,mha,l,V 1,l,V 78,tc,V 2,c,mat,mha,l,V 3,st,V 22,dig,V 0,q,mha,l,V 3,l,V 1,q,mha,l,V 1,l,V 78,tc,V 2,c,mat,mha,l,V 3,st,V 1,ds,V 1,mla,l,V 0,ds,V 1,r,dig,V 0,q,mha,l,V 1,l,V 79,tc,V 1,c,jif,V 58,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l0,q,mha,l,V 3,l,V 23,tc,V 1,c,mlt,s,V 1,mla,l,V 1,q,dig,V 1,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mha,l,V 3,l,V 23,tc,V 1,c,q,mha,l,V 1,l,V 78,tc,V 2,c,ds,V 1,r,qi,W(invalid_my_target),dig,V 1,q,mha,l,V 1,l,V 110,tc,V 2,c,ds,V 1,r};
-void*Y531[]={binc,&branch_EVM_invargc,hop,V 32,mca,subc,V 2,binzc,&branch_EVM_invargca,mlt,p,s,V 1,p,s,V 0,mla,l,V 0,q,mha,l,V 1,l,V 121,tc,V 1,c,jif,V 154,mla,l,V 0,q,mla,l,V 1,q,mha,l0,q,qi,W(assq),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,mlt,s,V 2,mla,l,V 2,jif,V 13,mla,l,V 2,q,li,rvec+10,tc,V 1,c,ct,l,V 1,r,mla,l,V 0,q,mha,l0,q,qi,W(keyword_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 26,qi,W(quote),mla,l,V 0,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r,mla,l,V 0,xri,W($),jiz,V 7,mla,l,V 0,xri,W($_huh),jinz,V 4,mla,l,V 0,r,mla,l,V 0,q,mha,l0,q,qi,W(fit_for_variable_name_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 15,qi,W(GLOBAL),mla,l,V 0,q,mha,l,V 1,l,V 97,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 0,q,mha,l0,q,qi,W(number_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jinf,V 47,mla,l,V 0,q,mha,l0,q,qi,W(boolean_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jinf,V 28,mla,l,V 0,q,mha,l,V 1,l,V 77,tc,V 1,c,jinf,V 14,mla,l,V 0,q,mha,l,V 1,l,V 120,tc,V 1,c,jif,V 26,qi,W(quote),mla,l,V 0,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r,mla,l,V 0,q,mha,l,V 1,l,V 146,tc,V 1,c,jif,V 83,qi,W(quasiquote),t,B 525,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,q,mla,l,V 0,q,mha,l0,q,qi,W(vector2list),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(map),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l0,q,qi,W(list2vector),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 1,l,V 97,tc,V 2,c,q,mla,l,V 1,q,mha,l,V 2,l,V 4,tc,V 2,c,r,mla,l,V 0,q,mha,l,V 1,l,V 79,tc,V 1,c,jif,V 3032,mla,l,V 0,q,li,rvec+10,tc,V 1,c,ct,l0,mlt,s,V 3,t,Q,mlt,s,V 4,t,B 526,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 4,mla,l,V 0,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mla,l,V 4,tc,V 1,c,mlt,s,V 5,mla,l,V 3,q,mha,l,V 1,l,V 121,tc,V 1,c,jif,V 2941,mla,l,V 3,mlt,s,V 6,mla,l,V 6,xri,W(asm),jinz,V 250,mla,l,V 3,xri,W(asm),jinz,V 42,mla,l,V 5,q,mha,l,V 1,l,V 79,tc,V 1,c,jif,V 24,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l,V 1,xri,Q,jinz,V 4,t,T,j,V 2,t,F,j,V 2,t,F,j,V 2,t,F,jif,V 74,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,q,mha,l,V 1,l,V 121,tc,V 1,c,jinf,V 22,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,q,mha,l,V 1,l,V 120,tc,V 1,c,jif,V 15,qi,W(asm),mla,l,V 5,q,mha,l,V 1,l,V 78,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 5,xri,Q,jiz,V 101,mla,l,V 3,q,t,Q,mlt,s,V 7,t,B 527,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 7,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,q,mla,l,V 7,tc,V 1,c,q,t,B 528,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,q,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mha,l0,q,qi,W(map),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(begin),jinz,V 17,mla,l,V 5,q,mla,l,V 1,q,mha,l,V 2,l,V 8,tc,V 2,c,r,mla,l,V 6,xri,W(CALL),jinz,V 60,mla,l,V 5,xri,Q,jiz,V 38,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,q,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mla,l,V 1,q,mha,l,V 2,l,V 5,tc,V 3,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(DEFINE),jinz,V 198,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,I(2),jinz,V 162,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,mlt,s,V 8,mla,l,V 5,q,mha,l0,q,qi,W(cadr),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 9,mla,l,V 8,q,mha,l0,q,qi,W(fit_for_variable_name_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 94,mla,l,V 8,q,mla,l,V 1,q,mha,l0,q,qi,W(assq),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,jif,V 15,qi,W(invalid_definition),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,qi,W(begin),qi,W(DEFINE),mla,l,V 8,q,mla,l,V 9,q,mla,l,V 1,q,mha,l,V 2,l,V 4,tc,V 2,c,q,mha,l,V 1,l,V 97,tc,V 3,c,q,qi,W(quote),qi,Z,mha,l,V 1,l,V 97,tc,V 2,c,q,mha,l,V 1,l,V 97,tc,V 3,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(GLOBAL),jinz,V 77,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,I(1),jinz,V 22,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,q,mha,l,V 1,l,V 121,tc,V 1,c,j,V 2,t,F,jif,V 15,qi,W(GLOBAL),mla,l,V 5,q,mha,l,V 1,l,V 78,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(hide),jinz,V 122,mla,l,V 5,xri,Q,jiz,V 100,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,q,mla,l,V 1,q,mha,l,V 2,l,V 4,tc,V 2,c,mlt,s,V 10,mla,l,V 10,q,mha,l,V 1,l,V 121,tc,V 1,c,jif,V 44,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mla,l,V 10,q,mla,l,V 1,q,mha,l0,q,qi,W(drop_var),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l,V 2,l,V 8,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(hold),jinz,V 116,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,Q,jiz,V 92,mha,l,V 2,l,V 3,tc,V 0,c,mlt,s,V 11,qi,W(my),mla,l,V 11,q,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,q,mla,l,V 1,q,mha,l,V 2,l,V 4,tc,V 2,c,q,qi,W(begin),mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mla,l,V 1,q,mha,l,V 2,l,V 8,tc,V 2,c,q,mla,l,V 11,q,mha,l,V 1,l,V 97,tc,V 3,c,q,mha,l,V 1,l,V 97,tc,V 4,c,r,t,Z,r,mla,l,V 6,xri,W(if),jinz,V 77,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 12,mla,l,V 12,xri,I(2),jiz,V 7,mla,l,V 12,xri,I(3),jinz,V 28,qi,W(if),mla,l,V 5,q,mla,l,V 1,q,mha,l,V 2,l,V 7,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(lambda),jinz,V 706,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,qi,I(2),li,rvec+15,tc,V 2,c,jinf,V 664,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,q,mha,l,V 1,l,V 183,tc,V 1,c,q,li,rvec+10,tc,V 1,c,ct,q,l0,p,l,V 1,q,li,rvec+10,tc,V 1,c,ct,q,l0,mlt,s,V 13,p,l,V 1,q,li,rvec+10,tc,V 1,c,ct,q,l0,mlt,s,V 14,p,l,V 1,q,li,rvec+10,tc,V 1,c,ct,l0,q,li,rvec+10,tc,V 1,c,ct,q,l0,p,l,V 1,q,li,rvec+10,tc,V 1,c,ct,l0,mlt,s,V 15,mha,l,V 2,l,V 3,tc,V 0,c,mlt,s,V 16,mla,l,V 15,q,mla,l,V 16,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mla,l,V 1,q,mha,l,V 1,l,V 78,tc,V 2,c,mlt,s,V 1,mla,l,V 13,xri,CH('G'),jinz,V 7,t,F,mlt,s,V 13,j,V 63,mla,l,V 13,q,mha,l,V 1,l,V 121,tc,V 1,c,jif,V 49,mha,l,V 2,l,V 3,tc,V 0,c,q,mla,l,V 13,q,dig,V 1,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mla,l,V 1,q,mha,l,V 1,l,V 78,tc,V 2,c,mlt,s,V 1,dig,V 0,mlt,s,V 13,ds,V 1,j,V 0,mla,l,V 14,q,dig,V 0,xri,Q,jiz,V 148,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l0,q,t,T,q,dig,V 1,jif,V 111,dig,V 1,q,li,rvec+10,tc,V 1,c,ct,l0,q,dig,V 0,xri,W(_bang),jiz,V 6,dig,V 0,xri,W(TIMES),jinz,V 76,mha,l,V 2,l,V 3,tc,V 0,c,q,dig,V 3,q,mha,l0,q,qi,W(second),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,dig,V 1,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mla,l,V 1,q,mha,l,V 1,l,V 78,tc,V 2,c,mlt,s,V 1,dig,V 3,q,dig,V 1,q,mha,l0,q,qi,W(second),t,&NN_dict_ref_2,tc,V 2,c,tc,V -2,c,ds,V 1,j,V 8,dig,V 0,xri,W(_huh),jinz,V 2,j,V 0,ds,V 1,j,V 0,ds,V 1,ds,V 1,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l,V 1,bury,V 0,j,V -154,ds,V 1,mla,l,V 14,q,dig,V 0,xri,Q,jiz,V 185,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l0,q,t,T,q,dig,V 1,jif,V 22,dig,V 1,q,li,rvec+10,tc,V 1,c,ct,l0,xri,W(_huh),jinz,V 4,t,T,j,V 2,t,F,j,V 2,t,F,jif,V 122,dig,V 1,q,dig,V 2,q,mha,l0,q,qi,W(third),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mla,l,V 1,q,mha,l,V 2,l,V 4,tc,V 2,c,q,mha,l0,q,qi,W(third),t,&NN_dict_ref_2,tc,V 2,c,tc,V -2,c,mha,l,V 2,l,V 3,tc,V 0,c,q,dig,V 2,q,mha,l0,q,qi,W(second),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,dig,V 1,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mla,l,V 1,q,mha,l,V 1,l,V 78,tc,V 2,c,mlt,s,V 1,dig,V 2,q,dig,V 1,q,mha,l0,q,qi,W(second),t,&NN_dict_ref_2,tc,V 2,c,tc,V -2,c,ds,V 1,j,V 0,ds,V 1,ds,V 1,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l,V 1,bury,V 0,j,V -191,ds,V 1,qi,W(lambda),qi,Q,qi,F,mla,l,V 16,q,mha,l,V 1,l,V 97,tc,V 3,c,q,t,Q,mlt,s,V 17,t,B 529,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 17,mla,l,V 14,q,mla,l,V 17,tc,V 1,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mla,l,V 1,q,mha,l,V 2,l,V 8,tc,V 2,c,q,mha,l,V 1,l,V 97,tc,V 3,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(my),jinz,V 189,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,qi,I(2),li,rvec+15,tc,V 2,c,jinf,V 147,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,mlt,s,V 18,mla,l,V 5,q,mha,l0,q,qi,W(cadr),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 19,mla,l,V 5,q,mha,l0,q,qi,W(cddr),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 20,mla,l,V 1,mlt,s,V 21,t,Q,mlt,s,V 22,t,Q,mlt,s,V 23,t,B 530,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 23,mla,l,V 18,q,mla,l,V 23,tc,V 1,c,mlt,s,V 24,qi,W(my),mla,l,V 24,q,mla,l,V 19,q,mla,l,V 21,q,mha,l,V 2,l,V 4,tc,V 2,c,q,mla,l,V 20,q,mla,l,V 1,q,mha,l,V 2,l,V 8,tc,V 2,c,q,mha,l,V 1,l,V 97,tc,V 4,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(OR),jinz,V 64,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,I(2),jinz,V 28,qi,W(OR),mla,l,V 5,q,mla,l,V 1,q,mha,l,V 2,l,V 7,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(quote),jinz,V 51,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,I(1),jinz,V 15,qi,W(quote),mla,l,V 5,q,mha,l,V 1,l,V 78,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(set_bang),jinz,V 88,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,I(2),jinz,V 52,qi,W(begin),qi,W(set_bang),mla,l,V 5,q,mla,l,V 1,q,mha,l,V 2,l,V 7,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,qi,W(quote),qi,Z,mha,l,V 1,l,V 97,tc,V 2,c,q,mha,l,V 1,l,V 97,tc,V 3,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(splicing),jinz,V 72,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,I(1),jinz,V 36,qi,W(splicing),mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,q,mla,l,V 1,q,mha,l,V 2,l,V 4,tc,V 2,c,q,mha,l,V 1,l,V 97,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(while),jinz,V 108,mla,l,V 5,xri,Q,jiz,V 86,qi,W(begin),qi,W(while),mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,q,mla,l,V 1,q,mha,l,V 2,l,V 4,tc,V 2,c,q,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mla,l,V 1,q,mha,l,V 2,l,V 8,tc,V 2,c,q,mha,l,V 1,l,V 97,tc,V 3,c,q,qi,W(quote),qi,Z,mha,l,V 1,l,V 97,tc,V 2,c,q,mha,l,V 1,l,V 97,tc,V 3,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(WITHIN),jinz,V 402,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,qi,I(2),li,rvec+15,tc,V 2,c,jinf,V 360,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,q,l0,mlt,s,V 25,p,l,V 1,q,li,rvec+10,tc,V 1,c,ct,q,l0,mlt,s,V 26,p,l,V 1,mlt,s,V 27,mla,l,V 25,q,mha,l,V 1,l,V 121,tc,V 1,c,jif,V 20,mha,l,V 2,l,V 1,q,mla,l,V 25,q,t,&NN_dict_ref_2,tc,V 2,c,mlt,s,V 25,j,V 0,mla,l,V 25,q,mha,l0,q,qi,W(class_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jinf,V 16,qi,W(class_huh),mla,l,V 25,q,mha,l,V 1,l,V 110,tc,V 2,c,j,V 0,mla,l,V 1,mlt,s,V 28,mha,l0,q,qi,W(car),t,&NN_dict_ref_2,tc,V 2,c,q,mla,l,V 25,q,mha,l0,q,qi,W(class2vector),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(vector2list),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(map),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,dig,V 0,q,dig,V 0,xri,Q,jiz,V 130,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l0,q,t,T,q,dig,V 1,q,mha,l0,q,qi,W(symbol2string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,qi,I(0),qi,I(2),mha,l0,q,qi,W(slice),t,&NN_dict_ref_2,tc,V 2,c,tc,V 3,c,q,qi,B 523,mha,l0,q,qi,W(stringEQ_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,jif,V 15,qi,W(invalid_slot_name),dig,V 2,q,mha,l,V 1,l,V 110,tc,V 2,c,j,V 0,dig,V 1,q,dig,V 2,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mla,l,V 1,q,mha,l,V 1,l,V 78,tc,V 2,c,mlt,s,V 1,ds,V 1,ds,V 1,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l,V 1,bury,V 0,j,V -136,ds,V 1,ds,V 1,qi,W(WITHIN),mla,l,V 25,q,mla,l,V 26,q,mla,l,V 28,q,mha,l,V 2,l,V 4,tc,V 2,c,q,mla,l,V 27,q,mla,l,V 1,q,mha,l,V 2,l,V 8,tc,V 2,c,q,mha,l,V 1,l,V 97,tc,V 4,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 3,q,mla,l,V 1,q,mha,l0,q,qi,W(assq),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,jif,V 21,mla,l,V 3,q,mla,l,V 5,q,mla,l,V 1,q,mha,l,V 2,l,V 5,tc,V 3,c,r,mha,l,V 2,l,V 1,q,mla,l,V 3,q,qi,F,mha,l0,q,qi,W(dict_ref),t,&NN_dict_ref_2,tc,V 2,c,tc,V 3,c,q,dig,V 0,jif,V 45,dig,V 0,q,dig,V 0,q,mha,l0,q,qi,W(macro_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 18,dig,V 0,q,mha,l0,q,qi,W(macro2procedure),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,j,V 2,t,F,ds,V 1,j,V 2,t,F,ds,V 1,q,dig,V 0,q,mha,l0,q,qi,W(procedure_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 4,dig,V 0,j,V 2,t,F,ds,V 1,mlt,s,V 29,mla,l,V 29,jif,V 47,mla,l,V 29,mlt,s,V 30,t,T,mlt,s,V 31,mla,l,V 30,q,mha,l,V 2,l,V 1,q,mla,l,V 5,q,mha,l,V 1,l,V 11,tc,V 3,c,q,mla,l,V 1,q,mha,l,V 2,l,V 4,tc,V 2,c,r,mla,l,V 3,q,mla,l,V 5,q,mla,l,V 1,q,mha,l,V 2,l,V 5,tc,V 3,c,r,mla,l,V 3,q,mla,l,V 5,q,mla,l,V 1,q,mha,l,V 2,l,V 5,tc,V 3,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r};
+void*Y531[]={binc,&branch_EVM_invargc,hop,V 32,mca,subc,V 2,binzc,&branch_EVM_invargca,mlt,p,s,V 1,p,s,V 0,mla,l,V 0,q,mha,l,V 1,l,V 121,tc,V 1,c,jif,V 154,mla,l,V 0,q,mla,l,V 1,q,mha,l0,q,qi,W(assq),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,mlt,s,V 2,mla,l,V 2,jif,V 13,mla,l,V 2,q,li,rvec+10,tc,V 1,c,ct,l,V 1,r,mla,l,V 0,q,mha,l0,q,qi,W(keyword_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 26,qi,W(quote),mla,l,V 0,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r,mla,l,V 0,xri,W($),jiz,V 7,mla,l,V 0,xri,W($_huh),jinz,V 4,mla,l,V 0,r,mla,l,V 0,q,mha,l0,q,qi,W(fit_for_variable_name_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 15,qi,W(GLOBAL),mla,l,V 0,q,mha,l,V 1,l,V 97,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 0,q,mha,l0,q,qi,W(number_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jinf,V 54,mla,l,V 0,q,mha,l0,q,qi,W(boolean_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jinf,V 35,mla,l,V 0,q,mha,l,V 1,l,V 77,tc,V 1,c,jinf,V 21,mla,l,V 0,q,mha,l,V 1,l,V 120,tc,V 1,c,jinf,V 7,mla,l,V 0,xri,UNKNOWN,jinz,V 26,qi,W(quote),mla,l,V 0,q,qi,Q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r,mla,l,V 0,q,mha,l,V 1,l,V 146,tc,V 1,c,jif,V 83,qi,W(quasiquote),t,B 525,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,q,mla,l,V 0,q,mha,l0,q,qi,W(vector2list),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(map),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l0,q,qi,W(list2vector),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 1,l,V 97,tc,V 2,c,q,mla,l,V 1,q,mha,l,V 2,l,V 4,tc,V 2,c,r,mla,l,V 0,q,mha,l,V 1,l,V 79,tc,V 1,c,jif,V 3032,mla,l,V 0,q,li,rvec+10,tc,V 1,c,ct,l0,mlt,s,V 3,t,Q,mlt,s,V 4,t,B 526,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 4,mla,l,V 0,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mla,l,V 4,tc,V 1,c,mlt,s,V 5,mla,l,V 3,q,mha,l,V 1,l,V 121,tc,V 1,c,jif,V 2941,mla,l,V 3,mlt,s,V 6,mla,l,V 6,xri,W(asm),jinz,V 250,mla,l,V 3,xri,W(asm),jinz,V 42,mla,l,V 5,q,mha,l,V 1,l,V 79,tc,V 1,c,jif,V 24,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l,V 1,xri,Q,jinz,V 4,t,T,j,V 2,t,F,j,V 2,t,F,j,V 2,t,F,jif,V 74,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,q,mha,l,V 1,l,V 121,tc,V 1,c,jinf,V 22,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,q,mha,l,V 1,l,V 120,tc,V 1,c,jif,V 15,qi,W(asm),mla,l,V 5,q,mha,l,V 1,l,V 78,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 5,xri,Q,jiz,V 101,mla,l,V 3,q,t,Q,mlt,s,V 7,t,B 527,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 7,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,q,mla,l,V 7,tc,V 1,c,q,t,B 528,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,q,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mha,l0,q,qi,W(map),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(begin),jinz,V 17,mla,l,V 5,q,mla,l,V 1,q,mha,l,V 2,l,V 8,tc,V 2,c,r,mla,l,V 6,xri,W(CALL),jinz,V 60,mla,l,V 5,xri,Q,jiz,V 38,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,q,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mla,l,V 1,q,mha,l,V 2,l,V 5,tc,V 3,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(DEFINE),jinz,V 198,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,I(2),jinz,V 162,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,mlt,s,V 8,mla,l,V 5,q,mha,l0,q,qi,W(cadr),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 9,mla,l,V 8,q,mha,l0,q,qi,W(fit_for_variable_name_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 94,mla,l,V 8,q,mla,l,V 1,q,mha,l0,q,qi,W(assq),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,jif,V 15,qi,W(invalid_definition),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,qi,W(begin),qi,W(DEFINE),mla,l,V 8,q,mla,l,V 9,q,mla,l,V 1,q,mha,l,V 2,l,V 4,tc,V 2,c,q,mha,l,V 1,l,V 97,tc,V 3,c,q,qi,W(quote),qi,Z,mha,l,V 1,l,V 97,tc,V 2,c,q,mha,l,V 1,l,V 97,tc,V 3,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(GLOBAL),jinz,V 77,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,I(1),jinz,V 22,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,q,mha,l,V 1,l,V 121,tc,V 1,c,j,V 2,t,F,jif,V 15,qi,W(GLOBAL),mla,l,V 5,q,mha,l,V 1,l,V 78,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(hide),jinz,V 122,mla,l,V 5,xri,Q,jiz,V 100,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,q,mla,l,V 1,q,mha,l,V 2,l,V 4,tc,V 2,c,mlt,s,V 10,mla,l,V 10,q,mha,l,V 1,l,V 121,tc,V 1,c,jif,V 44,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mla,l,V 10,q,mla,l,V 1,q,mha,l0,q,qi,W(drop_var),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l,V 2,l,V 8,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(hold),jinz,V 116,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,Q,jiz,V 92,mha,l,V 2,l,V 3,tc,V 0,c,mlt,s,V 11,qi,W(my),mla,l,V 11,q,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,q,mla,l,V 1,q,mha,l,V 2,l,V 4,tc,V 2,c,q,qi,W(begin),mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mla,l,V 1,q,mha,l,V 2,l,V 8,tc,V 2,c,q,mla,l,V 11,q,mha,l,V 1,l,V 97,tc,V 3,c,q,mha,l,V 1,l,V 97,tc,V 4,c,r,t,Z,r,mla,l,V 6,xri,W(if),jinz,V 77,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 12,mla,l,V 12,xri,I(2),jiz,V 7,mla,l,V 12,xri,I(3),jinz,V 28,qi,W(if),mla,l,V 5,q,mla,l,V 1,q,mha,l,V 2,l,V 7,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(lambda),jinz,V 706,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,qi,I(2),li,rvec+15,tc,V 2,c,jinf,V 664,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,q,mha,l,V 1,l,V 183,tc,V 1,c,q,li,rvec+10,tc,V 1,c,ct,q,l0,p,l,V 1,q,li,rvec+10,tc,V 1,c,ct,q,l0,mlt,s,V 13,p,l,V 1,q,li,rvec+10,tc,V 1,c,ct,q,l0,mlt,s,V 14,p,l,V 1,q,li,rvec+10,tc,V 1,c,ct,l0,q,li,rvec+10,tc,V 1,c,ct,q,l0,p,l,V 1,q,li,rvec+10,tc,V 1,c,ct,l0,mlt,s,V 15,mha,l,V 2,l,V 3,tc,V 0,c,mlt,s,V 16,mla,l,V 15,q,mla,l,V 16,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mla,l,V 1,q,mha,l,V 1,l,V 78,tc,V 2,c,mlt,s,V 1,mla,l,V 13,xri,CH('G'),jinz,V 7,t,F,mlt,s,V 13,j,V 63,mla,l,V 13,q,mha,l,V 1,l,V 121,tc,V 1,c,jif,V 49,mha,l,V 2,l,V 3,tc,V 0,c,q,mla,l,V 13,q,dig,V 1,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mla,l,V 1,q,mha,l,V 1,l,V 78,tc,V 2,c,mlt,s,V 1,dig,V 0,mlt,s,V 13,ds,V 1,j,V 0,mla,l,V 14,q,dig,V 0,xri,Q,jiz,V 148,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l0,q,t,T,q,dig,V 1,jif,V 111,dig,V 1,q,li,rvec+10,tc,V 1,c,ct,l0,q,dig,V 0,xri,W(_bang),jiz,V 6,dig,V 0,xri,W(TIMES),jinz,V 76,mha,l,V 2,l,V 3,tc,V 0,c,q,dig,V 3,q,mha,l0,q,qi,W(second),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,dig,V 1,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mla,l,V 1,q,mha,l,V 1,l,V 78,tc,V 2,c,mlt,s,V 1,dig,V 3,q,dig,V 1,q,mha,l0,q,qi,W(second),t,&NN_dict_ref_2,tc,V 2,c,tc,V -2,c,ds,V 1,j,V 8,dig,V 0,xri,W(_huh),jinz,V 2,j,V 0,ds,V 1,j,V 0,ds,V 1,ds,V 1,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l,V 1,bury,V 0,j,V -154,ds,V 1,mla,l,V 14,q,dig,V 0,xri,Q,jiz,V 185,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l0,q,t,T,q,dig,V 1,jif,V 22,dig,V 1,q,li,rvec+10,tc,V 1,c,ct,l0,xri,W(_huh),jinz,V 4,t,T,j,V 2,t,F,j,V 2,t,F,jif,V 122,dig,V 1,q,dig,V 2,q,mha,l0,q,qi,W(third),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mla,l,V 1,q,mha,l,V 2,l,V 4,tc,V 2,c,q,mha,l0,q,qi,W(third),t,&NN_dict_ref_2,tc,V 2,c,tc,V -2,c,mha,l,V 2,l,V 3,tc,V 0,c,q,dig,V 2,q,mha,l0,q,qi,W(second),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,dig,V 1,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mla,l,V 1,q,mha,l,V 1,l,V 78,tc,V 2,c,mlt,s,V 1,dig,V 2,q,dig,V 1,q,mha,l0,q,qi,W(second),t,&NN_dict_ref_2,tc,V 2,c,tc,V -2,c,ds,V 1,j,V 0,ds,V 1,ds,V 1,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l,V 1,bury,V 0,j,V -191,ds,V 1,qi,W(lambda),qi,Q,qi,F,mla,l,V 16,q,mha,l,V 1,l,V 97,tc,V 3,c,q,t,Q,mlt,s,V 17,t,B 529,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 17,mla,l,V 14,q,mla,l,V 17,tc,V 1,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mla,l,V 1,q,mha,l,V 2,l,V 8,tc,V 2,c,q,mha,l,V 1,l,V 97,tc,V 3,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(my),jinz,V 189,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,qi,I(2),li,rvec+15,tc,V 2,c,jinf,V 147,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,mlt,s,V 18,mla,l,V 5,q,mha,l0,q,qi,W(cadr),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 19,mla,l,V 5,q,mha,l0,q,qi,W(cddr),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 20,mla,l,V 1,mlt,s,V 21,t,Q,mlt,s,V 22,t,Q,mlt,s,V 23,t,B 530,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 23,mla,l,V 18,q,mla,l,V 23,tc,V 1,c,mlt,s,V 24,qi,W(my),mla,l,V 24,q,mla,l,V 19,q,mla,l,V 21,q,mha,l,V 2,l,V 4,tc,V 2,c,q,mla,l,V 20,q,mla,l,V 1,q,mha,l,V 2,l,V 8,tc,V 2,c,q,mha,l,V 1,l,V 97,tc,V 4,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(OR),jinz,V 64,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,I(2),jinz,V 28,qi,W(OR),mla,l,V 5,q,mla,l,V 1,q,mha,l,V 2,l,V 7,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(quote),jinz,V 51,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,I(1),jinz,V 15,qi,W(quote),mla,l,V 5,q,mha,l,V 1,l,V 78,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(set_bang),jinz,V 88,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,I(2),jinz,V 52,qi,W(begin),qi,W(set_bang),mla,l,V 5,q,mla,l,V 1,q,mha,l,V 2,l,V 7,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,q,qi,W(quote),qi,Z,mha,l,V 1,l,V 97,tc,V 2,c,q,mha,l,V 1,l,V 97,tc,V 3,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(splicing),jinz,V 72,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,I(1),jinz,V 36,qi,W(splicing),mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,q,mla,l,V 1,q,mha,l,V 2,l,V 4,tc,V 2,c,q,mha,l,V 1,l,V 97,tc,V 2,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(while),jinz,V 108,mla,l,V 5,xri,Q,jiz,V 86,qi,W(begin),qi,W(while),mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l0,q,mla,l,V 1,q,mha,l,V 2,l,V 4,tc,V 2,c,q,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mla,l,V 1,q,mha,l,V 2,l,V 8,tc,V 2,c,q,mha,l,V 1,l,V 97,tc,V 3,c,q,qi,W(quote),qi,Z,mha,l,V 1,l,V 97,tc,V 2,c,q,mha,l,V 1,l,V 97,tc,V 3,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 6,xri,W(WITHIN),jinz,V 402,mla,l,V 5,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,qi,I(2),li,rvec+15,tc,V 2,c,jinf,V 360,mla,l,V 5,q,li,rvec+10,tc,V 1,c,ct,q,l0,mlt,s,V 25,p,l,V 1,q,li,rvec+10,tc,V 1,c,ct,q,l0,mlt,s,V 26,p,l,V 1,mlt,s,V 27,mla,l,V 25,q,mha,l,V 1,l,V 121,tc,V 1,c,jif,V 20,mha,l,V 2,l,V 1,q,mla,l,V 25,q,t,&NN_dict_ref_2,tc,V 2,c,mlt,s,V 25,j,V 0,mla,l,V 25,q,mha,l0,q,qi,W(class_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jinf,V 16,qi,W(class_huh),mla,l,V 25,q,mha,l,V 1,l,V 110,tc,V 2,c,j,V 0,mla,l,V 1,mlt,s,V 28,mha,l0,q,qi,W(car),t,&NN_dict_ref_2,tc,V 2,c,q,mla,l,V 25,q,mha,l0,q,qi,W(class2vector),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(vector2list),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(map),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,dig,V 0,q,dig,V 0,xri,Q,jiz,V 130,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l0,q,t,T,q,dig,V 1,q,mha,l0,q,qi,W(symbol2string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,qi,I(0),qi,I(2),mha,l0,q,qi,W(slice),t,&NN_dict_ref_2,tc,V 2,c,tc,V 3,c,q,qi,B 523,mha,l0,q,qi,W(stringEQ_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,jif,V 15,qi,W(invalid_slot_name),dig,V 2,q,mha,l,V 1,l,V 110,tc,V 2,c,j,V 0,dig,V 1,q,dig,V 2,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mla,l,V 1,q,mha,l,V 1,l,V 78,tc,V 2,c,mlt,s,V 1,ds,V 1,ds,V 1,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l,V 1,bury,V 0,j,V -136,ds,V 1,ds,V 1,qi,W(WITHIN),mla,l,V 25,q,mla,l,V 26,q,mla,l,V 28,q,mha,l,V 2,l,V 4,tc,V 2,c,q,mla,l,V 27,q,mla,l,V 1,q,mha,l,V 2,l,V 8,tc,V 2,c,q,mha,l,V 1,l,V 97,tc,V 4,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 3,q,mla,l,V 1,q,mha,l0,q,qi,W(assq),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,jif,V 21,mla,l,V 3,q,mla,l,V 5,q,mla,l,V 1,q,mha,l,V 2,l,V 5,tc,V 3,c,r,mha,l,V 2,l,V 1,q,mla,l,V 3,q,qi,F,mha,l0,q,qi,W(dict_ref),t,&NN_dict_ref_2,tc,V 2,c,tc,V 3,c,q,dig,V 0,jif,V 45,dig,V 0,q,dig,V 0,q,mha,l0,q,qi,W(macro_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 18,dig,V 0,q,mha,l0,q,qi,W(macro2procedure),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,j,V 2,t,F,ds,V 1,j,V 2,t,F,ds,V 1,q,dig,V 0,q,mha,l0,q,qi,W(procedure_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 4,dig,V 0,j,V 2,t,F,ds,V 1,mlt,s,V 29,mla,l,V 29,jif,V 47,mla,l,V 29,mlt,s,V 30,t,T,mlt,s,V 31,mla,l,V 30,q,mha,l,V 2,l,V 1,q,mla,l,V 5,q,mha,l,V 1,l,V 11,tc,V 3,c,q,mla,l,V 1,q,mha,l,V 2,l,V 4,tc,V 2,c,r,mla,l,V 3,q,mla,l,V 5,q,mla,l,V 1,q,mha,l,V 2,l,V 5,tc,V 3,c,r,mla,l,V 3,q,mla,l,V 5,q,mla,l,V 1,q,mha,l,V 2,l,V 5,tc,V 3,c,r,qi,W(preprocessing_error),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r};
void*Y532[]={binc,&branch_EVM_invargc,mca,subc,V 3,binzc,&branch_EVM_invargca,dig,V 2,q,dig,V 1,q,mha,l,V 2,l,V 4,tc,V 2,c,q,dig,V 2,q,dig,V 2,q,mha,l,V 2,l,V 7,tc,V 2,c,q,dig,V 2,q,mha,l,V 2,l,V 6,tc,V 3,c,ds,V 3,r};
void*Y533[]={binc,&branch_EVM_invargc,mca,subc,V 1,binzc,&branch_EVM_invargca,dig,V 0,q,mha,l,V 1,l,V 79,tc,V 1,c,jif,V 24,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l0,xri,W(splicing),jinz,V 5,ds,V 1,t,T,r,ds,V 1,t,F,r,t,F,ds,V 1,r};
void*Y534[]={binc,&branch_EVM_invargc,hop,V 3,mca,subc,V 3,binzc,&branch_EVM_invargca,mlt,p,s,V 2,p,s,V 1,p,s,V 0,t,B 533,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,q,mla,l,V 1,q,mha,l0,q,qi,W(find),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,jif,V 4,t,W(VCALL),j,V 2,t,W(CALL),q,mla,l,V 0,q,mla,l,V 1,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r};
@@ -1038,7 +1038,7 @@
void*Y604[]={binc,&branch_EVM_invargc,hop,V 1,mca,subc,V 1,binzc,&branch_EVM_invargca,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 0,mla,l,V 0,xri,CH('|'),jinz,V 14,dig,V 0,q,mha,l,V 3,l,V 14,tc,V 1,c,ds,V 1,r,mla,l,V 0,xri,CH('#'),jinz,V 14,dig,V 0,q,mha,l,V 3,l,V 13,tc,V 1,c,ds,V 1,r,dig,V 0,q,mha,l,V 3,l,V 12,tc,V 1,c,ds,V 1,r};
void*Y605[]={binc,&branch_EVM_invargc,hop,V 1,mca,subc,V 1,binzc,&branch_EVM_invargca,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 0,mla,l,V 0,xri,CH('|'),jinz,V 22,dig,V 0,q,qi,I(1),li,rvec+4,tc,V 2,c,q,mha,l,V 3,l,V 12,tc,V 1,c,ds,V 1,r,mla,l,V 0,xri,CH('#'),jinz,V 14,dig,V 0,q,mha,l,V 3,l,V 13,tc,V 1,c,ds,V 1,r,dig,V 0,q,mha,l,V 3,l,V 12,tc,V 1,c,ds,V 1,r};
void*Y606[]={binc,&branch_EVM_invargc,hop,V 1,mca,subc,V 1,binzc,&branch_EVM_invargca,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 0,mla,l,V 0,xri,CH('|'),jinz,V 14,dig,V 0,q,mha,l,V 3,l,V 14,tc,V 1,c,ds,V 1,r,mla,l,V 0,xri,CH('#'),jinz,V 45,dig,V 0,q,mha,l0,q,qi,W(zero_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jinf,V 22,dig,V 0,q,qi,I(1),li,rvec+5,tc,V 2,c,q,mha,l,V 3,l,V 12,tc,V 1,c,ds,V 1,r,t,Z,ds,V 1,r,dig,V 0,q,mha,l,V 3,l,V 12,tc,V 1,c,ds,V 1,r};
-void*Y607[]={binc,&branch_EVM_invargc,hop,V 15,mca,subc,V 0,binzc,&branch_EVM_invargca,mlt,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(peek_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 0,mla,l,V 0,q,mha,l0,q,qi,W(eof_object_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 4,mla,l,V 0,r,mla,l,V 0,q,mha,l,V 1,l,V 67,tc,V 1,c,jif,V 28,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mha,l,V 2,l,V 2,tc,V 0,c,r,mla,l,V 0,q,mha,l,V 1,l,V 57,tc,V 1,c,jif,V 56,mha,l,V 2,l,V 0,q,mha,l,V 1,l,V 59,q,mha,l0,q,qi,W(read_char_sequence),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,mlt,s,V 1,mla,l,V 1,q,qi,B 400,mha,l0,q,qi,W(stringEQ_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,jif,V 3,t,CH('.'),r,mla,l,V 1,r,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mla,l,V 0,mlt,s,V 2,mla,l,V 2,xri,CH(';'),jinz,V 28,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_line),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mha,l,V 2,l,V 2,tc,V 0,c,r,mla,l,V 2,xri,CH('\''),jiz,V 28,mla,l,V 2,xri,CH('`'),jiz,V 21,mla,l,V 2,xri,CH('@'),jiz,V 14,mla,l,V 2,xri,CH(','),jiz,V 7,mla,l,V 2,xri,CH('|'),jinz,V 227,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(peek_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 3,mla,l,V 3,q,mha,l0,q,qi,W(eof_object_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 17,qi,W(premature_eof),mha,l,V 2,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 3,q,mha,l,V 1,l,V 67,tc,V 1,c,jinf,V 63,mla,l,V 3,xri,CH(';'),jiz,V 56,mla,l,V 3,xri,CH('#'),jinz,V 45,qi,I(2),mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(peek_string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,mlt,s,V 3,mla,l,V 3,q,qi,B 600,mha,l0,q,qi,W(stringEQ_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,j,V 2,t,F,jif,V 33,qi,W(syntax),mla,l,V 0,q,mla,l,V 3,q,mha,l0,q,qi,W(string_append),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 0,mlt,s,V 4,mla,l,V 4,xri,CH('\''),jinz,V 3,t,W(quote),r,mla,l,V 4,xri,CH('`'),jinz,V 3,t,W(quasiquote),r,mla,l,V 4,xri,CH('@'),jinz,V 3,t,W(splicing),r,mla,l,V 4,xri,CH(','),jinz,V 3,t,W(unquote),r,mla,l,V 4,xri,CH('|'),jinz,V 3,t,W(bar),r,t,F,r,mla,l,V 2,xri,CH('#'),jinz,V 925,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(peek_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 5,mla,l,V 5,xri,CH('x'),jiz,V 7,mla,l,V 5,xri,CH('X'),jinz,V 22,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,t,CH('4'),r,mla,l,V 5,xri,CH('/'),jinz,V 52,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,qi,W(PARSED),mha,l,V 2,l,V 0,q,qi,T,mha,l0,q,qi,W(read_external_string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r,mla,l,V 5,q,mha,l,V 1,l,V 41,tc,V 1,c,jif,V 385,mha,l,V 2,l,V 0,q,mha,l,V 1,l,V 41,q,mha,l0,q,qi,W(read_char_sequence),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l0,q,qi,W(string_downcase),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(string2symbol),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 6,mla,l,V 6,mlt,s,V 7,mla,l,V 7,xri,W(t),jiz,V 7,mla,l,V 7,xri,W(true),jinz,V 3,t,BC 313,r,mla,l,V 7,xri,W(f),jiz,V 7,mla,l,V 7,xri,W(false),jinz,V 3,t,BC 314,r,mla,l,V 7,xri,W(b),jinz,V 3,t,CH('1'),r,mla,l,V 7,xri,W(o),jinz,V 3,t,CH('3'),r,mla,l,V 7,xri,W(d),jinz,V 3,t,CH('0'),r,mla,l,V 7,xri,W(u),jinz,V 207,mha,l,V 2,l,V 0,q,mha,l,V 1,l,V 37,q,mha,l0,q,qi,W(read_char_sequence),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l0,q,qi,W(string2integer),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 8,mla,l,V 8,mlt,s,V 9,mla,l,V 9,xri,I(8),jinz,V 89,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,CH('('),jinz,V 3,t,W(u8),r,qi,W(invalid_reader_syntax),qi,B 601,mla,l,V 6,q,mha,l0,q,qi,W(dwim_stringify),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mla,l,V 8,q,mha,l0,q,qi,W(dwim_stringify),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(string_append),t,&NN_dict_ref_2,tc,V 2,c,tc,V 3,c,q,mha,l,V 1,l,V 110,tc,V 2,c,r,qi,W(invalid_reader_syntax),qi,B 601,mla,l,V 6,q,mha,l0,q,qi,W(dwim_stringify),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mla,l,V 8,q,mha,l0,q,qi,W(dwim_stringify),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(string_append),t,&NN_dict_ref_2,tc,V 2,c,tc,V 3,c,q,mha,l,V 1,l,V 110,tc,V 2,c,r,qi,W(invalid_reader_syntax),qi,B 601,mla,l,V 6,q,mha,l0,q,qi,W(dwim_stringify),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(string_append),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 10,mla,l,V 10,xri,CH('<'),jinz,V 27,qi,W(unreadable),qi,B 602,mha,l0,q,qi,W(string_copy),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 10,xri,CH('('),jinz,V 3,t,CH('V'),r,mla,l,V 10,xri,CH('&'),jinz,V 3,t,CH('B'),r,mla,l,V 10,xri,CH('\\'),jinz,V 125,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_character_body),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 11,mla,l,V 11,q,mha,l0,q,qi,W(parse_character_body),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,dig,V 0,jif,V 30,dig,V 0,q,t,T,q,t,F,q,qi,W(PARSED),dig,V 3,q,mha,l,V 1,l,V 78,tc,V 2,c,ds,V 1,ds,V 1,ds,V 1,j,V 2,t,F,ds,V 1,jinf,V 44,qi,W(syntax),qi,B 603,mla,l,V 11,q,mha,l0,q,qi,W(dwim_stringify),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(string_append),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 10,xri,CH('!'),jinz,V 28,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_line),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mha,l,V 2,l,V 2,tc,V 0,c,r,mla,l,V 10,xri,CH('|'),jinz,V 77,t,Q,mlt,s,V 12,t,Q,mlt,s,V 13,t,Q,mlt,s,V 14,t,B 604,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 12,t,B 605,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 13,t,B 606,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 14,qi,I(0),mla,l,V 12,tc,V 1,c,mha,l,V 2,l,V 2,tc,V 0,c,r,qi,W(invalid_reader_syntax),mla,l,V 5,q,mha,l0,q,qi,W(eof_object_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 4,t,B 601,j,V 33,qi,B 601,mla,l,V 5,q,mha,l0,q,qi,W(dwim_stringify),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(string_append),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l0,q,qi,W(string_copy),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 2,xri,CH('"'),jinz,V 33,qi,W(PARSED),mha,l,V 2,l,V 0,q,qi,F,mha,l0,q,qi,W(read_external_string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r,mla,l,V 2,xri,CH('('),jiz,V 21,mla,l,V 2,xri,CH(')'),jiz,V 14,mla,l,V 2,xri,CH('['),jiz,V 7,mla,l,V 2,xri,CH(']'),jinz,V 4,mla,l,V 0,r,qi,W(invalid_char),mla,l,V 0,q,mha,l,V 1,l,V 78,tc,V 2,c,r};
+void*Y607[]={binc,&branch_EVM_invargc,hop,V 15,mca,subc,V 0,binzc,&branch_EVM_invargca,mlt,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(peek_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 0,mla,l,V 0,q,mha,l0,q,qi,W(eof_object_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 4,mla,l,V 0,r,mla,l,V 0,q,mha,l,V 1,l,V 67,tc,V 1,c,jif,V 28,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mha,l,V 2,l,V 2,tc,V 0,c,r,mla,l,V 0,q,mha,l,V 1,l,V 57,tc,V 1,c,jif,V 56,mha,l,V 2,l,V 0,q,mha,l,V 1,l,V 59,q,mha,l0,q,qi,W(read_char_sequence),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,mlt,s,V 1,mla,l,V 1,q,qi,B 400,mha,l0,q,qi,W(stringEQ_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,jif,V 3,t,CH('.'),r,mla,l,V 1,r,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mla,l,V 0,mlt,s,V 2,mla,l,V 2,xri,CH(';'),jinz,V 28,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_line),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mha,l,V 2,l,V 2,tc,V 0,c,r,mla,l,V 2,xri,CH('\''),jiz,V 28,mla,l,V 2,xri,CH('`'),jiz,V 21,mla,l,V 2,xri,CH('@'),jiz,V 14,mla,l,V 2,xri,CH(','),jiz,V 7,mla,l,V 2,xri,CH('|'),jinz,V 227,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(peek_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 3,mla,l,V 3,q,mha,l0,q,qi,W(eof_object_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 17,qi,W(premature_eof),mha,l,V 2,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 3,q,mha,l,V 1,l,V 67,tc,V 1,c,jinf,V 63,mla,l,V 3,xri,CH(';'),jiz,V 56,mla,l,V 3,xri,CH('#'),jinz,V 45,qi,I(2),mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(peek_string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,mlt,s,V 3,mla,l,V 3,q,qi,B 600,mha,l0,q,qi,W(stringEQ_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,j,V 2,t,F,jif,V 33,qi,W(syntax),mla,l,V 0,q,mla,l,V 3,q,mha,l0,q,qi,W(string_append),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 0,mlt,s,V 4,mla,l,V 4,xri,CH('\''),jinz,V 3,t,W(quote),r,mla,l,V 4,xri,CH('`'),jinz,V 3,t,W(quasiquote),r,mla,l,V 4,xri,CH('@'),jinz,V 3,t,W(splicing),r,mla,l,V 4,xri,CH(','),jinz,V 3,t,W(unquote),r,mla,l,V 4,xri,CH('|'),jinz,V 3,t,W(bar),r,t,F,r,mla,l,V 2,xri,CH('#'),jinz,V 942,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(peek_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 5,mla,l,V 5,xri,CH('x'),jiz,V 7,mla,l,V 5,xri,CH('X'),jinz,V 22,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,t,CH('4'),r,mla,l,V 5,xri,CH('/'),jinz,V 52,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,qi,W(PARSED),mha,l,V 2,l,V 0,q,qi,T,mha,l0,q,qi,W(read_external_string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r,mla,l,V 5,q,mha,l,V 1,l,V 41,tc,V 1,c,jif,V 402,mha,l,V 2,l,V 0,q,mha,l,V 1,l,V 41,q,mha,l0,q,qi,W(read_char_sequence),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l0,q,qi,W(string_downcase),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(string2symbol),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 6,mla,l,V 6,mlt,s,V 7,mla,l,V 7,xri,W(t),jiz,V 7,mla,l,V 7,xri,W(true),jinz,V 3,t,BC 313,r,mla,l,V 7,xri,W(f),jiz,V 7,mla,l,V 7,xri,W(false),jinz,V 3,t,BC 314,r,mla,l,V 7,xri,W(u),jiz,V 7,mla,l,V 7,xri,W(unknown),jinz,V 3,t,BC 315,r,mla,l,V 7,xri,W(b),jinz,V 3,t,CH('1'),r,mla,l,V 7,xri,W(o),jinz,V 3,t,CH('3'),r,mla,l,V 7,xri,W(d),jinz,V 3,t,CH('0'),r,mla,l,V 7,xri,W(u),jinz,V 207,mha,l,V 2,l,V 0,q,mha,l,V 1,l,V 37,q,mha,l0,q,qi,W(read_char_sequence),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l0,q,qi,W(string2integer),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 8,mla,l,V 8,mlt,s,V 9,mla,l,V 9,xri,I(8),jinz,V 89,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,CH('('),jinz,V 3,t,W(u8),r,qi,W(invalid_reader_syntax),qi,B 601,mla,l,V 6,q,mha,l0,q,qi,W(dwim_stringify),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mla,l,V 8,q,mha,l0,q,qi,W(dwim_stringify),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(string_append),t,&NN_dict_ref_2,tc,V 2,c,tc,V 3,c,q,mha,l,V 1,l,V 110,tc,V 2,c,r,qi,W(invalid_reader_syntax),qi,B 601,mla,l,V 6,q,mha,l0,q,qi,W(dwim_stringify),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mla,l,V 8,q,mha,l0,q,qi,W(dwim_stringify),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(string_append),t,&NN_dict_ref_2,tc,V 2,c,tc,V 3,c,q,mha,l,V 1,l,V 110,tc,V 2,c,r,qi,W(invalid_reader_syntax),qi,B 601,mla,l,V 6,q,mha,l0,q,qi,W(dwim_stringify),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(string_append),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_char),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 10,mla,l,V 10,xri,CH('<'),jinz,V 27,qi,W(unreadable),qi,B 602,mha,l0,q,qi,W(string_copy),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 10,xri,CH('('),jinz,V 3,t,CH('V'),r,mla,l,V 10,xri,CH('&'),jinz,V 3,t,CH('B'),r,mla,l,V 10,xri,CH('\\'),jinz,V 125,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_character_body),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 11,mla,l,V 11,q,mha,l0,q,qi,W(parse_character_body),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,dig,V 0,jif,V 30,dig,V 0,q,t,T,q,t,F,q,qi,W(PARSED),dig,V 3,q,mha,l,V 1,l,V 78,tc,V 2,c,ds,V 1,ds,V 1,ds,V 1,j,V 2,t,F,ds,V 1,jinf,V 44,qi,W(syntax),qi,B 603,mla,l,V 11,q,mha,l0,q,qi,W(dwim_stringify),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(string_append),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 10,xri,CH('!'),jinz,V 28,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read_line),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mha,l,V 2,l,V 2,tc,V 0,c,r,mla,l,V 10,xri,CH('|'),jinz,V 77,t,Q,mlt,s,V 12,t,Q,mlt,s,V 13,t,Q,mlt,s,V 14,t,B 604,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 12,t,B 605,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 13,t,B 606,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 14,qi,I(0),mla,l,V 12,tc,V 1,c,mha,l,V 2,l,V 2,tc,V 0,c,r,qi,W(invalid_reader_syntax),mla,l,V 5,q,mha,l0,q,qi,W(eof_object_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 4,t,B 601,j,V 33,qi,B 601,mla,l,V 5,q,mha,l0,q,qi,W(dwim_stringify),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(string_append),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l0,q,qi,W(string_copy),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 2,xri,CH('"'),jinz,V 33,qi,W(PARSED),mha,l,V 2,l,V 0,q,qi,F,mha,l0,q,qi,W(read_external_string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l,V 1,l,V 78,tc,V 2,c,r,mla,l,V 2,xri,CH('('),jiz,V 21,mla,l,V 2,xri,CH(')'),jiz,V 14,mla,l,V 2,xri,CH('['),jiz,V 7,mla,l,V 2,xri,CH(']'),jinz,V 4,mla,l,V 0,r,qi,W(invalid_char),mla,l,V 0,q,mha,l,V 1,l,V 78,tc,V 2,c,r};
void*Y608[]={binc,&branch_EVM_invargc,hop,V 3,mca,subc,V 1,binzc,&branch_EVM_invargca,mlt,p,s,V 0,mha,l,V 1,l,V 195,xri,Q,jiz,V 20,mha,l,V 1,l,V 195,mlt,s,V 1,t,Q,mat,mha,l,V 1,st,V 195,mla,l,V 1,r,t,Q,mlt,s,V 2,t,B 607,q,qi,V 2,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 2,mla,l,V 2,tc,V 0,c,r};
void*Y609[]={binc,&branch_EVM_invargc,hop,V 2,mca,subc,V 0,binzc,&branch_EVM_invargca,mha,l,V 2,l,V 0,q,mha,l,V 1,l,V 196,tc,V 1,c,xri,CH('.'),jinz,V 118,mha,l,V 2,l,V 0,q,mha,l,V 1,l,V 197,tc,V 1,c,mha,l,V 2,l,V 0,q,mha,l,V 1,l,V 196,tc,V 1,c,mlt,s,V 0,mla,l,V 0,xri,CH(')'),jinz,V 65,mha,l,V 2,l,V 0,q,mha,l,V 1,l,V 197,tc,V 1,c,mha,l,V 2,l,V 5,q,mha,l,V 2,l,V 4,q,mha,l0,q,qi,W(cdr),t,&NN_dict_ref_2,tc,V 2,c,tc,V -2,c,mha,l,V 2,l,V 1,q,mha,l,V 2,l,V 4,q,mha,l0,q,qi,W(append_reverse),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,r,qi,W(syntax),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,r,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(read),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 1,mla,l,V 1,q,mha,l0,q,qi,W(eof_object_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 18,qi,W(premature_eof),mha,l,V 2,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,j,V 0,mla,l,V 1,q,mha,l,V 1,l,V 97,tc,V 1,c,q,mha,l,V 2,l,V 5,q,dig,V 1,q,mha,l0,q,qi,W(cdr),t,&NN_dict_ref_2,tc,V 2,c,tc,V -2,c,dig,V 0,mat,mha,l,V 2,st,V 5,ds,V 1,mha,l,V 2,l,V 6,tc,V 0,c,r};
void*Y610[]={binc,&branch_EVM_invargc,hop,V 8,mca,subc,V 1,binc,&branch_EVM_invargca,mac,mca,subc,V 3,binnc,&branch_EVM_invargca,mac,mlt,mca,mca,subc,V 1,jizc,V 9,mac,p,s,V 1,p,s,V 0,j,V 8,mac,p,s,V 0,t,Q,s,V 1,mla,l,V 0,q,mha,l,V 1,l,V 196,tc,V 1,c,mlt,s,V 2,mla,l,V 2,q,mha,l0,q,qi,W(eof_object_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 13,qi,W(EOF_INSIDE_LIST),qi,F,mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 2,xri,CH(')'),jinz,V 30,mla,l,V 0,q,mha,l,V 1,l,V 197,tc,V 1,c,mla,l,V 1,q,mha,l0,q,qi,W(reverse),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,r,mla,l,V 2,xri,CH('.'),jinz,V 185,mla,l,V 0,q,mha,l,V 1,l,V 197,tc,V 1,c,mla,l,V 0,q,mha,l0,q,qi,W(read),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 3,mla,l,V 3,q,mha,l0,q,qi,W(eof_object_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 16,qi,W(premature_eof),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,j,V 0,mla,l,V 0,q,mha,l,V 1,l,V 196,tc,V 1,c,xri,CH(')'),jinz,V 54,mla,l,V 1,xri,Q,jinz,V 13,qi,W(syntax),qi,CH(')'),mha,l,V 1,l,V 110,tc,V 2,c,r,mla,l,V 0,q,mha,l,V 1,l,V 197,tc,V 1,c,mla,l,V 1,q,mla,l,V 3,q,mha,l0,q,qi,W(append_reverse),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,r,mla,l,V 3,q,mha,l,V 1,l,V 97,tc,V 1,c,mlt,s,V 4,mla,l,V 4,mlt,s,V 5,t,Q,mlt,s,V 6,t,B 609,q,qi,V 2,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 6,mla,l,V 6,tc,V 0,c,r,mla,l,V 0,q,mha,l0,q,qi,W(read),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 7,mla,l,V 7,q,mha,l0,q,qi,W(eof_object_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 16,qi,W(premature_eof),mla,l,V 0,q,mha,l,V 1,l,V 110,tc,V 2,c,j,V 0,mla,l,V 0,q,mla,l,V 7,q,mla,l,V 1,q,mha,l,V 1,l,V 78,tc,V 2,c,q,mha,l,V 1,l,V 198,tc,V 2,c,r};
@@ -1073,35 +1073,35 @@
void*Y644[]={binc,&branch_EVM_invargc,hop,V 7,mca,subc,V 1,binc,&branch_EVM_invargca,mac,mca,subc,V 3,binnc,&branch_EVM_invargca,mac,mlt,mca,mca,subc,V 1,jizc,V 9,mac,p,s,V 1,p,s,V 0,j,V 8,mac,p,s,V 0,t,F,s,V 1,t,Q,mlt,s,V 2,t,Q,mlt,s,V 3,t,Q,mlt,s,V 4,t,Q,mlt,s,V 5,t,B 643,q,qi,V 2,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 5,mla,l,V 0,q,mla,l,V 5,tc,V 1,c,mlt,s,V 6,mla,l,V 1,jif,V 21,mla,l,V 6,q,mla,l,V 3,q,mla,l,V 4,q,mha,l,V 1,l,V 97,tc,V 3,c,r,mla,l,V 6,r};
void*Y648[]={binc,&branch_EVM_invargc,hop,V 6,mca,subc,V 1,binzc,&branch_EVM_invargca,dig,V 0,q,mha,l0,q,qi,W(procedure_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 18,dig,V 0,q,mha,l0,q,qi,W(meaning),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,j,V 2,t,F,mlt,s,V 0,mla,l,V 0,jif,V 97,mla,l,V 0,mlt,s,V 1,t,T,mlt,s,V 2,mla,l,V 1,q,mha,l,V 1,l,V 79,tc,V 1,c,jif,V 34,mla,l,V 1,q,mha,l0,q,qi,W(dwim_stringify),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(string_append),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,ds,V 1,r,qi,B 645,mla,l,V 1,q,mha,l0,q,qi,W(dwim_stringify),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,qi,B 646,mha,l0,q,qi,W(string_append),t,&NN_dict_ref_2,tc,V 2,c,tc,V 3,c,ds,V 1,r,dig,V 0,q,mha,l0,q,qi,W(origin),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 3,mla,l,V 3,jif,V 82,mla,l,V 3,mlt,s,V 4,t,T,mlt,s,V 5,mla,l,V 4,q,li,rvec+10,tc,V 1,c,ct,l0,q,mha,l0,q,qi,W(structure2string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,qi,B 647,mla,l,V 4,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mha,l0,q,qi,W(structure2string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(string_append),t,&NN_dict_ref_2,tc,V 2,c,tc,V 3,c,ds,V 1,r,t,F,ds,V 1,r};
void*Y649[]={binc,&branch_EVM_invargc,hop,V 2,mca,subc,V 1,binzc,&branch_EVM_invargca,dig,V 0,q,mha,l,V 2,l,V 2,q,mha,l0,q,qi,W(assq),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,mlt,s,V 0,mla,l,V 0,jif,V 156,mla,l,V 0,mlt,s,V 1,qi,CH('#'),mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 1,q,li,rvec+10,tc,V 1,c,ct,l,V 1,jif,V 50,mla,l,V 1,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mha,l0,q,qi,W(integer2string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 3,l,V 0,tc,V 1,c,qi,CH('#'),mha,l,V 3,l,V 0,tc,V 1,c,t,T,ds,V 1,r,mla,l,V 1,q,mha,l,V 2,l,V 3,tc,V 0,c,q,mha,l0,q,qi,W(cdr),t,&NN_dict_ref_2,tc,V 2,c,tc,V -2,c,mla,l,V 1,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mha,l0,q,qi,W(integer2string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 3,l,V 0,tc,V 1,c,qi,CH('='),mha,l,V 3,l,V 0,tc,V 1,c,t,F,ds,V 1,r,t,F,ds,V 1,r};
-void*Y675[]={binc,&branch_EVM_invargc,mca,subc,V 2,binzc,&branch_EVM_invargca,dig,V 1,jif,V 39,dig,V 1,q,mha,l0,q,qi,W(superclass),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,dig,V 1,q,qi,I(1),li,rvec+4,tc,V 2,c,q,mha,l,V 4,l,V 11,tc,V 2,c,ds,V 2,r,dig,V 0,ds,V 2,r};
-void*Y683[]={binc,&branch_EVM_invargc,mca,subc,V 2,binzc,&branch_EVM_invargca,dig,V 1,xri,W(undefined),jinz,V 13,qi,CH('.'),mha,l,V 3,l,V 0,tc,V 1,c,ds,V 2,r,dig,V 1,q,dig,V 1,q,mha,l,V 1,l,V 110,tc,V 2,c,ds,V 2,r};
-void*Y684[]={binc,&branch_EVM_invargc,hop,V 1,mca,subc,V 0,binzc,&branch_EVM_invargca,mha,l,V 4,l,V 0,q,mha,l,V 1,l,V 24,tc,V 1,c,mlt,s,V 0,mla,l,V 0,q,mha,l,V 1,l,V 79,tc,V 1,c,jif,V 35,mla,l,V 0,q,mha,l,V 2,l,V 2,q,mha,l0,q,qi,W(assq),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,xri,F,jinz,V 4,t,T,j,V 2,t,F,j,V 2,t,F,jinf,V 19,mla,l,V 0,xri,Q,jiz,V 12,qi,CH(' '),mha,l,V 3,l,V 0,tc,V 1,c,j,V 0,mla,l,V 0,q,mha,l,V 3,l,V 2,tc,V 1,c,r};
-void*Y687[]={binc,&branch_EVM_invargc,hop,V 12,mca,subc,V 1,binzc,&branch_EVM_invargca,mlt,p,s,V 0,mla,l,V 0,q,mha,l0,q,qi,W(integer_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 27,mla,l,V 0,q,mha,l0,q,qi,W(integer2string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 3,l,V 0,tc,V 1,c,r,mla,l,V 0,q,mha,l0,q,qi,W(rational_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 27,mla,l,V 0,q,mha,l0,q,qi,W(rational2string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 3,l,V 0,tc,V 1,c,r,mla,l,V 0,xri,Q,jinz,V 11,qi,B 650,mha,l,V 3,l,V 0,tc,V 1,c,r,mla,l,V 0,xri,T,jinz,V 11,qi,B 651,mha,l,V 3,l,V 0,tc,V 1,c,r,mla,l,V 0,xri,F,jinz,V 11,qi,B 652,mha,l,V 3,l,V 0,tc,V 1,c,r,mla,l,V 0,q,mha,l,V 1,l,V 121,tc,V 1,c,jif,V 27,mla,l,V 0,q,mha,l0,q,qi,W(symbol2string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 3,l,V 0,tc,V 1,c,r,mla,l,V 0,q,mha,l,V 1,l,V 146,tc,V 1,c,jif,V 54,mla,l,V 0,q,mha,l,V 3,l,V 1,tc,V 1,c,jinf,V 37,qi,CH('#'),mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l0,q,qi,W(vector2list),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 3,l,V 2,tc,V 1,c,r,t,Z,r,mla,l,V 0,q,mha,l,V 1,l,V 139,tc,V 1,c,jif,V 54,mla,l,V 0,q,mha,l,V 3,l,V 1,tc,V 1,c,jinf,V 37,qi,B 653,mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l0,q,qi,W(vector2list),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 3,l,V 2,tc,V 1,c,r,t,Z,r,mla,l,V 0,q,mha,l,V 1,l,V 79,tc,V 1,c,jif,V 361,mla,l,V 0,q,mha,l,V 3,l,V 1,tc,V 1,c,jinf,V 344,mla,l,V 0,q,li,rvec+10,tc,V 1,c,ct,l,V 1,q,mha,l,V 1,l,V 79,tc,V 1,c,jif,V 76,mla,l,V 0,q,mha,l0,q,qi,W(cddr),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,xri,Q,jinz,V 51,mla,l,V 0,q,li,rvec+10,tc,V 1,c,ct,l0,q,qi,BC 322,mha,l0,q,qi,W(assq),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,dig,V 0,jif,V 13,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l,V 1,j,V 2,t,F,ds,V 1,j,V 2,t,F,j,V 2,t,F,mlt,s,V 1,mla,l,V 1,jif,V 50,mla,l,V 1,mlt,s,V 2,t,T,mlt,s,V 3,mla,l,V 2,q,mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l0,q,qi,W(cadr),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 3,l,V 2,tc,V 1,c,r,qi,CH('('),mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,li,rvec+10,tc,V 1,c,ct,l0,q,mha,l,V 3,l,V 2,tc,V 1,c,mla,l,V 0,q,li,rvec+10,tc,V 1,c,ct,l,V 1,mlt,s,V 0,mla,l,V 0,q,mha,l,V 1,l,V 79,tc,V 1,c,jif,V 33,mla,l,V 0,q,mha,l,V 2,l,V 2,q,mha,l0,q,qi,W(assq),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,jinf,V 4,t,T,j,V 2,t,F,j,V 2,t,F,jif,V 47,qi,CH(' '),mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,li,rvec+10,tc,V 1,c,ct,l0,q,mha,l,V 3,l,V 2,tc,V 1,c,mla,l,V 0,q,li,rvec+10,tc,V 1,c,ct,l,V 1,mlt,s,V 0,j,V -98,mla,l,V 0,xri,Q,jiz,V 24,qi,B 654,mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l,V 3,l,V 2,tc,V 1,c,j,V 0,qi,CH(')'),mha,l,V 3,l,V 0,tc,V 1,c,r,t,Z,r,mla,l,V 0,q,mha,l,V 1,l,V 77,tc,V 1,c,jif,V 369,t,CH(' '),mlt,s,V 4,mla,l,V 0,mlt,s,V 5,t,CH(127),mlt,s,V 6,mla,l,V 4,q,mla,l,V 5,jige,V 17,mla,l,V 5,q,mla,l,V 6,jige,V 4,t,T,j,V 2,t,F,j,V 2,t,F,jif,V 23,qi,B 603,mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l,V 3,l,V 0,tc,V 1,c,r,mla,l,V 0,q,mha,l,V 1,l,V 194,q,mha,l0,q,qi,W(rassv),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,mlt,s,V 7,mla,l,V 7,jif,V 56,mla,l,V 7,mlt,s,V 8,t,T,mlt,s,V 9,qi,B 603,mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 8,q,li,rvec+10,tc,V 1,c,ct,l0,q,mha,l0,q,qi,W(symbol2string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 3,l,V 0,tc,V 1,c,r,mla,l,V 0,xri,CH(127),jinz,V 11,qi,B 655,mha,l,V 3,l,V 0,tc,V 1,c,r,mla,l,V 0,q,t,CH(' '),jige,V 49,qi,B 656,mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l,V 1,l,V 30,tc,V 1,c,q,qi,I(64),li,rvec+4,tc,V 2,c,q,mha,l,V 1,l,V 96,tc,V 1,c,q,mha,l,V 3,l,V 0,tc,V 1,c,r,qi,B 657,mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l,V 1,l,V 30,tc,V 1,c,q,qi,I(16),mha,l0,q,qi,W(integer2string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l0,q,qi,W(string_upcase),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 10,qi,I(4),mla,l,V 10,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,li,rvec+5,tc,V 2,c,q,dig,V 0,q,mha,l0,q,qi,W(positive_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 24,dig,V 0,q,qi,CH('0'),mha,l,V 1,l,V 102,tc,V 2,c,q,mha,l,V 3,l,V 0,tc,V 1,c,j,V 0,ds,V 1,mla,l,V 10,q,mha,l,V 3,l,V 0,tc,V 1,c,r,mla,l,V 0,q,mha,l,V 1,l,V 120,tc,V 1,c,jif,V 499,mla,l,V 0,q,mha,l,V 1,l,V 27,tc,V 1,c,jinf,V 28,mla,l,V 0,q,mha,l,V 1,l,V 26,tc,V 1,c,jif,V 12,qi,B 658,mha,l,V 3,l,V 0,tc,V 1,c,j,V 2,t,F,qi,CH('"'),mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,t,I(0),q,dig,V 0,q,dig,V 2,q,li,rvec+15,tc,V 2,c,jif,V 398,mla,l,V 0,q,dig,V 1,q,mha,l,V 1,l,V 114,tc,V 2,c,q,dig,V 0,q,dig,V 0,xri,CH(7),jinz,V 12,qi,B 659,mha,l,V 3,l,V 0,tc,V 1,c,j,V 343,dig,V 0,xri,CH(8),jinz,V 12,qi,B 660,mha,l,V 3,l,V 0,tc,V 1,c,j,V 325,dig,V 0,xri,CH(9),jinz,V 12,qi,B 661,mha,l,V 3,l,V 0,tc,V 1,c,j,V 307,dig,V 0,xri,CH(10),jinz,V 12,qi,B 662,mha,l,V 3,l,V 0,tc,V 1,c,j,V 289,dig,V 0,xri,CH(12),jinz,V 12,qi,B 663,mha,l,V 3,l,V 0,tc,V 1,c,j,V 271,dig,V 0,xri,CH(13),jinz,V 12,qi,B 664,mha,l,V 3,l,V 0,tc,V 1,c,j,V 253,dig,V 0,xri,CH(27),jinz,V 12,qi,B 665,mha,l,V 3,l,V 0,tc,V 1,c,j,V 235,dig,V 0,xri,CH('"'),jinz,V 12,qi,B 666,mha,l,V 3,l,V 0,tc,V 1,c,j,V 217,dig,V 0,xri,CH('\\'),jiz,V 6,dig,V 0,xri,CH('$'),jinz,V 23,qi,CH('\\'),mha,l,V 3,l,V 0,tc,V 1,c,dig,V 1,q,mha,l,V 3,l,V 0,tc,V 1,c,j,V 182,dig,V 1,q,t,CH(' '),jilt,V 14,qi,CH('~'),dig,V 2,jilt,V 4,t,T,j,V 2,t,F,j,V 2,t,F,jif,V 13,dig,V 1,q,mha,l,V 3,l,V 0,tc,V 1,c,j,V 144,qi,B 667,mha,l,V 3,l,V 0,tc,V 1,c,dig,V 1,q,mha,l,V 1,l,V 30,tc,V 1,c,q,qi,I(16),mha,l0,q,qi,W(integer2string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,q,mha,l0,q,qi,W(string_upcase),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,dig,V 0,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,dig,V 0,xri,I(1),jiz,V 6,dig,V 0,xri,I(3),jinz,V 12,qi,CH('0'),mha,l,V 3,l,V 0,tc,V 1,c,j,V 26,dig,V 0,xri,I(2),jinz,V 4,t,T,j,V 2,t,F,jinf,V 12,dig,V 0,xri,I(4),jinz,V 4,t,T,j,V 2,t,F,ds,V 1,dig,V 0,q,mha,l,V 3,l,V 0,tc,V 1,c,qi,CH(']'),mha,l,V 3,l,V 0,tc,V 1,c,ds,V 1,ds,V 1,ds,V 1,dig,V 0,q,qi,I(1),li,rvec+4,tc,V 2,c,bury,V 0,j,V -411,ds,V 1,ds,V 1,qi,CH('"'),mha,l,V 3,l,V 0,tc,V 1,c,r,mla,l,V 0,q,mha,l,V 1,l,V 86,tc,V 1,c,jif,V 47,qi,B 668,mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l0,q,qi,W(stringify_address),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 3,l,V 0,tc,V 1,c,qi,CH('>'),mha,l,V 3,l,V 0,tc,V 1,c,r,mla,l,V 0,q,mha,l0,q,qi,W(procedure_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 102,qi,B 602,mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l,V 1,l,V 108,tc,V 1,c,jif,V 4,t,B 669,j,V 2,t,B 670,q,mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l0,q,qi,W(procedure_remark),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,dig,V 0,jif,V 28,dig,V 0,q,qi,CH(' '),mha,l,V 3,l,V 0,tc,V 1,c,dig,V 0,q,mha,l,V 3,l,V 0,tc,V 1,c,ds,V 1,j,V 0,ds,V 1,qi,CH('>'),mha,l,V 3,l,V 0,tc,V 1,c,r,mla,l,V 0,q,mha,l0,q,qi,W(macro_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 73,qi,B 671,mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l0,q,qi,W(procedure_remark),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,dig,V 0,jif,V 28,dig,V 0,q,qi,CH(' '),mha,l,V 3,l,V 0,tc,V 1,c,dig,V 0,q,mha,l,V 3,l,V 0,tc,V 1,c,ds,V 1,j,V 0,ds,V 1,qi,CH('>'),mha,l,V 3,l,V 0,tc,V 1,c,r,mla,l,V 0,q,mha,l0,q,qi,W(void_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 11,qi,B 672,mha,l,V 3,l,V 0,tc,V 1,c,r,mla,l,V 0,q,mha,l0,q,qi,W(class_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 112,qi,B 673,mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l0,q,qi,W(stringify_address),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 3,l,V 0,tc,V 1,c,qi,B 674,mha,l,V 3,l,V 0,tc,V 1,c,t,Q,mlt,s,V 11,t,B 675,q,qi,V 4,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 11,mla,l,V 0,q,qi,I(0),mla,l,V 11,tc,V 2,c,q,mha,l0,q,qi,W(integer2string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 3,l,V 0,tc,V 1,c,qi,CH('>'),mha,l,V 3,l,V 0,tc,V 1,c,r,mla,l,V 0,q,mha,l,V 1,l,V 138,tc,V 1,c,q,mha,l0,q,qi,W(LTfileGT),t,&NN_dict_ref_2,tc,V 2,c,xors,jinz,V 61,qi,B 676,mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l0,q,qi,W(file_descriptor),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(integer2string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 3,l,V 0,tc,V 1,c,qi,CH('>'),mha,l,V 3,l,V 0,tc,V 1,c,r,mla,l,V 0,q,mha,l,V 1,l,V 95,tc,V 1,c,jif,V 193,mla,l,V 0,q,mha,l0,q,qi,W(file_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 61,qi,B 677,mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l0,q,qi,W(file_descriptor),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(integer2string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 3,l,V 0,tc,V 1,c,qi,CH('>'),mha,l,V 3,l,V 0,tc,V 1,c,r,mla,l,V 0,q,mha,l0,q,qi,W(port_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 47,qi,B 678,mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l0,q,qi,W(stringify_address),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 3,l,V 0,tc,V 1,c,qi,CH('>'),mha,l,V 3,l,V 0,tc,V 1,c,r,qi,B 679,mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l0,q,qi,W(stringify_address),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 3,l,V 0,tc,V 1,c,qi,CH('>'),mha,l,V 3,l,V 0,tc,V 1,c,r,mla,l,V 0,q,mha,l,V 1,l,V 113,tc,V 1,c,jif,V 143,qi,B 680,mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l0,q,qi,W(meaning),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,dig,V 0,jif,V 22,dig,V 0,q,mha,l,V 1,l,V 97,tc,V 1,c,q,mha,l,V 3,l,V 2,tc,V 1,c,j,V 76,mla,l,V 0,q,mha,l0,q,qi,W(stringify_address),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 3,l,V 0,tc,V 1,c,qi,B 681,mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(integer2string),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 3,l,V 0,tc,V 1,c,ds,V 1,qi,CH('>'),mha,l,V 3,l,V 0,tc,V 1,c,r,mla,l,V 0,q,mha,l,V 1,l,V 25,tc,V 1,c,jif,V 64,mla,l,V 0,q,mha,l,V 3,l,V 1,tc,V 1,c,jinf,V 47,qi,B 682,mha,l,V 3,l,V 0,tc,V 1,c,qi,T,t,B 683,q,qi,V 4,qh,ql,li,rvec+19,tc,V 4,c,q,t,B 684,q,qi,V 4,qh,ql,li,rvec+19,tc,V 4,c,q,mha,l,V 1,l,V 28,tc,V 3,c,r,t,Z,r,mla,l,V 0,q,mha,l0,q,qi,W(fluid_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 64,mla,l,V 0,q,mha,l,V 3,l,V 1,tc,V 1,c,jinf,V 47,qi,B 685,mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l0,q,qi,W(stringify_address),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 3,l,V 0,tc,V 1,c,qi,CH('>'),mha,l,V 3,l,V 0,tc,V 1,c,r,t,Z,r,qi,B 686,mha,l,V 3,l,V 0,tc,V 1,c,mla,l,V 0,q,mha,l0,q,qi,W(stringify_address),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 3,l,V 0,tc,V 1,c,qi,CH('>'),mha,l,V 3,l,V 0,tc,V 1,c,r};
-void*Y688[]={binc,&branch_EVM_invargc,hop,V 3,mca,subc,V 1,binzc,&branch_EVM_invargca,mlt,p,s,V 0,t,B 649,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 1,t,Q,mlt,s,V 2,t,B 687,q,qi,V 3,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 2,mha,l,V 2,l,V 1,q,mla,l,V 2,tc,V 1,c,r};
-void*Y689[]={binc,&branch_EVM_i...
[truncated message content] |
|
From: <di...@us...> - 2003-02-28 22:41:21
|
Update of /cvsroot/wisp/wisp/modules In directory sc8-pr-cvs1:/tmp/cvs-serv24163/modules Modified Files: wisptyp.wrti Log Message: created the #unknown special object Index: wisptyp.wrti =================================================================== RCS file: /cvsroot/wisp/wisp/modules/wisptyp.wrti,v retrieving revision 1.21 retrieving revision 1.22 diff -u -d -r1.21 -r1.22 --- wisptyp.wrti 26 Feb 2003 20:20:16 -0000 1.21 +++ wisptyp.wrti 28 Feb 2003 22:39:18 -0000 1.22 @@ -84,6 +84,7 @@ (macro FALSE 19) (macro VOID 27) (macro BOXEMPTY 35) ; not a real value--used only in boxes + (macro UNKNOWN 43) (macro ZERO 7) |
|
From: <di...@us...> - 2003-02-28 22:41:21
|
Update of /cvsroot/wisp/wisp/doc In directory sc8-pr-cvs1:/tmp/cvs-serv24163/doc Modified Files: wisp.vim Log Message: created the #unknown special object Index: wisp.vim =================================================================== RCS file: /cvsroot/wisp/wisp/doc/wisp.vim,v retrieving revision 1.231 retrieving revision 1.232 diff -u -d -r1.231 -r1.232 --- wisp.vim 18 Sep 2002 21:17:46 -0000 1.231 +++ wisp.vim 28 Feb 2003 22:39:17 -0000 1.232 @@ -88,12 +88,14 @@ " Booleans -syn match wispBoolean oneline ,#[tf]$, -syn match wispBoolean oneline ,#[tf][ \t()\[\]],me=e-1 +syn match wispBoolean oneline ,#[tuf]$, +syn match wispBoolean oneline ,#[tuf][ \t()\[\]],me=e-1 syn match wispBoolean oneline ,#true$, syn match wispBoolean oneline ,#true[ \t()\[\]],me=e-1 syn match wispBoolean oneline ,#false$, syn match wispBoolean oneline ,#false[ \t()\[\]],me=e-1 +syn match wispBoolean oneline ,#unknown$, +syn match wispBoolean oneline ,#unknown[ \t()\[\]],me=e-1 " Hilighted words |
|
From: <di...@us...> - 2003-02-28 22:41:03
|
Update of /cvsroot/wisp/wisp/src/native In directory sc8-pr-cvs1:/tmp/cvs-serv24163/src/native Modified Files: base.inc Log Message: created the #unknown special object Index: base.inc =================================================================== RCS file: /cvsroot/wisp/wisp/src/native/base.inc,v retrieving revision 1.99 retrieving revision 1.100 diff -u -d -r1.99 -r1.100 --- base.inc 26 Feb 2003 20:20:20 -0000 1.99 +++ base.inc 28 Feb 2003 22:40:58 -0000 1.100 @@ -493,6 +493,7 @@ %define FALSE 19 %define VOID 27 %define BOXEMPTY 35 ; not a real value--used only in boxes +%define UNKNOWN 43 ;;;; Flag->boolean conversion |
|
From: <di...@us...> - 2003-02-28 22:41:02
|
Update of /cvsroot/wisp/wisp/src/builtin
In directory sc8-pr-cvs1:/tmp/cvs-serv24163/src/builtin
Modified Files:
parser.wisp preproc.wisp tostring.wisp
Log Message:
created the #unknown special object
Index: parser.wisp
===================================================================
RCS file: /cvsroot/wisp/wisp/src/builtin/parser.wisp,v
retrieving revision 1.122
retrieving revision 1.123
diff -u -d -r1.122 -r1.123
--- parser.wisp 18 Sep 2002 21:15:21 -0000 1.122
+++ parser.wisp 28 Feb 2003 22:40:55 -0000 1.123
@@ -154,6 +154,7 @@
(case name
((t true) '(PARSED . #t))
((f false) '(PARSED . #f))
+ ((u unknown) '(PARSED . #u))
((b) #\1)
((o) #\3)
((d) #\0)
Index: preproc.wisp
===================================================================
RCS file: /cvsroot/wisp/wisp/src/builtin/preproc.wisp,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -d -r1.7 -r1.8
--- preproc.wisp 7 Sep 2002 22:00:01 -0000 1.7
+++ preproc.wisp 28 Feb 2003 22:40:56 -0000 1.8
@@ -71,7 +71,8 @@
((or (eq? x '$) (eq? x '$?)) x)
((fit-for-variable-name? x) (list 'GLOBAL x))
(else (raise 'preprocessing-error x))))
- ((or (number? x) (boolean? x) (char? x) (string? x))
+ ((or (number? x) (boolean? x) (char? x) (string? x)
+ (eq? x #u))
`',x)
((vector? x)
(expression (list 'quasiquote
Index: tostring.wisp
===================================================================
RCS file: /cvsroot/wisp/wisp/src/builtin/tostring.wisp,v
retrieving revision 1.82
retrieving revision 1.83
diff -u -d -r1.82 -r1.83
--- tostring.wisp 18 Sep 2002 21:16:49 -0000 1.82
+++ tostring.wisp 28 Feb 2003 22:40:56 -0000 1.83
@@ -114,6 +114,7 @@
((null? s) (emit "()"))
((eq? s #t) (emit "#t"))
((eq? s #f) (emit "#f"))
+ ((eq? s '#u) (emit "#u"))
((symbol? s) (emit (symbol->string s)))
((vector? s) (if (not (check-duplicity s))
(begin
|
|
From: <di...@us...> - 2003-02-26 20:20:59
|
Update of /cvsroot/wisp/wisp/modules In directory sc8-pr-cvs1:/tmp/cvs-serv26624/modules Modified Files: wisptyp.wrti Log Message: s/UNDEF/BOXEMPTY/g Index: wisptyp.wrti =================================================================== RCS file: /cvsroot/wisp/wisp/modules/wisptyp.wrti,v retrieving revision 1.20 retrieving revision 1.21 diff -u -d -r1.20 -r1.21 --- wisptyp.wrti 30 Sep 2002 18:24:55 -0000 1.20 +++ wisptyp.wrti 26 Feb 2003 20:20:16 -0000 1.21 @@ -83,7 +83,7 @@ (macro TRUE 11) (macro FALSE 19) (macro VOID 27) - (macro UNDEF 35) ; not a real value--used only in boxes + (macro BOXEMPTY 35) ; not a real value--used only in boxes (macro ZERO 7) |
|
From: <di...@us...> - 2003-02-26 20:20:29
|
Update of /cvsroot/wisp/wisp/src/native In directory sc8-pr-cvs1:/tmp/cvs-serv26624/src/native Modified Files: base.inc boxes.wth Log Message: s/UNDEF/BOXEMPTY/g Index: base.inc =================================================================== RCS file: /cvsroot/wisp/wisp/src/native/base.inc,v retrieving revision 1.98 retrieving revision 1.99 diff -u -d -r1.98 -r1.99 --- base.inc 18 Sep 2002 21:12:38 -0000 1.98 +++ base.inc 26 Feb 2003 20:20:20 -0000 1.99 @@ -488,11 +488,11 @@ ;;;; Other useful constants -%define NULL 0 -%define TRUE 11 -%define FALSE 19 -%define VOID 27 -%define UNDEF 35 ; not a real value--used only in boxes +%define NULL 0 +%define TRUE 11 +%define FALSE 19 +%define VOID 27 +%define BOXEMPTY 35 ; not a real value--used only in boxes ;;;; Flag->boolean conversion Index: boxes.wth =================================================================== RCS file: /cvsroot/wisp/wisp/src/native/boxes.wth,v retrieving revision 1.10 retrieving revision 1.11 diff -u -d -r1.10 -r1.11 --- boxes.wth 30 Sep 2002 18:24:55 -0000 1.10 +++ boxes.wth 26 Feb 2003 20:20:21 -0000 1.11 @@ -30,12 +30,12 @@ 'RT_box go-discriminate) (native make_box - dup 0 = if UNDEF swap 1+ then + dup 0 = if BOXEMPTY swap 1+ then 'RT_box go-construct-record) (defun box_ref.final believe %eax - dup UNDEF = if drop 'WB_undefined swap go-raise then + dup BOXEMPTY = if drop 'WB_undefined swap go-raise then nip wisp-epilogue) @@ -44,10 +44,10 @@ 'RT_box 1 go-access-slot) (native box_empty dup 1 = argc drop - UNDEF -2 1 stack=! (->reg 0 %ecx) 'N_box_ref jump) + BOXEMPTY -2 1 stack=! (->reg 0 %ecx) 'N_box_ref jump) (native box_empty_huh dup 1 = argc drop <: swap 1 'RT_box 1 go-access-slot :> - UNDEF = ->wisp-bool) + BOXEMPTY = ->wisp-bool) ; vim: ft=worth |
|
From: <di...@us...> - 2003-02-25 20:28:37
|
Update of /cvsroot/wisp/wisp/users/dig
In directory sc8-pr-cvs1:/tmp/cvs-serv16846
Modified Files:
makehello.py
Log Message:
cosmetical fixes
Index: makehello.py
===================================================================
RCS file: /cvsroot/wisp/wisp/users/dig/makehello.py,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -d -r1.12 -r1.13
--- makehello.py 23 Feb 2003 11:05:15 -0000 1.12
+++ makehello.py 25 Feb 2003 20:28:33 -0000 1.13
@@ -86,9 +86,9 @@
sections['.data'] = data
symbols = {}
- hello = Linkie('<')
+ binary = Linkie('<')
memory_boundary = memory_bottom # must be at page boundary
- hello.extend(make_ELF32_header('<'))
+ binary.extend(make_ELF32_header('<'))
symbols['elf/type'] = ET.EXEC
symbols['elf/machine'] = EM.I386
symbols['elf/flags'] = 0 # no flags for ia386
@@ -114,7 +114,7 @@
sections['.shstrtab'].emit_byte(0)
program_header_table = make_ELF32_phtable('<', phentnames)
- symbols['elf/phoff'] = hello.extend(program_header_table)
+ symbols['elf/phoff'] = binary.extend(program_header_table)
symbols['elf/phnum'] = len(phentnames)
for name in shentnames:
@@ -125,14 +125,14 @@
if p_flags <> 0:
symbols[name + '/p_align'] = 0x1000
- hello.align(min(alignment, 0x1000))
+ binary.align(min(alignment, 0x1000))
else:
# No program header entry => not loaded
# thusly no larger alignment necessary.
- hello.align(min(alignment, 4))
+ binary.align(min(alignment, 4))
- hello.place_symbol(name)
- offset = hello.filesz()
+ binary.place_symbol(name)
+ offset = binary.filesz()
if p_flags <> 0:
address = memory_boundary | (offset & 0xFFF)
@@ -155,12 +155,12 @@
symbols[name + '/sh_entsize'] = 0
symbols[name + '/sh_flags'] = guess_shflags(name)
- hello.from_array(section.get_file())
+ binary.from_array(section.get_file())
if address <> None:
for symbol, value in section.get_symbols():
symbols[symbol] = address + value
for symbol, value in section.get_symbols():
- hello.place_symbol(symbol, offset + value) # for dump to work nicely
+ binary.place_symbol(symbol, offset + value) # for dump to work nicely
sofs = sections['.symstr'].filesz()
symbols['.symstr/strings/' + symbol] = sofs
sections['.symstr'].emit_string(symbol)
@@ -173,18 +173,18 @@
sections['.symtab'].emit_wyde(shentnames.index(name) + 1)
for loc, typ, arg in section.get_notes():
- hello.notify_linker(offset + loc, typ, arg)
+ binary.notify_linker(offset + loc, typ, arg)
memory_boundary += section.memsz()
memory_boundary = (memory_boundary + 0xFFF) & ~0xFFF
# create section header table
section_header_table = make_ELF32_shtable('<', shentnames)
- symbols['elf/shoff'] = hello.extend(section_header_table)
+ symbols['elf/shoff'] = binary.extend(section_header_table)
symbols['elf/shnum'] = len(shentnames) + 1
symbols['elf/shstrndx'] = shentnames.index('.shstrtab') + 1
symbols['.symtab/sh_link'] = shentnames.index('.symstr') + 1
- hello.link(symbols)
- return hello
+ binary.link(symbols)
+ return binary
hello = make_executable(text = code, data = data)
hello.dump()
|
|
From: <pi...@us...> - 2003-02-25 08:16:54
|
Update of /cvsroot/wisp/wisp/users/pisi
In directory sc8-pr-cvs1:/tmp/cvs-serv27806
Modified Files:
dialect.pisi.wim
Log Message:
introduced searchpath
Index: dialect.pisi.wim
===================================================================
RCS file: /cvsroot/wisp/wisp/users/pisi/dialect.pisi.wim,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -d -r1.8 -r1.9
--- dialect.pisi.wim 10 Feb 2003 10:50:46 -0000 1.8
+++ dialect.pisi.wim 25 Feb 2003 08:16:51 -0000 1.9
@@ -6,28 +6,28 @@
;;
;;;; @(#) $Id$
+; this file at the moment deals with unix integration so most of the tools
+; are for interacting with the unix environment and acting as a shell
+
(module dialect.pisi)
(export
- forever unix-command)
-
-(use lists strings unix)
+ forever unix-command unix-search-path reaper talk-to-process)
-;;; (forever ...) - do something forever.
-(defmacro (forever . body)
- `(let (loop)
- (hide loop ,@body)
- (loop)))
+(use lists strings unix syscalls)
+;;; this is like $PATH in unix this should be local to callers and threads.. hmm.
+;;; if we get called FROM an existing unix environment we adapt to the existing path
+;;; this way one can set a new sarch path using (set! (unix-search-path) '(..))
+(define *unix-search-path* (make-box '()))
-;;; (executable? /filename/)
+(define (unix-search-path (:= new-path))
+ (if (not :=?)
+ (map string-copy (box-ref *unix-search-path*))
+ (set! (box-ref *unix-search-path*) (map string-copy new-path))))
;;; (unix-command "command with options" (pathref))
-(define (unix-command commando
- (pathlist (cond
- ((env-ref "PATH") =>
- (cut split-by-char #\: <>))
- (else '()))))
+(define (unix-command commando (pathlist (unix-search-path)))
(if (not (any
(lambda (otsikoht)
(try
@@ -43,23 +43,53 @@
)
+
+;;; (forever ...) - do something forever.
+(defmacro (forever . body)
+ `(let (loop)
+ (hide loop ,@body)
+ (loop)))
+
+
+
+;;; reaper - loops and waits
+(define (reaper) (forever
+ (my exitproc (sys:waitpid -1 0)
+ (print "exited: $,[exitproc]\n")))
+)
+
+
+
;;;; Talk-to-process
(define (talk-to-process proc masterproc)
(let* ((pipe-child (sys:pipe))
- (pipe-parent (sys:pipe))
- (child (sys:fork)))
- (if (zero? child)
- ;; child continues
- (begin
- (sys:dup2 (car pipe-parent) 0) (sys:close (cdr pipe-parent))
- (sys:dup2 (cdr pipe-child) 1) (sys:close (car pipe-child))
- (dedicated proc))
- ;; parent
- (my saved-data (cons (sys:dup 0) (sys:dup 1))
- (sys:dup2 (car pipe-child) 0) (sys:close (cdr pipe-child))
- (sys:dup2 (cdr pipe-parent) 1) (sys:close (car pipe-parent))
- (masterproc)
- (sys:dup2 (car saved-data) 0)
- (sys:dup2 (cdr saved-data) 1)
- ))))
+ (pipe-parent (sys:pipe))
+ (child (sys:fork)))
+(if (zero? child)
+;; child continues
+(begin
+(sys:dup2 (car pipe-parent) 0) (sys:close (cdr pipe-parent))
+(sys:dup2 (cdr pipe-child) 1) (sys:close (car pipe-child))
+(dedicated proc))
+;; parent
+(my saved-data (cons (sys:dup 0) (sys:dup 1))
+(sys:dup2 (car pipe-child) 0) (sys:close (cdr pipe-child))
+(sys:dup2 (cdr pipe-parent) 1) (sys:close (car pipe-parent))
+(masterproc)
+(sys:dup2 (car saved-data) 0)
+(sys:dup2 (cdr saved-data) 1)
+))))
+
+
+
+;;; module initalization
+(begin
+;; set the path
+(set! (unix-search-path)
+ (cond
+ ;;; we were called from existing UNIX environment
+ ((env-ref "PATH") => (cut split-by-char #\: <>))
+ ;;; make up a reasonable searchpath
+ (else '("/bin" "/usr/bin" "/sbin" "/usr/sbin"))))
+)
|
|
From: <pi...@us...> - 2003-02-25 01:08:56
|
Update of /cvsroot/wisp/wisp/users/pisi
In directory sc8-pr-cvs1:/tmp/cvs-serv19989
Added Files:
nupp nupuconvert
Log Message:
introduced keyboard event handling
--- NEW FILE: nupp ---
#!/bin/wisp
;; include/linux/input.h in your linux directory should give some hints
;; this is linux, ia32 (as struct input_event is byte order dependent)
;; for some strange reason there's an empty event after each real event
;;
;; usage: nupp </dev/input/event#> - u must know your keyboard interface!
(use dialect.pisi unix lists strings files syscalls)
;;; returns the key symbol
(define (key-symbol keycode)
(case keycode
((0) 'key_reserved)
((1) 'key_esc)
((2) 'key_1)
((3) 'key_2)
((4) 'key_3)
((5) 'key_4)
((6) 'key_5)
((7) 'key_6)
((8) 'key_7)
((9) 'key_8)
((10) 'key_9)
((11) 'key_0)
((12) 'key_minus)
((13) 'key_equal)
((14) 'key_backspace)
((15) 'key_tab)
((16) 'key_q)
((17) 'key_w)
((18) 'key_e)
((19) 'key_r)
((20) 'key_t)
((21) 'key_y)
((22) 'key_u)
((23) 'key_i)
((24) 'key_o)
((25) 'key_p)
((26) 'key_leftbrace)
((27) 'key_rightbrace)
((28) 'key_enter)
((29) 'key_leftctrl)
((30) 'key_a)
((31) 'key_s)
((32) 'key_d)
((33) 'key_f)
((34) 'key_g)
((35) 'key_h)
((36) 'key_j)
((37) 'key_k)
((38) 'key_l)
((39) 'key_semicolon)
((40) 'key_apostrophe)
((41) 'key_grave)
((42) 'key_leftshift)
((43) 'key_backslash)
((44) 'key_z)
((45) 'key_x)
((46) 'key_c)
((47) 'key_v)
((48) 'key_b)
((49) 'key_n)
((50) 'key_m)
((51) 'key_comma)
((52) 'key_dot)
((53) 'key_slash)
((54) 'key_rightshift)
((55) 'key_kpasterisk)
((56) 'key_leftalt)
((57) 'key_space)
((58) 'key_capslock)
((59) 'key_f1)
((60) 'key_f2)
((61) 'key_f3)
((62) 'key_f4)
((63) 'key_f5)
((64) 'key_f6)
((65) 'key_f7)
((66) 'key_f8)
((67) 'key_f9)
((68) 'key_f10)
((69) 'key_numlock)
((70) 'key_scrolllock)
((71) 'key_kp7)
((72) 'key_kp8)
((73) 'key_kp9)
((74) 'key_kpminus)
((75) 'key_kp4)
((76) 'key_kp5)
((77) 'key_kp6)
((78) 'key_kpplus)
((79) 'key_kp1)
((80) 'key_kp2)
((81) 'key_kp3)
((82) 'key_kp0)
((83) 'key_kpdot)
((84) 'key_103rd)
((85) 'key_f13)
((86) 'key_102nd)
((87) 'key_f11)
((88) 'key_f12)
((89) 'key_f14)
((90) 'key_f15)
((91) 'key_f16)
((92) 'key_f17)
((93) 'key_f18)
((94) 'key_f19)
((95) 'key_f20)
((96) 'key_kpenter)
((97) 'key_rightctrl)
((98) 'key_kpslash)
((99) 'key_sysrq)
((100) 'key_rightalt)
((101) 'key_linefeed)
((102) 'key_home)
((103) 'key_up)
((104) 'key_pageup)
((105) 'key_left)
((106) 'key_right)
((107) 'key_end)
((108) 'key_down)
((109) 'key_pagedown)
((110) 'key_insert)
((111) 'key_delete)
((112) 'key_macro)
((113) 'key_mute)
((114) 'key_volumedown)
((115) 'key_volumeup)
((116) 'key_power)
((117) 'key_kpequal)
((118) 'key_kpplusminus)
((119) 'key_pause)
((120) 'key_f21)
((121) 'key_f22)
((122) 'key_f23)
((123) 'key_f24)
((124) 'key_kpcomma)
((125) 'key_leftmeta)
((126) 'key_rightmeta)
((127) 'key_compose)
((128) 'key_stop)
((129) 'key_again)
((130) 'key_props)
((131) 'key_undo)
((132) 'key_front)
((133) 'key_copy)
((134) 'key_open)
((135) 'key_paste)
((136) 'key_find)
((137) 'key_cut)
((138) 'key_help)
((139) 'key_menu)
((140) 'key_calc)
((141) 'key_setup)
((142) 'key_sleep)
((143) 'key_wakeup)
((144) 'key_file)
((145) 'key_sendfile)
((146) 'key_deletefile)
((147) 'key_xfer)
((148) 'key_prog1)
((149) 'key_prog2)
((150) 'key_www)
((151) 'key_msdos)
((152) 'key_coffee)
((153) 'key_direction)
((154) 'key_cyclewindows)
((155) 'key_mail)
((156) 'key_bookmarks)
((157) 'key_computer)
((158) 'key_back)
((159) 'key_forward)
((160) 'key_closecd)
((161) 'key_ejectcd)
((162) 'key_ejectclosecd)
((163) 'key_nextsong)
((164) 'key_playpause)
((165) 'key_previoussong)
((166) 'key_stopcd)
((167) 'key_record)
((168) 'key_rewind)
((169) 'key_phone)
((170) 'key_iso)
((171) 'key_config)
((172) 'key_homepage)
((173) 'key_refresh)
((174) 'key_exit)
((175) 'key_move)
((176) 'key_edit)
((177) 'key_scrollup)
((178) 'key_scrolldown)
((179) 'key_kpleftparen)
((180) 'key_kprightparen)
((181) 'key_intl1)
((182) 'key_intl2)
((183) 'key_intl3)
((184) 'key_intl4)
((185) 'key_intl5)
((186) 'key_intl6)
((187) 'key_intl7)
((188) 'key_intl8)
((189) 'key_intl9)
((190) 'key_lang1)
((191) 'key_lang2)
((192) 'key_lang3)
((193) 'key_lang4)
((194) 'key_lang5)
((195) 'key_lang6)
((196) 'key_lang7)
((197) 'key_lang8)
((198) 'key_lang9)
((200) 'key_playcd)
((201) 'key_pausecd)
((202) 'key_prog3)
((203) 'key_prog4)
((205) 'key_suspend)
((206) 'key_close)
((207) 'key_play)
((208) 'key_fastforward)
((209) 'key_bassboost)
((210) 'key_print)
((211) 'key_hp)
((212) 'key_camera)
((213) 'key_sound)
((214) 'key_question)
((215) 'key_email)
((216) 'key_chat)
((217) 'key_search)
((218) 'key_connect)
((219) 'key_finance)
((220) 'key_sport)
((221) 'key_shop)
((222) 'key_alterase)
((223) 'key_cancel)
((224) 'key_brightnessdown)
((225) 'key_brightnessup)
((226) 'key_media)
((240) 'key_unknown)
((352) 'key_ok)
((353) 'key_select)
((354) 'key_goto)
((355) 'key_clear)
((356) 'key_power2)
((357) 'key_option)
((358) 'key_info)
((359) 'key_time)
((360) 'key_vendor)
((361) 'key_archive)
((362) 'key_program)
((363) 'key_channel)
((364) 'key_favorites)
((365) 'key_epg)
((366) 'key_pvr)
((367) 'key_mhp)
((368) 'key_language)
((369) 'key_title)
((370) 'key_subtitle)
((371) 'key_angle)
((372) 'key_zoom)
((373) 'key_mode)
((374) 'key_keyboard)
((375) 'key_screen)
((376) 'key_pc)
((377) 'key_tv)
((378) 'key_tv2)
((379) 'key_vcr)
((380) 'key_vcr2)
((381) 'key_sat)
((382) 'key_sat2)
((383) 'key_cd)
((384) 'key_tape)
((385) 'key_radio)
((386) 'key_tuner)
((387) 'key_player)
((388) 'key_text)
((389) 'key_dvd)
((390) 'key_aux)
((391) 'key_mp3)
((392) 'key_audio)
((393) 'key_video)
((394) 'key_directory)
((395) 'key_list)
((396) 'key_memo)
((397) 'key_calendar)
((398) 'key_red)
((399) 'key_green)
((400) 'key_yellow)
((401) 'key_blue)
((402) 'key_channelup)
((403) 'key_channeldown)
((404) 'key_first)
((405) 'key_last)
((406) 'key_ab)
((407) 'key_next)
((408) 'key_restart)
((409) 'key_slow)
((410) 'key_shuffle)
((411) 'key_break)
((412) 'key_previous)
((413) 'key_digits)
((414) 'key_teen)
((415) 'key_twen)
((511) 'key_max)
(else (raise 'unknown-keycode keycode))
))
;;; nupp-event
(define (nupp-event source)
(let (loop)
(my event (read-string 16 source)
(my type (unpack-le-integer event[-8 ... -6])
(my code (unpack-le-integer event[-6 ... -4])
(my value (unpack-le-integer event[-4 ...])
(if (or (= type 0) (not (member value '(0 1 2))))
(loop)
`(,(case value ((0) 'release) ((1) 'press) ((2) 'repeat)) ,(key-symbol code))
)))))))
(print "let's go!\n")
(define nupud (open-input-file (first *arglist*)))
(forever
(write (nupp-event nupud))
)
--- NEW FILE: nupuconvert ---
;; generate a nupud.txt file like this:
;; egrep "^#define" /usr/src/linux/include/linux/input.h | grep KEY_
;;
;;
(use strings files lists)
(define nupud.txt (read-all-lines (open-input-file "nupud.txt")))
(define nupud.wd (open-output-file "nupud.wd"))
(map (lambda (napp) (write napp nupud.wd) (newline nupud.wd))
(collect (lambda (emit)
(map (lambda (nupp)
(my tera (string->word-list nupp )
(emit `((
,(cond
((string-starts-with? "0x" (third tera))
(string->integer (string-drop-prefix "0x" (third tera)) 16))
; usual integer
(else (string->integer (third tera)))
))
',(string->symbol (string-downcase (second tera)))
))))nupud.txt))))
|
|
From: <di...@us...> - 2003-02-23 11:05:18
|
Update of /cvsroot/wisp/wisp/users/dig
In directory sc8-pr-cvs1:/tmp/cvs-serv10809
Modified Files:
makehello.py
Log Message:
extracted |make_executable| from the root level source
Index: makehello.py
===================================================================
RCS file: /cvsroot/wisp/wisp/users/dig/makehello.py,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -d -r1.11 -r1.12
--- makehello.py 17 Feb 2003 20:27:18 -0000 1.11
+++ makehello.py 23 Feb 2003 11:05:15 -0000 1.12
@@ -18,8 +18,6 @@
m.place_symbol(name)
return m
-sections = {}
-
code = Linkie('<') # ia32
code.place_symbol('_start')
code.emit_byte(0xBA); code.emit_tetra(14) # mov edx, 14
@@ -31,11 +29,9 @@
code.emit_byte(0xB8); code.emit_tetra(1) # mov eax, 1
code.emit_byte(0xCD); code.emit_byte(0x80) # int 0x80
-sections['.text'] = code; del code
-
-sections['.data'] = Linkie('<') # ia32
-sections['.data'].place_symbol('message')
-sections['.data'].emit_string('Hello, world!\n')
+data = Linkie('<') # ia32
+data.place_symbol('message')
+data.emit_string('Hello, world!\n')
def infer_by_prefix (name, dict):
for l in range(len(name), -1, -1):
@@ -84,106 +80,113 @@
if 'x' in flags: p_flags |= PF.X
return p_flags
-symbols = {}
+def make_executable (text = None, data = None, memory_bottom = 0x08048000):
+ sections = {}
+ sections['.text'] = code
+ sections['.data'] = data
-hello = Linkie('<')
-memory_boundary = 0x8048000 # must be at page boundary
-hello.extend(make_ELF32_header('<'))
-symbols['elf/type'] = ET.EXEC
-symbols['elf/machine'] = EM.I386
-symbols['elf/flags'] = 0 # no flags for ia386
+ symbols = {}
+ hello = Linkie('<')
+ memory_boundary = memory_bottom # must be at page boundary
+ hello.extend(make_ELF32_header('<'))
+ symbols['elf/type'] = ET.EXEC
+ symbols['elf/machine'] = EM.I386
+ symbols['elf/flags'] = 0 # no flags for ia386
-shentnames = ['.text', '.data', '.symstr', '.symtab', '.shstrtab']
+ shentnames = ['.text', '.data', '.symstr', '.symtab', '.shstrtab']
-sections['.shstrtab'] = Linkie('<')
-sections['.shstrtab'].emit_byte(0)
+ sections['.shstrtab'] = Linkie('<')
+ sections['.shstrtab'].emit_byte(0)
-sections['.symstr'] = Linkie('<')
-sections['.symstr'].emit_byte(0)
+ sections['.symstr'] = Linkie('<')
+ sections['.symstr'].emit_byte(0)
-sections['.symtab'] = Linkie('<')
-sections['.symtab'].align(4)
-sections['.symtab'].emit_string('\0' * 16)
+ sections['.symtab'] = Linkie('<')
+ sections['.symtab'].align(4)
+ sections['.symtab'].emit_string('\0' * 16)
-phentnames = []
-for name in shentnames:
- if guess_pflags(name) <> 0:
- phentnames.append(name)
- symbols['.shstrtab/strings/' + name] = sections['.shstrtab'].filesz()
- sections['.shstrtab'].emit_string(name)
- sections['.shstrtab'].emit_byte(0)
+ phentnames = []
+ for name in shentnames:
+ if guess_pflags(name) <> 0:
+ phentnames.append(name)
+ symbols['.shstrtab/strings/' + name] = sections['.shstrtab'].filesz()
+ sections['.shstrtab'].emit_string(name)
+ sections['.shstrtab'].emit_byte(0)
-program_header_table = make_ELF32_phtable('<', phentnames)
-symbols['elf/phoff'] = hello.extend(program_header_table)
-symbols['elf/phnum'] = len(phentnames)
+ program_header_table = make_ELF32_phtable('<', phentnames)
+ symbols['elf/phoff'] = hello.extend(program_header_table)
+ symbols['elf/phnum'] = len(phentnames)
-for name in shentnames:
- section = sections[name]
- p_flags = guess_pflags(name)
- alignment = section.get_alignment()
- symbols[name + '/sh_align'] = alignment
+ for name in shentnames:
+ section = sections[name]
+ p_flags = guess_pflags(name)
+ alignment = section.get_alignment()
+ symbols[name + '/sh_align'] = alignment
- if p_flags <> 0:
- symbols[name + '/p_align'] = 0x1000
- hello.align(min(alignment, 0x1000))
- else:
- # No program header entry => not loaded
- # thusly no larger alignment necessary.
- hello.align(min(alignment, 4))
+ if p_flags <> 0:
+ symbols[name + '/p_align'] = 0x1000
+ hello.align(min(alignment, 0x1000))
+ else:
+ # No program header entry => not loaded
+ # thusly no larger alignment necessary.
+ hello.align(min(alignment, 4))
- hello.place_symbol(name)
- offset = hello.filesz()
+ hello.place_symbol(name)
+ offset = hello.filesz()
- if p_flags <> 0:
- address = memory_boundary | (offset & 0xFFF)
- # take into account alignments larger than a page
- address = (address + alignment - 1) & ~(alignment - 1)
- symbols[name + '/p_flags'] = guess_pflags(name)
- symbols[name + '/p_type'] = guess_ptype(name)
- symbols[name] = address
- else:
- address = None
- symbols[name] = 0
+ if p_flags <> 0:
+ address = memory_boundary | (offset & 0xFFF)
+ # take into account alignments larger than a page
+ address = (address + alignment - 1) & ~(alignment - 1)
+ symbols[name + '/p_flags'] = guess_pflags(name)
+ symbols[name + '/p_type'] = guess_ptype(name)
+ symbols[name] = address
+ else:
+ address = None
+ symbols[name] = 0
- symbols[name + '/offset'] = offset
- symbols[name + '/memsz'] = section.memsz()
- symbols[name + '/filesz'] = section.filesz()
- symbols[name + '/sh_size'] = section.filesz()
- symbols[name + '/sh_type'] = guess_shtype(name)
- symbols[name + '/sh_info'] = 0
- symbols[name + '/sh_link'] = SHN.UNDEF
- symbols[name + '/sh_entsize'] = 0
- symbols[name + '/sh_flags'] = guess_shflags(name)
+ symbols[name + '/offset'] = offset
+ symbols[name + '/memsz'] = section.memsz()
+ symbols[name + '/filesz'] = section.filesz()
+ symbols[name + '/sh_size'] = section.filesz()
+ symbols[name + '/sh_type'] = guess_shtype(name)
+ symbols[name + '/sh_info'] = 0
+ symbols[name + '/sh_link'] = SHN.UNDEF
+ symbols[name + '/sh_entsize'] = 0
+ symbols[name + '/sh_flags'] = guess_shflags(name)
- hello.from_array(section.get_file())
- if address <> None:
+ hello.from_array(section.get_file())
+ if address <> None:
+ for symbol, value in section.get_symbols():
+ symbols[symbol] = address + value
for symbol, value in section.get_symbols():
- symbols[symbol] = address + value
- for symbol, value in section.get_symbols():
- hello.place_symbol(symbol, offset + value) # for dump to work nicely
- sofs = sections['.symstr'].filesz()
- symbols['.symstr/strings/' + symbol] = sofs
- sections['.symstr'].emit_string(symbol)
- sections['.symstr'].emit_byte(0)
- sections['.symtab'].emit_tetra(sofs)
- sections['.symtab'].emit_tetra_sum([name])
- sections['.symtab'].emit_tetra(0)
- sections['.symtab'].emit_byte(STB.GLOBAL << 4 | STT.NOTYPE)
- sections['.symtab'].emit_byte(0)
- sections['.symtab'].emit_wyde(shentnames.index(name) + 1)
+ hello.place_symbol(symbol, offset + value) # for dump to work nicely
+ sofs = sections['.symstr'].filesz()
+ symbols['.symstr/strings/' + symbol] = sofs
+ sections['.symstr'].emit_string(symbol)
+ sections['.symstr'].emit_byte(0)
+ sections['.symtab'].emit_tetra(sofs)
+ sections['.symtab'].emit_tetra_sum([name])
+ sections['.symtab'].emit_tetra(0)
+ sections['.symtab'].emit_byte(STB.GLOBAL << 4 | STT.NOTYPE)
+ sections['.symtab'].emit_byte(0)
+ sections['.symtab'].emit_wyde(shentnames.index(name) + 1)
- for loc, typ, arg in section.get_notes():
- hello.notify_linker(offset + loc, typ, arg)
- memory_boundary += section.memsz()
- memory_boundary = (memory_boundary + 0xFFF) & ~0xFFF
+ for loc, typ, arg in section.get_notes():
+ hello.notify_linker(offset + loc, typ, arg)
+ memory_boundary += section.memsz()
+ memory_boundary = (memory_boundary + 0xFFF) & ~0xFFF
-# create section header table
-section_header_table = make_ELF32_shtable('<', shentnames)
-symbols['elf/shoff'] = hello.extend(section_header_table)
-symbols['elf/shnum'] = len(shentnames) + 1
-symbols['elf/shstrndx'] = shentnames.index('.shstrtab') + 1
-symbols['.symtab/sh_link'] = shentnames.index('.symstr') + 1
-hello.link(symbols)
+ # create section header table
+ section_header_table = make_ELF32_shtable('<', shentnames)
+ symbols['elf/shoff'] = hello.extend(section_header_table)
+ symbols['elf/shnum'] = len(shentnames) + 1
+ symbols['elf/shstrndx'] = shentnames.index('.shstrtab') + 1
+ symbols['.symtab/sh_link'] = shentnames.index('.symstr') + 1
+ hello.link(symbols)
+ return hello
+
+hello = make_executable(text = code, data = data)
hello.dump()
f = open('hello', 'w')
|
|
From: <pi...@us...> - 2003-02-22 22:57:24
|
Update of /cvsroot/wisp/wisp/users/pisi/winix/beast In directory sc8-pr-cvs1:/tmp/cvs-serv30926 Modified Files: Makefile Log Message: beast-initrd/ Index: Makefile =================================================================== RCS file: /cvsroot/wisp/wisp/users/pisi/winix/beast/Makefile,v retrieving revision 1.2 retrieving revision 1.3 diff -u -d -r1.2 -r1.3 --- Makefile 22 Feb 2003 22:46:15 -0000 1.2 +++ Makefile 22 Feb 2003 22:57:21 -0000 1.3 @@ -15,7 +15,7 @@ rdev ./beast-eltorito/boot/kernel /dev/rd/0 touch .kernel - +# generate the romfs for initrd beast.initrd: beast-initrd/linuxrc @printf "**********\nINITRD\n**********\n" chown -R root.root beast-initrd @@ -24,6 +24,7 @@ gzip -9 beast.initrdfs mv beast.initrdfs.gz beast.initrd +# create the eltorito boot media beast.eltorito: beast.initrd .kernel ./beast-eltorito/boot/grub/menu.lst @printf "**********\nBOOT DISK\n**********\n" dd if=/dev/zero of=beast.eltorito bs=1024 count=2880 @@ -44,7 +45,7 @@ flesh: @printf "**********\nFLESH\n**********\n" - genromfs -d beast-flesh -f beast.flesh + genromfs -d beast-flesh -f beast.flesh -V 'The Beast' |
|
From: <pi...@us...> - 2003-02-22 22:46:18
|
Update of /cvsroot/wisp/wisp/users/pisi/winix/beast
In directory sc8-pr-cvs1:/tmp/cvs-serv27746
Modified Files:
Makefile
Log Message:
cosmetics
Index: Makefile
===================================================================
RCS file: /cvsroot/wisp/wisp/users/pisi/winix/beast/Makefile,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- Makefile 22 Feb 2003 22:16:55 -0000 1.1
+++ Makefile 22 Feb 2003 22:46:15 -0000 1.2
@@ -16,43 +16,43 @@
touch .kernel
-beast.initrd: beast-initrd/linuxrc beast-initrd/busybox/busybox
+beast.initrd: beast-initrd/linuxrc
@printf "**********\nINITRD\n**********\n"
chown -R root.root beast-initrd
- chmod 755 beast-initrd/linuxrc beast-initrd/busybox/busybox
- genromfs -d beast-initrd -f beast.initrdfs
- gzip -9 beast.initrdfs
+ chmod 755 beast-initrd/linuxrc
+ genromfs -d beast-initrd -f beast.initrdfs -V 'The Beast fleshfinder'
+ gzip -9 beast.initrdfs
mv beast.initrdfs.gz beast.initrd
beast.eltorito: beast.initrd .kernel ./beast-eltorito/boot/grub/menu.lst
@printf "**********\nBOOT DISK\n**********\n"
-# dd if=/dev/zero of=beast.eltorito bs=1024 count=2880
+ dd if=/dev/zero of=beast.eltorito bs=1024 count=2880
cp beast.initrd ./beast-eltorito/initrd.gz
mkdir bootdisk.tmp
losetup $(LOOPDEV) beast.eltorito
-# mkfs.minix $(LOOPDEV)
+ mkfs.minix $(LOOPDEV)
mount -t minix $(LOOPDEV) ./bootdisk.tmp
-# cp -a beast-eltorito/* ./bootdisk.tmp/
- cp ./beast-eltorito/initrd.gz ./bootdisk.tmp/
+ cp -a beast-eltorito/* ./bootdisk.tmp/
+# cp ./beast-eltorito/initrd.gz ./bootdisk.tmp/
# cp ./beast-eltorito/boot/kernel ./bootdisk.tmp/boot/kernel
sync
umount ./bootdisk.tmp
-# grub --batch < misc/grubify >/dev/null 2>&1
+ grub --batch < misc/grubify >/dev/null 2>&1
losetup -d $(LOOPDEV)
rmdir bootdisk.tmp
touch beast.eltorito
flesh:
@printf "**********\nFLESH\n**********\n"
- genromfs -d flesh-beast -f flesh
+ genromfs -d beast-flesh -f beast.flesh
beast.iso: beast.eltorito flesh
@printf "**********\nISO IMAGE\n**********\n"
- cp beast.eltorito beast-cdrom/boot.bin
- cp beast.flesh beast-cdrom/flesh
- mkisofs -J -R -b boot.bin -o beast.iso -V "The Beast" beast-cdrom
+ cp beast.eltorito beast-media/boot.bin
+ cp beast.flesh beast-media/flesh
+ mkisofs -J -R -b boot.bin -o beast.iso -V "The Beast" beast-media
# do the grownups thing to beastmama
love: beast.iso
@@ -76,8 +76,11 @@
lilo -C /tmp/lilo.conf.beast.$$
rm -f /tmp/lilo.conf.beast.$$
-clean: dataclean binclean
- rm -f beast.iso beast.initrd beast.flesh
+nice:
+ find -type f -name '*~' -print -exec rm '{}' ';'
+
+clean: dataclean binclean nice
+ rm -f beast.iso beast.initrd beast.flesh beast.eltorito
dataclean:
rm -f .flesh .initrd .cdrom
binclean:
|
|
From: <pi...@us...> - 2003-02-22 22:44:40
|
Update of /cvsroot/wisp/wisp/users/pisi/winix/beast/kernel-2.5 In directory sc8-pr-cvs1:/tmp/cvs-serv27186/kernel-2.5 Log Message: Directory /cvsroot/wisp/wisp/users/pisi/winix/beast/kernel-2.5 added to the repository |
|
From: <pi...@us...> - 2003-02-22 22:30:27
|
Update of /cvsroot/wisp/wisp/users/pisi/winix/beast/misc
In directory sc8-pr-cvs1:/tmp/cvs-serv22718/misc
Added Files:
grubify lilo.conf
Log Message:
no comments
--- NEW FILE: grubify ---
device (fd0) /dev/loop/7
root (fd0)
setup (fd0)
--- NEW FILE: lilo.conf ---
image=/beast/kernel
optional
label="Beast"
read-only
root="/dev/rd/0"
initrd="/beast/initrd"
append="debug"
|
|
From: <pi...@us...> - 2003-02-22 22:26:39
|
Update of /cvsroot/wisp/wisp/users/pisi/winix/beast/misc In directory sc8-pr-cvs1:/tmp/cvs-serv21285/misc Log Message: Directory /cvsroot/wisp/wisp/users/pisi/winix/beast/misc added to the repository |
|
From: <pi...@us...> - 2003-02-22 22:24:47
|
Update of /cvsroot/wisp/wisp/users/pisi/winix/beast/beast-media In directory sc8-pr-cvs1:/tmp/cvs-serv20665/beast-media Added Files: readme.txt Log Message: minimal boot media skeleton --- NEW FILE: readme.txt --- This is the Beast! To see how he can jump boot from this cd. Send beer&pizza to: Andres Soolo - for Wisp Linus Torvalds - for Linux Martin Paljak - for feeding the Beast countless starving ppl around the world - for better life |
|
From: <pi...@us...> - 2003-02-22 22:24:15
|
Update of /cvsroot/wisp/wisp/users/pisi/winix/beast/beast-media/dev In directory sc8-pr-cvs1:/tmp/cvs-serv20477/dev Log Message: Directory /cvsroot/wisp/wisp/users/pisi/winix/beast/beast-media/dev added to the repository |
