Warning: file_get_contents(https://raw.githubusercontent.com/Den1xxx/Filemanager/master/languages/ru.json): failed to open stream: HTTP request failed! HTTP/1.1 404 Not Found
in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 88
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 215
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 216
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 217
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 218
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 219
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 220
GOOF----LE-8-2.0Y& ]p 4 h. ] g guile g define-module* g language g tree-il g filenameS
f language/tree-il.scm g importsS g srfi
g srfi-1
g srfi-11 g system g base g pmatch g syntax g exportsS g tree-il-src g g void? g make-void !g void-src "g #g const? $g
make-const %g const-src &g const-exp 'g (g primitive-ref? )g make-primitive-ref *g primitive-ref-src +g primitive-ref-name ,g
-g lexical-ref? .g make-lexical-ref /g lexical-ref-src 0g lexical-ref-name 1g lexical-ref-gensym 2g
3g lexical-set? 4g make-lexical-set 5g lexical-set-src 6g lexical-set-name 7g lexical-set-gensym 8g lexical-set-exp 9g :g module-ref? ;g make-module-ref g module-ref-name ?g module-ref-public? @g Ag module-set? Bg make-module-set Cg module-set-src Dg module-set-mod Eg module-set-name Fg module-set-public? Gg module-set-exp Hg Ig
toplevel-ref? Jg make-toplevel-ref Kg toplevel-ref-src Lg toplevel-ref-name Mg Ng
toplevel-set? Og make-toplevel-set Pg toplevel-set-src Qg toplevel-set-name Rg toplevel-set-exp Sg Tg toplevel-define? Ug make-toplevel-define Vg toplevel-define-src Wg toplevel-define-name Xg toplevel-define-exp Yg
Zg conditional? [g make-conditional \g conditional-src ]g conditional-test ^g conditional-consequent _g conditional-alternate `g
ag application? bg make-application cg application-src dg application-proc eg application-args fg
gg sequence? hg
make-sequence ig sequence-src jg
sequence-exps kg lg lambda? mg make-lambda ng
lambda-src og lambda-meta pg lambda-body qg
rg lambda-case? sg make-lambda-case tg lambda-case-src ug lambda-case-req vg lambda-case-opt wg lambda-case-rest xg lambda-case-kw yg lambda-case-inits zg lambda-case-gensyms {g lambda-case-body |g lambda-case-alternate }g ~g let? g make-let g let-src g let-names g let-gensyms g let-vals g let-body g g letrec? g make-letrec g
letrec-src g letrec-in-order? g letrec-names g letrec-gensyms g letrec-vals g letrec-body g g fix? g make-fix g fix-src g fix-names g fix-gensyms g fix-vals g fix-body g g let-values? g make-let-values g let-values-src g let-values-exp g let-values-body g g dynwind? g make-dynwind g dynwind-src g dynwind-winder g dynwind-body g dynwind-unwinder g g dynlet? g make-dynlet g
dynlet-src g
dynlet-fluids g dynlet-vals g dynlet-body g g dynref? g make-dynref g
dynref-src g dynref-fluid g g dynset? g make-dynset g
dynset-src g dynset-fluid g
dynset-exp g g prompt? g make-prompt g
prompt-src g
prompt-tag g prompt-body g prompt-handler g g abort? g
make-abort g abort-src g abort-tag g
abort-args g
abort-tail g
parse-tree-il g unparse-tree-il g tree-il->scheme g tree-il-fold g make-tree-il-folder g post-order! g
pre-order! g tree-il=? g tree-il-hash !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~ g set-current-module g format f
# g
print-tree-il g make-syntax-transformer g borrow-core-vtables g macro g $sc-dispatch g _ g
vector-length g %expanded-vtables g vtable-offset-user g map g
datum->syntax g
symbol-append g < g > g make- g ? g - g any g
syntax-object g define g top g ribcage g t-9d61459b896-a19 g t-9d61459b896-a17 g t-9d61459b896-a18 g m-9d61459b896-a1a f l-9d61459b896-a1e f l-9d61459b896-a1f f l-9d61459b896-a20 g acc f l-9d61459b896-a15 g lp g n g fields g out f l-9d61459b896-9e1 f l-9d61459b896-9e2
f l-9d61459b896-9e3 f l-9d61459b896-9e4
g pred f l-9d61459b896-9df g ctor f l-9d61459b896-9dd g type f l-9d61459b896-9db g sfields f l-9d61459b896-9d7 ! " #f l-9d61459b896-9d5 $# %"$ &g stem '& (f l-9d61459b896-9d3 )( *') +g vtable ,+ -f l-9d61459b896-9d1 .- /,. 0 1 2f l-9d61459b896-9ca 3f l-9d61459b896-9cb 4f l-9d61459b896-9cc 5234 6015 7g x 87 9f l-9d61459b896-9c7 :9 ;8: <
!%*/6; =g hygiene >= ?<> @g make-procedure-with-setter A@<> Bg lambda CB<> D7<> ED Fg
struct-ref GF<> Hg v IH<> JDI Kg struct-set! LK<> MI Ng syntax-violation ON PN Qf -source expression failed to match any pattern Rg each-any SRR Tg t-9d61459b896-9ea Ug t-9d61459b896-9e9 Vg t-9d61459b896-9ec Wg t-9d61459b896-9eb XTUVW Yg m-9d61459b896-9ed ZY [ZZZZ \f l-9d61459b896-9f1 ]f l-9d61459b896-9f2 ^f l-9d61459b896-9f3 _f l-9d61459b896-9f4 `\]^_ aX[` ba !%*/6; cb> dg make-struct edb> f
b> g hg t-9d61459b896-9fb ig t-9d61459b896-9fc jhi kg m-9d61459b896-9fd lk mll nf l-9d61459b896-a01 of l-9d61459b896-a02 pno qjmp rq !%*/6; sr> t7r> ut vg and wvr> xg struct? yxr> zyt {g eq? |{r> }g
struct-vtable ~}r> ~t g t-9d61459b896-a05 g m-9d61459b896-a06 f l-9d61459b896-a09 !%*/6; K> g vtable-index-printer > > g t-9d61459b896-a0c g t-9d61459b896-a0b g m-9d61459b896-a0d f l-9d61459b896-a11 f l-9d61459b896-a12 !%*/6; > g
vector-ref > > g reverse g begin g t-9d61459b896-a24 g m-9d61459b896-a25 f l-9d61459b896-a29 6; > g make-record-type f g src g names g gensyms g vals g body g record-predicate g record-accessor g record-modifier f g exp f g winder g unwinder f g fluid f f g tag g handler f g args g tail g source-properties g location g abort g error f unrecognized tree-il g prompt g dynset g dynref g dynlet g dynwind g
let-values g fix g letrec* g letrec g let g const g lambda-case g and=> g set! g toplevel g @@ g and-map g symbol? g @ g lexical g primitive g if g apply g void f unhandled record g scheme g decompile-tree-il g fold R g dummy g seed g m-9d61459b896-1211 f l-9d61459b896-1216 f l-9d61459b896-1217 f l-9d61459b896-1213 8 B> g tree > g down > g up > > g fold-values > g proc
> g exps >
> g null? > g values > > g car > g cdr > > g foldts > g list !g let*-values "!> #g record-case $#> %2> &> '%& (@> )(& *M> +*& ,S> -,& .Y> /g test 0/> 1g
consequent 21> 3g alternate 43> 5.024 6`> 7> 86
7 9f> :9 ;k> <> =;< >q> ?g inits @?> A>@<4 B}> C> DBC< E> FEC< G> HGC< I> JI&< K> L> M> NK<LM O> Pg fluids QP> ROQC< S> T> UST V> WVT& X> Y> Z> [XY<Z \> ]> ^\Y7] _g else `_> ag setter ba ca dg
string-length eg symbol->string fg
struct-layout gg struct-nfields hg hash-bits ig make-variable-transformer jg identifier? kg logcount lg most-positive-fixnum mg hashq ng max og hashC 5h ]4
5 4 > " G h ]4 56 g exp
g port g filenamef language/tree-il.scm
B
C C C g nameg
print-tree-il CR4 h _ ]L 6 W g f
g filenamef language/tree-il.scm
P "
P .
C?ACEGDJLM
h8 w ] C o g t-9d61459b896-a19
1 g t-9d61459b896-a17 1 g t-9d61459b896-a18 1 1 CPQScef h ] C g t-9d61459b896-9ea
g t-9d61459b896-9e9 g t-9d61459b896-9ec g t-9d61459b896-9eb Cgsuwz| h X ] C P g t-9d61459b896-9fb
g t-9d61459b896-9fc C h X ] C P g t-9d61459b896-a0c
g t-9d61459b896-a0b CR h 9 ] C1 g t-9d61459b896-a24
C h ]x" 45$
4L O 5 4L 4 55 4L 4
55 4L 4 55 " n
( "
4L 4
55
4
5 $ 4?"
4
5
"
4
5
$ 4
?"
4 5
4
5
$ 4
?"
4 5
4
5
$ 4
?"
4 5
" "@45 4
5 $ @6
"
g n
g out g vtable g stem % g fields / g sfields ? g type S g ctor e g pred w g n } g fields
} g out } g acc g tmp
g tmp g tmp ' g tmp
$ g tmp . \ g tmp
9 Y g tmp k g tmp
v g tmp g tmp g filenamef language/tree-il.scm I J J
J K L L $ M 1 % M % L . N 3 / N / L 2 O ! ? L B R G R / K R > O R F Q R / S R S L V S [ S / _ S > c S / e S e L h T m T / s T C u T / w T w L } U a c d e ( f + f ? f B f + e ( e g & g c U W # . Y # k ^ # V ! U K
l l I I I =
CPQ h( g ] 4 5 $ O @ 6 _ g x
' g tmp ' g filenamef language/tree-il.scm
F ' C5Ri
R iii h h ] $ CC ` g x
g filenamef language/tree-il.scm
n
g nameg void? C R h n ] C f g src
g filenamef language/tree-il.scm
n
g nameg make-void C R4@i h V ]
C N g x
g filenamef language/tree-il.scm
n
Ch e ]
C ] g x
g v g filenamef language/tree-il.scm
n
C5!Ri "R"iii" h i ] $ CC a g x
g filenamef language/tree-il.scm
n
g nameg const? C#R" h ] C x g src
g exp g filenamef language/tree-il.scm
n
g nameg
make-const C$R4@i h V ]
C N g x
g filenamef language/tree-il.scm
n
Ch e ]
C ] g x
g v g filenamef language/tree-il.scm
n
C5%R4@i h V ] C N g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v g filenamef language/tree-il.scm
n
C5&Ri 'R'iii' h q ] $ CC i g x
g filenamef language/tree-il.scm
n
g nameg primitive-ref? C(R' h ] C g src
g name g filenamef language/tree-il.scm
n
g nameg make-primitive-ref C)R4@i h V ]
C N g x
g filenamef language/tree-il.scm
n
Ch e ]
C ] g x
g v g filenamef language/tree-il.scm
n
C5*R4@i h V ] C N g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v g filenamef language/tree-il.scm
n
C5+Ri ,R,iii, h o ] $ CC g g x
g filenamef language/tree-il.scm
n
g nameg lexical-ref? C-R, h ] C g src
g name g gensym g filenamef language/tree-il.scm
n
g nameg make-lexical-ref C.R4@i h V ]
C N g x
g filenamef language/tree-il.scm
n
Ch e ]
C ] g x
g v g filenamef language/tree-il.scm
n
C5/R4@i h V ] C N g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v g filenamef language/tree-il.scm
n
C50R4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C51Ri 2R2iii2 h o ] $ CC g g x
g filenamef language/tree-il.scm
n
g nameg lexical-set? C3R2 h ] C g src
g name g gensym g exp g filenamef language/tree-il.scm
n
g nameg make-lexical-set C4R4@i h V ]
C N g x
g filenamef language/tree-il.scm
n
Ch e ]
C ] g x
g v g filenamef language/tree-il.scm
n
C55R4@i h V ] C N g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v g filenamef language/tree-il.scm
n
C56R4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C57R4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C58Ri 9R9iii9 h n ] $ CC f g x
g filenamef language/tree-il.scm
n
g nameg module-ref? C:R9 h ] C g src
g mod g name g public? g filenamef language/tree-il.scm
n
g nameg make-module-ref C;R4@i h V ]
C N g x
g filenamef language/tree-il.scm
n
Ch e ]
C ] g x
g v g filenamef language/tree-il.scm
n
C5R4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5?Ri @R@iii@ h n ] $ CC f g x
g filenamef language/tree-il.scm
n
g nameg module-set? CAR@ h ] C g src
g mod g name g public? g exp g filenamef language/tree-il.scm
n
g nameg make-module-set CBR4@ih V ]
C N g x
g filenamef language/tree-il.scm
n
Ch e ]
C ] g x
g v g filenamef language/tree-il.scm
n
C5CR4@i h V ] C N g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v g filenamef language/tree-il.scm
n
C5DR4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5ER4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5FR4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5GRi HRHiiiH h p ] $ CC h g x
g filenamef language/tree-il.scm
n
g nameg
toplevel-ref? CIRH h ] C g src
g name g filenamef language/tree-il.scm
n
g nameg make-toplevel-ref CJR4@i h V ]
C N g x
g filenamef language/tree-il.scm
n
Ch e ]
C ] g x
g v g filenamef language/tree-il.scm
n
C5KR4@i h V ] C N g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v g filenamef language/tree-il.scm
n
C5LRi MRMiiiM h p ] $ CC h g x
g filenamef language/tree-il.scm
n
g nameg
toplevel-set? CNRM h ] C g src
g name g exp g filenamef language/tree-il.scm
n
g nameg make-toplevel-set COR4@i h V ]
C N g x
g filenamef language/tree-il.scm
n
Ch e ]
C ] g x
g v g filenamef language/tree-il.scm
n
C5PR4@i h V ] C N g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v g filenamef language/tree-il.scm
n
C5QR4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5RRi SRSiiiS h s ] $ CC k g x
g filenamef language/tree-il.scm
n
g nameg toplevel-define? CTRS h ] C g src
g name g exp g filenamef language/tree-il.scm
n
g nameg make-toplevel-define CUR4@i h V ]
C N g x
g filenamef language/tree-il.scm
n
Ch e ]
C ] g x
g v g filenamef language/tree-il.scm
n
C5VR4@i h V ] C N g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v g filenamef language/tree-il.scm
n
C5WR4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5XRi
YRYiiiY h o ] $ CC g g x
g filenamef language/tree-il.scm
n
g nameg conditional? CZRY h ] C g src
g test g
consequent g alternate g filenamef language/tree-il.scm
n
g nameg make-conditional C[R4@i h V ]
C N g x
g filenamef language/tree-il.scm
n
Ch e ]
C ] g x
g v g filenamef language/tree-il.scm
n
C5\R4@i h V ] C N g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v g filenamef language/tree-il.scm
n
C5]R4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5^R4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5_Ri `R`iii` h o ] $ CC g g x
g filenamef language/tree-il.scm
n
g nameg application? CaR` h ] C g src
g proc g args g filenamef language/tree-il.scm
n
g nameg make-application CbR4@i h V ]
C N g x
g filenamef language/tree-il.scm
n
Ch e ]
C ] g x
g v g filenamef language/tree-il.scm
n
C5cR4@i h V ] C N g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v g filenamef language/tree-il.scm
n
C5dR4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5eRi fRfiiif h l ] $ CC d g x
g filenamef language/tree-il.scm
n
g nameg sequence? CgRf h ] C | g src
g exps g filenamef language/tree-il.scm
n
g nameg
make-sequence ChR4@i h V ]
C N g x
g filenamef language/tree-il.scm
n
Ch e ]
C ] g x
g v g filenamef language/tree-il.scm
n
C5iR4@i h V ] C N g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v g filenamef language/tree-il.scm
n
C5jRi
kRkiiik h j ] $ CC b g x
g filenamef language/tree-il.scm
n
g nameg lambda? ClRk h ] C g src
g meta g body g filenamef language/tree-il.scm
n
g nameg make-lambda CmR4@i h V ]
C N g x
g filenamef language/tree-il.scm
n
Ch e ]
C ] g x
g v g filenamef language/tree-il.scm
n
C5nR4@i h V ] C N g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v g filenamef language/tree-il.scm
n
C5oR4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5pRi qRqiiiq h o ] $ CC g g x
g filenamef language/tree-il.scm
n
g nameg lambda-case? CrRq h
, 3
C g src
g req g opt g rest g kw g inits g gensyms g body g alternate g filenamef language/tree-il.scm
n
g nameg make-lambda-case CsR4@i h V ]
C N g x
g filenamef language/tree-il.scm
n
Ch e ]
C ] g x
g v g filenamef language/tree-il.scm
n
C5tR4@i h V ] C N g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v g filenamef language/tree-il.scm
n
C5uR4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5vR4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5wR4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5xR4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5yR4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5zR4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5{R4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5|Ri }R}iii} h g ] $ CC _ g x
g filenamef language/tree-il.scm
n
g nameg let? C~R} h ] C g src
g names g gensyms g vals g body g filenamef language/tree-il.scm
n
g nameg make-let CR4@i h V ]
C N g x
g filenamef language/tree-il.scm
n
Ch e ]
C ] g x
g v g filenamef language/tree-il.scm
n
C5R4@i h V ] C N g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v g filenamef language/tree-il.scm
n
C5R4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5R4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5R4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5Ri Riii h j ] $ CC b g x
g filenamef language/tree-il.scm
n
g nameg letrec? CR h ] C g src
g in-order? g names g gensyms g vals g body g filenamef language/tree-il.scm
n
g nameg make-letrec CR4@i h V ]
C N g x
g filenamef language/tree-il.scm
n
Ch e ]
C ] g x
g v g filenamef language/tree-il.scm
n
C5R4@i h V ] C N g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v g filenamef language/tree-il.scm
n
C5R4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5R4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5R4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5R4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5Ri Riii h j ] $ CC b g x
g filenamef language/tree-il.scm
n
g nameg dynlet? CR h ] C g src
g fluids g vals g body g filenamef language/tree-il.scm
n
g nameg make-dynlet CR4@i h V ]
C N g x
g filenamef language/tree-il.scm
n
Ch e ]
C ] g x
g v g filenamef language/tree-il.scm
n
C5R4@i h V ] C N g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v g filenamef language/tree-il.scm
n
C5R4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5R4@i h V ] CN g x
g filenamef language/tree-il.scm
n
Ch e ] C ] g x
g v
g filenamef language/tree-il.scm
n
C5R4ii5R h - 1 3 C g src
g names g gensyms g vals g body g defrec-9d61459b896-c7e g filenamef language/tree-il.scm
g nameg make-fix CR4ii5R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4ii5R h - 1 3 C g src
g exp g body g defrec-9d61459b896-c80 g filenamef language/tree-il.scm
g nameg make-let-values CR4ii5R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4ii5R h - 1 3 C g src
g winder g body g unwinder g defrec-9d61459b896-c82 g filenamef language/tree-il.scm
g nameg make-dynwind CR4ii5R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4ii5R h - 1 3 C g src
g fluid g defrec-9d61459b896-c84 g filenamef language/tree-il.scm
g nameg make-dynref CR4ii5R4@i4ii54ii55R4@i4ii54ii55R4ii5R h - 1 3 C g src
g fluid g exp g defrec-9d61459b896-c86 g filenamef language/tree-il.scm
g nameg make-dynset CR4ii5R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4ii5R h - 1 3 C g src
g tag g body g handler g defrec-9d61459b896-c88 g filenamef language/tree-il.scm
g nameg make-prompt CR4ii5R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4ii5R h - 1 3 C g src
g tag g args g tail g defrec-9d61459b896-c8a g filenamef language/tree-il.scm
g nameg
make-abort CR4ii5R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4@i h ) ]
C ! g x
C h 8 ]
C 0 g x
g v C5 R h ] $ 4 5 $ CCC g x
g props g filenamef language/tree-il.scm
g nameg location CR h u ] 6m g x
g filenamef language/tree-il.scm
g nameg retrans Ch$sBmUOJB;4.)[b < h0 ] 4 5 " " " " " ^" " 0"
[" " " "
"
L" " &" " " _" " " B" " " i" " s" " " (" $ & v$ g $ N $ 5
( 45454 56 6 6 6 6 6 6 $ z & d$ Y $ D $ /
(
45454 56"""""" $ ^ & H$ = $ ( ( 45456""{"w"s"o $ B
& ,$ ! (
456"*"&""" $ ~ & h$ ] $ H $ 3
( 45454 56"""""" $ z & d$ Y $ D $ /
( 45454 56" """" " $ ^ & H$ = $ ( ( 45456""""" $ & x$ m $ X $ C
$ .
( 4 54 56""""
""" $ & y$ n $ Y $ D
$ /
( 4 54 56"x"t"p"l"h"d"` $ & y$ n $ Y $ D
$ /
( 4 54 56""""""" $ & x$ m $ X $ C
$ .
( 4 54 56"="9"5"1"-")"% $ % & 456"" $ = & '$ ( 6"""" $ & $ $ $
$
$
$ $ s $ ^ ( J$ ? ( +( !!
45456 """""""""""""" $ / & $ $ $
$
$
$ $ $ { ( g$ \ ( H$ = ( )!
45454"56 "~"z"v"r"n"j"f"b"^"Z"V"R"N"J"F $ Y #& C$ 8 $ # ( $456""""" $ d %& N$ C $ . ( $ &456""{"w"s"o"k $ '& $ $ n (& X$ M
( 9$ . ( $ ) 4 56"""""""""" $ H (& 2$ ' ( $ *6"q"m"i"e"a $ '& $ $ +& $ v
$ a
( M$ B
( .4,- 5$ $ . 4
56"""""""""""" $ q +& [$ P $ ; ( '4,-5$ $ /6" """"
" " $ '& $ $ 0& $ v
$ a
( M$ B
( .4,- 5$ $ . 4
56"U"Q"M"I"E"A"="9"5"1"-") $ q 0& [$ P $ ; ( '4,-5$ $ /6""""""" $ '& $ $ 1& z$ o
$ Z
( F$ ;
( ' $ $ 2 4
56" """"""""""" $ '& $ $ p 1& Z$ O
( ;$ 0 ( $ 2 4 56"C"?";"7"3"/"+"'"#" $ j 1& T$ I $ 4 ( $ $
36""""""" $ J 1& 4$ ) ( $
36"]"Y"U"Q"M $ H 4& 2$ ' ( $ 56""""" $ z 6& d$ Y $ D $ /
( 745454 56""}"y"u"q"m $ A 8& +$ 945456"%"!" $ & :& ( ;6""" g exp
+ g retrans + g loc
+ g vx g vy g vx g vy g vx g vy g vx g vy
g vx 3 g vy 3 g vx L g vy L g vx ] g vy ] g vx n g vy
n g vx g vy g vx g vy g vx g vy g vx ! ] g vy ! ] g vx : U g vy : U g vx n g vy n g vx g vy g vx g vy g vx g vy
g vx k g vy k g vx c g vy c g vx ! _ g vy ! _ g vx 2 [ g vy
2 [ g vx | g vy | g vx g vy g vx g vy g vx m g vy m g vx e g vy e g vx a g vy a g vx ] g vy
] g vx 1 Y g vy 1 Y g vx ~ g vy ~ g vx g vy g vx g vy g vx g vy
g vx g vy g vx g vy g vx 1 g vy 1 g vx B g vy B g vx S g vy
S g vx d g vy d g vx : g vy : g vx 2 g vy 2 g vx . g vy . g vx * g vy
* g vx & g vy & g vx K j g vy K j g vx { g vy { g vx g vy g vx g vy g vx g vy g vx g vy g vx g vy
g vx g vy g vx
g vy g vx 1 g vy 1 g vx B g vy B g vx S g vy S g vx j g vy j g vx g vy g vx g vy g vx
g vy
g vx g vy
g vx , g vy , g vx
= g vy = g vx N g vy N g vx _ g vy _ g vx p g vy p g vx g vy g vx g vy g vx m g vy m g vx 3 e g vy 3 e g vx D a g vy D a g vx ~ g vy ~ g vx g vy g vx g vy g vx
g vy
g vx
g vy
g vx
g vy
g vx
0
w g vy
0
w g vx
G
o g vy
G
o g vx
g vy
g vx
g vy
g vx
g vy
g vx g vy g vx g vy g vx 2 g vy
2 g vx C g vy C g vx
Z g vy Z g vx 2 g vy 2 g vx * g vy * g vx & g vy & g vx C
g vy C
g vx \
g vy \
g vx m g vy m g vx g vy
g vx g vy g vx
g vy g vx
g vy
g vx
4
~ g vy
4
~ g vx
E
z g vy
E
z g vx
W g vy
W g vx
O g vy
O g vx
K g vy
K g vx
C g vy
C g vx
? g vy
? g vx
7 g vy 7 g vx h g vy h g vx g vy g vx g vy g vx g vy
g vx g vy g vx } g vy } g vx 2 u g vy 2 u g vx C q g vy C q g vx g vy g vx g vy g vx % g vy % g vx g vy g vx 6 g vy 6 g vx O g vy O g vx ` g vy ` g vx q g vy
q g vx g vy g vx g vy g vx ' g vy ' g filenamef language/tree-il.scm
$
"
& & } I Q U , A W [ D " M U Y ( x ( " " & \ f j U ] a !
T *
X
_
g
k
e ) q t ? x 3 ( >
P
\
_ 2
c
n
r . = # + / ) P " T W 1 [ e i
+ # + g nameg
parse-tree-il CR `deY]^_'+,0126789=>?@DEFGHLMQRSWXkopBquvwxyz{|"&fj} y hP
]I & C& '4 54 5 4545C & 64
54 54 5
454545 C& 4 5 C& 4 54 5 C& 14 54 54 5 45 C& 14 54 54 5 $ " C & F4! 54" 54# 54$ 5 $ " 45 C%& 4& 5 ' C(& &4) 54* 5 ' 45 C+& !4, 54- 5 .45 C/& 040 541 5 $ 245 C23C4& 45 546 547 548 549 54: 54; 54< 5 =45 45 $ 4 5 " C>& 4? 5 @ CA& 4B 5 C45CD& >4E 54F 54G 54H 5 I4545 CJ& S4K 54L 54M 54N 54O 5 $ P" Q4545 CR& >4S 54T 54U 54V 5 W4545 CX& &4Y 54Z 5 [4545 C\& 64] 54^ 54_ 5 `454545 Ca& :4b 54c 54d 5 e454545 Cf& 4g 5 h45 Ci& &4j 54k 5 l4545 Cm& 64n 54o 54p 5 q454545 Cr& 84s 54t 54u 5 v454545 Cwx 6 |
g tree-il
L g rtd L g proc ( A g args ( A g test ^ g
consequent ^ g alternate ^ g name g name g gensym g name g gensym g exp g mod . g name . g public? . g mod R | g name R | g public? R | g exp R | g name g name g exp g name g exp g meta $ g body $ g req d g opt d g rest d g kw d g inits d g gensyms d g body d g alternate d g exp g exps g names + g gensyms + g vals + g body + g in-order? V g names V g gensyms V g vals V g body V g names g gensyms g vals g body g exp g body g winder 8 g body 8 g unwinder 8 g fluids U z g vals U z g body U z g fluid g fluid g exp g tag g body g handler g tag ! D g args ! D g tail ! D Cg filenamef language/tree-il.scm
. / 6 ' ? I f g n # u A ~ % & - 6 \ b d j q r / { ! " " " # , v & & * & ' & ( ( * ( $ ( G & + . . . 1 1 ! 1 8 * 1 3 f 4 h 4 n 4 s 5 | 5 $ 4 8 8 8 8 8 ; ; ; * ; > > ' > * . ? 7 > @ ] B ^ B g B - p C y B F F F I I I ( I L L L & L > L ) O * O 1 O % : P C O H } L g nameg unparse-tree-il CR h0 - . , 3 # # 4 5C g e
* g env * g opts * g filenamef language/tree-il.scm
R
R 6 S
! S ) S
* S * g nameg tree-il->scheme CR28@GMRSXY]^_`defjkpqy{|} :h` ' ]" ( " $
L 6 & 4 5 L 4L4L 556& 4 5 L 4L4L 556& 4 5 L 4L4L 556& 4 5 L 4L4L 556
& ?4 54 54
5 L 4L4L4L4L 55556& +4 54 5 L 4L4L 556& 4 5 L 4L4L 556& /4 5 4L 5 L $
4L5" 6& `4 54 54 5 L $ "4L4L4L4L 5555" 4L4L4L 5556& /4 54 5 L 4L4L4L 5556 & /4 54 5 L 4L4L4L 5556 & /4 54! 5 L 4L4L4L 5556"& /4# 54$ 5 L 4L4L4L 5556%& ?4& 54' 54( 5 L 4L4L4L4L 55556)& ?4* 54+ 54, 5 L 4L4L4L4L 55556-& 4. 5 L 4L4L 556/& /40 541 5 L 4L4L4L 55562& ?43 544 545 5 L 4L4L4L4L 555566& ?47 548 549 5 L 4L4L4L4L 55556L 6 g tree
] g result ] g rtd ! ] g exp 2 J g exp Y q g exp g exp g test g
consequent g alternate g proc 9 g args 9 g exps H ` g body o g result z g inits g body g alternate g vals 6 g body 6 g vals L m g body L m g vals g body g exp g body g body " g winder " g unwinder " g fluids ? i g vals ? i g body ? i g fluid x g fluid g exp g tag g body g handler g tag + U g args + U g tail + U )g filenamef language/tree-il.scm
` b b b b c ! d 9 f > f H f J f R d ` h e h o h q h y d j j j j d l l l l d n o p p + p o n n d % r , r - r + 7 r 9 r A d O t T t ^ t ` t h d r v z v x y w
d | } ~ ~ ) ~ 5 ~ ) ~ } # / # | d # ( 2 4 6 > d U Z _ i k m u d d ) d
+ " * d J O T Y - c e g i q d d * d $ * $
d 6 ; @ * E 4 O * Q S U ] ] g nameg loop C h | ]
O Q 6t g leaf
g down g up g seed g tree g loop
g filenamef language/tree-il.scm
X
` g nameg tree-il-foldg
documentationf Traverse TREE, calling LEAF on each leaf encountered, DOWN upon descent
into a sub-tree, and UP when leaving a sub-tree. Each of these procedures is
invoked as `(PROC TREE SEED)', where TREE is the sub-tree or leaf considered
and SEED is the current result, intially seeded with SEED.
This is an implementation of `foldts' as described by Andy Wingo in
``Applications of fold to XML transformation''. CR4
"$'&)+-502487:=<A@DCFHJNLMRQUTW[YZ^]` 9 h B ]
45 ! " ## $ % # # &' # (' # )' # * # +# , - ./ ' # 01 21 34 # 5 64 7 8 C : g dummy
g seed CPQ h( ] 4 5 $ @ 6 g x
" g tmp " g filenamef language/tree-il.scm
" g
macro-typeg syntax-rulesg patternsg seedg ... C5R`decY]^_2867@GDEFMRQSXWkpqy{|fj} E h ]! & Z4 54 5 445 4L5> " G 445 4L5> " G " Y& 4 54 54 5 445 4L5> " G 445 4L5> " G 44 5 4L5> " G "
& R4 5 4 > " G 4
> " G 44 5 4L5> " G " u& d4 5 4 > " G 4 > " G 4 > " G 445 4L5> " G " & @4 5 4 > " G 445 4L5> " G " & @4 5 4 > " G 445 4L5> " G " y& 84 5 $ "445 4L5> " G " " 9& y4 54 54 5 H4LJ5K44 5 4L5> " G $ "44 5 4L5> " G " " & 04 5 44 5 4L5> " G " !& l4" 54# 5 4$ > " G 44"5 4L5> " G 44#5 4L5> " G " %& l4& 54' 5 4( > " G 44&5 4L5> " G 44'5 4L5> " G " )& l4* 54+ 5 4, > " G 44*5 4L5> " G 44+5 4L5> " G " $-& X4. 54/ 5 44.5 4L5> " G 44/5 4L5> " G " 0& 41 542 543 5 4415 4L5> " G 4425 4L5> " G 4435 4L5> " G " :4& 45 546 547 5 4455 4L5> " G 4465 4L5> " G 4475 4L5> " G " 8& .49 5 4495 4L5> " G " v:& X4; 54< 5 44;5 4L5> " G 44<5 4L5> " G " =& 4> 54? 54@ 5 44>5 4L5> " G 44?5 4L5> " G 44@5 4L5> " G " A& 4B 54C 54D 5 44B5 4L5> " G 44C5 4L5> " G 44D5 4L5> " G " 4L 5 $ C C g x
g rtd g proc e g args e g test g
consequent g alternate g exp I g exp \ g exp g exp E g body X g inits g body g alternate g exps > g vals X g body X g vals & g body & g vals @ g body @ g exp g body g body g winder g unwinder g fluids g vals g body g fluid % H g fluid b g exp b g tag 2 g body 2 g handler 2 g tag S g args S g tail S g t (g filenamef language/tree-il.scm
" , " 7 @ J " W q " ( ' ) 3 ! > U " % / % : Q ` a
k
! v
" + & 3 J o y
2 W a n w " " " # # ! # " & , & 7 & @ ' J ' U ' ^ ( h ( " s ( + + + , , , - - - ( 0 2 0 = 0 T g 3 q 3 | 3 4 4 4 7 7 7 8 8 8 9 9 ! 9 > Z < d < o < x = = = > > > B B g nameg lp C h ]
O Q 6 g f
g x g lp g filenamef language/tree-il.scm
g nameg post-order! CR`decY]^_28@GMRSXkpqy{|fj} ; h0 ])4L 5 $ " & Z4545 4454L5> " G 4454L5> " G " & 45454 5 4454L5> " G 4454L5> " G 44 54L5> " G "
& .4 5 44 54L5> " G " & .4
5 44
54L5> " G " & .45 4454L5> " G " y& .45 4454L5> " G " C& 845 $ "4454L5> " G " " & y454545 H4LJ5K4454L5> " G $ "4454L5> " G " " & 045 4454L5> " G " J& Z454 5 4454L5> " G 44 54L5> " G " & Z4 54 5 44 54L5> " G 44 54L5> " G " & Z4!54"5 44!54L5> " G 44"54L5> " G " $#& X4$54%5 44$54L5> " G 44%54L5> " G " && 4'54(54)5 44'54L5> " G 44(54L5> " G 44)54L5> " G " :*& 4+54,54-5 44+54L5> " G 44,54L5> " G 44-54L5> " G " .& .4/5 44/54L5> " G " v0& X415425 44154L5> " G 44254L5> " G " 3& 445455465 44454L5> " G 44554L5> " G 44654L5> " G " 7& 4854954:5 44854L5> " G 44954L5> " G 44:54L5> " G " C g x
0 g t g x 0 g rtd ! - g proc 9 g args 9 g test g
consequent g alternate g exp A g exp T w g exp g exp g body # g inits D g body D g alternate D g exps g vals > g body > g vals X g body X g vals g body g exp b g body b g body g winder g unwinder g fluids
z g vals
z g body
z g fluid g fluid g exp g tag 1 g body 1 g handler 1 g tag & g args & g tail & )g filenamef language/tree-il.scm
E F F
F ! G > I H I $ S I \ J f J $ s J G M M $ M N N * N O O ) O G ! R + R # 6 R M G W U a U " l U G X X $ X G [ [ ' [ G ^ _
_ # _
/ G K b U b V c ` c $ k c y d z d d 7 d G g g ! g G j j j k % k 0 k J G ] n g n t n } o o o G r r r s s s G ! v + v " 6 v ? w I w # T w n G z z z { { " { | | $ | G ! + 4 > K T ^ i G G G 8 B M V ` k t ~ " G
0 g nameg lp C h ]
O Q 6 g f
g x g lp g filenamef language/tree-il.scm
D
E g nameg
pre-order! CRdef h ]444 555 C g x
g filenamef language/tree-il.scm
$ g nameg struct-nfields CgRg h ] $ T$ K & ?" -
$ C4 5$ "C4 5 "CC $ $$ 4 5$
6CC C g a
g b g n K g t " K g filenamef language/tree-il.scm
! " . 5 : 0 < @ C I K L S Y ` d g k l q t v z $ g nameg tree-il=? CR4h4iij h [ ] 6S g var
g filenamef language/tree-il.scm Ckl h [ ]6S g var
g filenamef language/tree-il.scm CPQ h( h ] 4?$ @ 6 ` g x
# g tmp # g filenamef language/tree-il.scm
# C55hRgmln o h0 ]:" t4545
$ C" ;$ /4L 5 5 "C4 5 "" 45
$ C4L 5 5 4L 5 5 4L 5 5C $ " $ "V 6 g exp
0 g depth 0 g s z g len z g h z g i * e g h * e g h1 C Z g l ~
g h
g h1 g l
g h
g h1 g l
g h
g h1
g filenamef language/tree-il.scm
#
* / 3 6 7 $ > . A ? C $ C K L Q R T 2 U V W b e f m p z ~
' / 2 ' / 2 ' / 2
( 0
[ 0 g nameg hash-exp C h ] O Q
6 g exp
g hash-exp
g filenamef language/tree-il.scm
g nameg tree-il-hash CRC g m
, g filenamef language/tree-il.scm
B
n
e
r
R
X
֢
D
-
6
C6