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.0 ] 4 h ] g guile g define-module* g system g base g types
g filenameS f system/base/types.scm g importsS
g rnrs g bytevectors
g io g ports
g srfi g srfi-1 g srfi-9 g gnu g srfi-11 ! "g srfi-26 #" $# %g srfi-60 &% '& (g ice-9 )g match *() +* ,g iconv -(, .- /g format 0(/ 10 2g vlist 3(2 43 5g foreign 65 76 8 !$'+.147
9g exportsS :g
%word-size ;g memory-backend g dereference-word ?g memory-port @g type-number->name Ag inferior-object? Bg inferior-object-kind Cg inferior-object-sub-kind Dg inferior-object-address Eg inferior-fluid? Fg inferior-fluid-number Gg inferior-struct? Hg inferior-struct-name Ig inferior-struct-fields Jg scm->object K:;<=>?@ABCDEFGHIJ Lg set-current-module ML NL Og sizeof Pg * Qg Rg %memory-backend-procedure Sg make-syntax-transformer TS US Vg macro Wg $sc-dispatch XW YW Zg _ [g any \Z[[[ ]g
syntax-object ^g lambda _g
m-1f6d4c535-6 `g top a_` bg ribcage cg
t-1f6d4c535-3 dg
t-1f6d4c535-4 eg
t-1f6d4c535-5 fcde gaaa hf
l-1f6d4c535-b if
l-1f6d4c535-c jf
l-1f6d4c535-d khij lbfgk mb ng x on pa qf
l-1f6d4c535-8 rq sbopr tg shift ug proc-name vg args wuv x` yxx zf l-1e8ba8b5a-60 {f l-1e8ba8b5a-61 |z{ }bwy| ~g key g value g name g formals g body ~ xxxxx f l-1e8ba8b5a-53 f l-1e8ba8b5a-54 f l-1e8ba8b5a-55 f l-1e8ba8b5a-56 f l-1e8ba8b5a-57 b g make-procedure-name x f l-1e8ba8b5a-43 b x f l-1e8ba8b5a-42 bo almstmmmm}
g hygiene ]^ g peek xlms ] g open ] g type-name ] g make-struct g
m-1f6d4c535-1 ` g t-1e8ba8b5a-133 g t-1e8ba8b5a-132 g t-1e8ba8b5a-131 g m-1e8ba8b5a-134 ` f l-1e8ba8b5a-138 f l-1e8ba8b5a-139 f l-1e8ba8b5a-13a b g ctor-args f l-1e8ba8b5a-120 b g ctor g field f l-1e8ba8b5a-11c f l-1e8ba8b5a-11d by g form g constructor-spec g field-names xxxx f l-1e8ba8b5a-111 f l-1e8ba8b5a-112 f l-1e8ba8b5a-113 f l-1e8ba8b5a-114 b g
record-layout g functional-setters g setters g copier g getters g constructor g getter-identifiers g field-identifiers xxxxxxxx f l-1e8ba8b5a-e9 f l-1e8ba8b5a-e7 f l-1e8ba8b5a-e5 f l-1e8ba8b5a-e3 f l-1e8ba8b5a-e1 f l-1e8ba8b5a-df f l-1e8ba8b5a-dd f l-1e8ba8b5a-db b f l-1e8ba8b5a-da bo lmstmmmmm ] ]Q ]
g each-any Z挤 g syntax-violation f Wrong number of arguments g identifier? xms ]R f -source expression failed to match any pattern g record-type-vtable g pwpwpw g default-record-printer g set-struct-vtable-name! g vtable-offset-user g %memory-backend?-procedure Z[ g m-1f6d4c535-17 ` g t-1f6d4c535-16 f l-1f6d4c535-1c
b
f l-1f6d4c535-19
bo
mtmmmm}
]^ g obj g t-1e8ba8b5a-224 g t-1e8ba8b5a-21e g t-1e8ba8b5a-21f g t-1e8ba8b5a-220 g t-1e8ba8b5a-223 g t-1e8ba8b5a-222 g t-1e8ba8b5a-221 g m-1e8ba8b5a-225 ` f l-1e8ba8b5a-229 f l-1e8ba8b5a-22a f l-1e8ba8b5a-22b f l-1e8ba8b5a-22c !f l-1e8ba8b5a-22d "f l-1e8ba8b5a-22e #f l-1e8ba8b5a-22f $ !"# %b $ &g copier-id '& (f l-1e8ba8b5a-21c )( *b') +g ctor-name ,+ -f l-1e8ba8b5a-214 .- /b,. 0 1f l-1e8ba8b5a-212 21 3b02 4g layout 54 6f l-1e8ba8b5a-210 76 8b57 9g
immutable? :9 ;f l-1e8ba8b5a-20e <; =b:< >g field-count ?> @f l-1e8ba8b5a-20c A@ Bb?A Cg
getter-ids DC Ef l-1e8ba8b5a-209 FE GbDF Hg field-ids IH Jf l-1e8ba8b5a-206 KJ LbIK Mg predicate-name Ng
field-spec O9MN Pxxxxxx Qf l-1e8ba8b5a-1f9 Rf l-1e8ba8b5a-1fa Sf l-1e8ba8b5a-1fb Tf l-1e8ba8b5a-1fc Uf l-1e8ba8b5a-1fd Vf l-1e8ba8b5a-1fe WQRSTUV XbOPW Y mtm%mmmm*m/m3m8m=mBmGmLX Z]Y [Z \g and ]]\Y ^g struct? _]^Y `_Z ag eq? b]aY cg
struct-vtable d]cY edZ fx m g]Qf hbeg i]`h j[i kxm l]k mg throw-bad-struct nm om pg memory-backend-peek qg %memory-backend-peek-procedure rg free-id sg
%%on-error tg m-1f6d4c535-23 ut` vu wf l-1f6d4c535-25 xw ybovx zumytmmmm} {]sz |r{ }|[ ~g %%type g t-1e8ba8b5a-14b g t-1e8ba8b5a-14c g t-1e8ba8b5a-14d g t-1e8ba8b5a-14e g t-1e8ba8b5a-14f g t-1e8ba8b5a-150 g t-1e8ba8b5a-151 g m-1e8ba8b5a-152 ` f l-1e8ba8b5a-156 f l-1e8ba8b5a-157 f l-1e8ba8b5a-158 f l-1e8ba8b5a-159 f l-1e8ba8b5a-15a f l-1e8ba8b5a-15b f l-1e8ba8b5a-15c b g getter g index f l-1e8ba8b5a-149 f l-1e8ba8b5a-14a by C& xxx f l-1e8ba8b5a-144 f l-1e8ba8b5a-145 f l-1e8ba8b5a-146 b mytmmmmm ]~ r Z}[ g ck g err g s uu f l-1f6d4c535-28 f l-1f6d4c535-29 b umytmmmm}
] g quote ] xmy ]Q g %%index ] r Z}[ f l-1f6d4c535-2d f l-1f6d4c535-2e b umytmmmm}
] ] my ]
g %%copier ] r Z}[ f l-1f6d4c535-32 f l-1f6d4c535-33 b umytmmmm}
] ] g %%-set-fields xmy ] g t-1f6d4c535-22 f l-1f6d4c535-37 bv umytmmmm}
]^ mytmmmmm ] g if ] ]a ]c xmy ]Q g
struct-ref ] my ]
]m ] ]p xmy ]q g memory-backend-open g %memory-backend-open-procedure g m-1f6d4c535-3e ` f l-1f6d4c535-40 bo mtmmmm} ]s r [ mtmmmmm ]~ r Z [ f l-1f6d4c535-43 f l-1f6d4c535-44 b
mtmmmm}
]
]
x m ]Q
] r Z [ f l-1f6d4c535-48 f l-1f6d4c535-49 b mtmmmm}
] ] m ] ] r !Z [ "f l-1f6d4c535-4d #f l-1f6d4c535-4e $"# %b$ &%mtmmmm}
']& (]& )x%m *]) +(* ,+ -g t-1f6d4c535-3d .- /f l-1f6d4c535-52 0/ 1b.0 21mtmmmm}
3]^2 41mtmmmmm 5]4 65 7]4 8]a4 9]c4 :95 ;x1m <]Q; =8:< >]4 ?1m @] ? A>5@ B]m4 C]4 D]; ECD FB5E G7=AF H36G Ixm J]I Kg memory-backend-type-name Lg #%memory-backend-type-name-procedure Mg m-1f6d4c535-59 NM` ON Pf l-1f6d4c535-5b QP RboOQ SNmRtmmmm} T]sS UrT VU[ WmRtmmmmm X]~W YrX ZZVY[ [NN \f l-1f6d4c535-5e ]f l-1f6d4c535-5f ^\] _b[^ `N_mRtmmmm}
a]` b]` cx_mR d]Qc ebd fe g]W hrg iZVh[ jf l-1f6d4c535-63 kf l-1f6d4c535-64 ljk mb[l nNmmRtmmmm}
o]n p]n qmmR r] q spr ts u]W vru wZVv[ xf l-1f6d4c535-68 yf l-1f6d4c535-69 zxy {b[z |N{mRtmmmm}
}]| ~]| x{mR ] ~ g t-1f6d4c535-58 f l-1f6d4c535-6d bO NmRtmmmm}
]^ mRtmmmmm ] ] ]a ]c xmR ]Q ] mR ] ]m ] ]K xmR ]L g each [[ [ [ [ g %%set-fields g dummy g check? g expr g m-1f6d4c535-74 ` f l-1f6d4c535-79 f l-1f6d4c535-7a f l-1f6d4c535-7b f l-1f6d4c535-7c f l-1f6d4c535-7d b f l-1f6d4c535-76 bo g t-1e8ba8b5a-16a g t-1e8ba8b5a-16c g t-1e8ba8b5a-16b g m-1e8ba8b5a-16d ` f l-1e8ba8b5a-171 f l-1e8ba8b5a-172 f l-1e8ba8b5a-173 b f l-1e8ba8b5a-167 f l-1e8ba8b5a-168 f l-1e8ba8b5a-169 b mtmmmm
] xm ]Q ]p ] ]K g map g list g make-pointer g pointer->bytevector g bytevector-uint-ref g native-endianness g open-bytevector-input-port g make-custom-binary-input-port f
ffi-memory g bytevector-copy! g setvbuf g _IONBF g % dereference-word-procedure Z[[ g syntax-parameterize g m-1f6d4c535-c6 ` g t-1f6d4c535-c4 g t-1f6d4c535-c5 f l-1f6d4c535-cb f l-1f6d4c535-cc b f l-1f6d4c535-c8 bo f l-bde397a-1eaf f l-bde397a-1eb0 bwy f l-bde397a-1ea6 f l-bde397a-1ea7 f l-bde397a-1ea8 b g prefix xx f l-bde397a-1e9a f l-bde397a-1e98 b f l-bde397a-1e97 bo mtmmmm
] xm
]> g identifier-syntax ]
]
]^ g backend ] g address ] f *Return the word at ADDRESS, using BACKEND. ] g let ] ] ]p ! "! #" $ % &xm ']& ([[[ ) *g m-1f6d4c535-e9 +*` ,+xx -f l-1f6d4c535-ee .f l-1f6d4c535-ef /f l-1f6d4c535-f0 0-./ 1b),0 2+ 3f l-1f6d4c535-eb 43 5bo24 6x1m5 7]6 8]6 9]6 :]6 ;: <[[[[ =g size >= ?+xxx @f l-1f6d4c535-f5 Af l-1f6d4c535-f6 Bf l-1f6d4c535-f7 Cf l-1f6d4c535-f8 D@ABC Eb>?D FxEm5 G]F Hg zero? I]HF J]F K]F Lg vu8
j M]LF NKM OJN P]F Q]F R]F Sg get-bytevector-n Tg get-word Ug % type-number->name-procedure Vg m-1f6d4c535-104 WV` Xg t-1f6d4c535-101 Yg t-1f6d4c535-102 Zg t-1f6d4c535-103 [XYZ \WWW ]f l-1f6d4c535-109 ^f l-1f6d4c535-10a _f l-1f6d4c535-10b `]^_ ab[\` bW cf l-1f6d4c535-106 dc ebobd fWametmmmm
g]f hxame i]@h j] f k]Uh ljk mil nm o]^f p]h qg kind r]qh sg number t]sh uprt vf yReturn the name of the type NUMBER of KIND, where KIND is one of
'smob or 'port, or #f if the information is unavailable. w]vh x]h yg proc z]yh {]Kh |{p }z| ~} ]\h zrt z x~ ouw gn xme ]U g match-cell-words g
bytevector g m-1f6d4c535-12d ` f l-1f6d4c535-12f bo xm ] r [[ 挤 [[[ g port g len g rest xxxxx f l-1f6d4c535-132 f l-1f6d4c535-133 f l-1f6d4c535-134 f l-1f6d4c535-135 f l-1f6d4c535-136 f l-1f6d4c535-137 b xm ] ]S g remainder ] g modulo ] ]: g unless ] ]H g - ] ] [挤 [[[ xxxx f l-1f6d4c535-140 f l-1f6d4c535-141 f l-1f6d4c535-142 f l-1f6d4c535-143 f l-1f6d4c535-144 b xm ] ]T ] [[[ g match-bit-pattern g || g m-1f6d4c535-152 ` f l-1f6d4c535-154 bo xm ] r [[ g & ] r g = ] r [[ [[[[ g bits g a g b g n g c g
consequent g alternate xxxxxxx f l-1f6d4c535-157 f l-1f6d4c535-158 f l-1f6d4c535-159 f l-1f6d4c535-15a f l-1f6d4c535-15b f l-1f6d4c535-15c f l-1f6d4c535-15d f l-1f6d4c535-15e b xm ] g tag ] g logand ] ] ] g bitwise-not ] [[[ [[[[ n xxxxxx f l-1f6d4c535-168 f l-1f6d4c535-169 f l-1f6d4c535-16a f l-1f6d4c535-16b f l-1f6d4c535-16c f l-1f6d4c535-16d f l-1f6d4c535-16e b xm ] ] ] ] ] ]Z
r
[[ [[ [[
xxxxx f l-1f6d4c535-177 f l-1f6d4c535-178 f l-1f6d4c535-179 f l-1f6d4c535-17a f l-1f6d4c535-17b f l-1f6d4c535-17c b
xm ] ] ] ] ] ([ [[ [[ g << !f l-1f6d4c535-184 "f l-1f6d4c535-185 #f l-1f6d4c535-186 $f l-1f6d4c535-187 %f l-1f6d4c535-188 &f l-1f6d4c535-189 'f l-1f6d4c535-18a (f l-1f6d4c535-18b )!"#$%&'( *b ) +x*m ,]+ -]+ .g bitwise-and /].+ 0]+ 1g expt 2]1+ 3] + 4] + 54 6]+ 7]+ 8g arithmetic-shift 9]8+ :g match-cell-clauses ;[ <;挤 =[[[< >g tag-pattern ?g thing @>? Ag m-1f6d4c535-194 BA` CBxxxxxx Df l-1f6d4c535-199 Ef l-1f6d4c535-19a Ff l-1f6d4c535-19b Gf l-1f6d4c535-19c Hf l-1f6d4c535-19d If l-1f6d4c535-19e Jf l-1f6d4c535-19f KDEFGHIJ Lb@CK MB Nf l-1f6d4c535-196 ON PboMO QxLmP R]Q S]Q T]:Q U[[[ Vg inferior-object W XBxx Yf l-1f6d4c535-1aa Zf l-1f6d4c535-1ab [f l-1f6d4c535-1ac \YZ[ ]bWX\ ^x]mP _]V^ `]^ ag
unmatched-tag b]a^ c`b dg
match-cell e f[e g[f hg pattern ih jg m-1f6d4c535-1b0 kj` lkxxx mf l-1f6d4c535-1b5 nf l-1f6d4c535-1b6 of l-1f6d4c535-1b7 pf l-1f6d4c535-1b8 qmnop rbilq sk tf l-1f6d4c535-1b2 ut vbosu wxrmv x]w yg port* z]yw {]w |]Tw }]:w ~g begin ]~w g match-scm-clauses 挤 [ [ g bit-pattern g m-1f6d4c535-1c0 ` xxxx f l-1f6d4c535-1c5 f l-1f6d4c535-1c6 f l-1f6d4c535-1c7 f l-1f6d4c535-1c8 f l-1f6d4c535-1c9 b f l-1f6d4c535-1c2 bo xm ] ]~ ] x f l-1f6d4c535-1d2 f l-1f6d4c535-1d3 b xm ] g
unmatched-scm ] g match-scm [ g clauses g m-1f6d4c535-1d6 ` xx f l-1f6d4c535-1db f l-1f6d4c535-1dc f l-1f6d4c535-1dd b f l-1f6d4c535-1d8 bo xm ] g bits* ] ] g %tc2-int g
%tc3-imm24 g %tc3-cons g %tc3-int1 g %tc3-int2 g %tc8-char g %tc8-flag g %tc3-struct g %tc7-symbol g
%tc7-variable g %tc7-vector g
%tc7-wvect g %tc7-string g %tc7-number g %tc7-hashtable g %tc7-pointer g
%tc7-fluid g %tc7-stringbuf g %tc7-dynamic-state g
%tc7-frame g %tc7-objcode g %tc7-vm g %tc7-vm-continuation g %tc7-bytevector g %tc7-program g
%tc7-array g %tc7-bitvector g %tc7-port g %tc7-smob g %tc16-bignum g
%tc16-real g
%tc16-complex g %tc16-fraction g g %stringbuf-procedure g stringbuf g m-1f6d4c535-1e6 ` g t-1f6d4c535-1e5 f l-1f6d4c535-1eb b f l-1f6d4c535-1e8 bo mtmmmm}
]^ g string xm ] g m-1f6d4c535-1e3 ` mtmmmmm ] ] ]
xm ] g pw g %stringbuf?-procedure g
stringbuf? g m-1f6d4c535-1f3 ` g t-1f6d4c535-1f2 f l-1f6d4c535-1f8 b f l-1f6d4c535-1f5 bo mtmmmm}
]^ mtm%mmmm*m/m3m8m=mBmGmLX ]
]\ ]^
]a ]c xm ]
xm ] g stringbuf-contents g %stringbuf-contents-procedure g m-1f6d4c535-1ff ` f l-1f6d4c535-201 bo m tmmmm} !]s "r! #"[ $m tmmmmm %]~$ &r% 'Z#&[ ( )f l-1f6d4c535-204 *f l-1f6d4c535-205 +)* ,b(+ -,m tmmmm}
.]- /]- 0x,m 1]0 2/1 32 4]$ 5r4 6Z#5[ 7f l-1f6d4c535-209 8f l-1f6d4c535-20a 978 :b(9 ;:m tmmmm}
<]; =]; >:m ?]
> @=? A@ B]$ CrB DZ#C[ Ef l-1f6d4c535-20e Ff l-1f6d4c535-20f GEF Hb(G IHm tmmmm}
J]I K]I Lg %%-set-fields MxHm N]LM OKN PO Qg t-1f6d4c535-1fe RQ Sf l-1f6d4c535-213 TS UbR T VUm tmmmm}
W]^V XUm tmmmmm Y]X ZY []X \]aX ]]cX ^]Y _xUm `]_ a\^` b]X cUm d]
c ebYd f]mX g]X h]_ igh jfYi k[aej lWZk mxm n]m og m-1f6d4c535-21a po` qp rf l-1f6d4c535-21f sf l-1f6d4c535-220 tf l-1f6d4c535-221 uf l-1f6d4c535-222 vf l-1f6d4c535-223 wrstuv xbqw yp zf l-1f6d4c535-21c {z |boy{ }xm|tmmmm
~]} xxm| ] ] g set-record-type-printer! g display f # g g %inferior-struct-procedure g inferior-struct g m-1f6d4c535-242 ` g t-1f6d4c535-240 g t-1f6d4c535-241 f l-1f6d4c535-247 f l-1f6d4c535-248 b f l-1f6d4c535-244 bo mtmmmm}
]^ xm ] g fields ] g m-1f6d4c535-23e ` mtmmmmm ] ] ]
xm ] g pwpw g %inferior-struct?-procedure g m-1f6d4c535-251 ` g t-1f6d4c535-250 f l-1f6d4c535-256 b f l-1f6d4c535-253 bo mtmmmm}
]^ mtm%mmmm*m/m3m8m=mBmGmLX ] ]\ ]^ ]a ]c xm ] xm ] g %inferior-struct-name-procedure g m-1f6d4c535-25d ` f l-1f6d4c535-25f bo mtmmmm} ]s r [ mtmmmmm ]~ r Z[ f l-1f6d4c535-262 f l-1f6d4c535-263 b mtmmmm}
] ] xm ] ] r Z[ f l-1f6d4c535-267 f l-1f6d4c535-268 b mtmmmm}
] ] m ]
] r Z[ f l-1f6d4c535-26c f l-1f6d4c535-26d b mtmmmm}
] ] g %%-set-fields xm ] g t-1f6d4c535-25c f l-1f6d4c535-271 b mtmmmm}
]^ mtmmmmm
]
]
]a ]c
xm ]
] m ]
]m ] ]H
xm ] g !%inferior-struct-fields-procedure !g m-1f6d4c535-278 "!` #" $f l-1f6d4c535-27a %$ &bo#% '"m&tmmmm} (]s' )r( *)[ +m&tmmmmm ,]~+ -r, .Z*-[ /"" 0f l-1f6d4c535-27d 1f l-1f6d4c535-27e 201 3b/2 4"3m&tmmmm}
5]4 6]4 7x3m& 8]7 968 :9 ;]+ <r; =Z*<[ >f l-1f6d4c535-282 ?f l-1f6d4c535-283 @>? Ab/@ B"Am&tmmmm}
C]B D]B EAm& F] E GDF HG I]+ JrI KZ*J[ Lf l-1f6d4c535-287 Mf l-1f6d4c535-288 NLM Ob/N P"Om&tmmmm}
Q]P R]P SxOm& T]S URT VU Wg t-1f6d4c535-277 XW Yf l-1f6d4c535-28c ZY [bX#Z \"[m&tmmmm}
]]^\ ^[m&tmmmmm _]^ `_ a]^ b]a^ c]c^ dc_ ex[m& f]e gbdf h]^ i[m& j] i kh_j l]m^ m]^ n]Ie omn pl_o qagkp r]`q sxm& t] s ug m-1f6d4c535-293 vu` wv xf l-1f6d4c535-298 yf l-1f6d4c535-299 zf l-1f6d4c535-29a {f l-1f6d4c535-29b |f l-1f6d4c535-29c }xyz{| ~bw} v f l-1f6d4c535-295 bo ~mtmmmm
] x~m ] ]H ]I g set-inferior-struct-fields! g &%set-inferior-struct-fields!-procedure g m-1f6d4c535-2a7 ` g t-1f6d4c535-2a5 g t-1f6d4c535-2a6 f l-1f6d4c535-2ac f l-1f6d4c535-2ad b f l-1f6d4c535-2a9 bo mtmmmm}
]^ g t-1e8ba8b5a-18c g t-1e8ba8b5a-18d g m-1e8ba8b5a-18e ` f l-1e8ba8b5a-192 f l-1e8ba8b5a-193 b g setter f l-1e8ba8b5a-186 f l-1e8ba8b5a-187 f l-1e8ba8b5a-188 b N f l-1e8ba8b5a-17d f l-1e8ba8b5a-17e by g field-specs f l-1e8ba8b5a-179 f l-1e8ba8b5a-17a by mtmmm ] g val ] ] ]a ]c xm ] g struct-set! ] m ] ]m ] ] xm ] g make-parameter g
vlist-null g
vhash-assq f #-1# f # g object-address g print-inferior-struct g g %inferior-fluid-procedure g inferior-fluid g m-1f6d4c535-2de ` g t-1f6d4c535-2dc g t-1f6d4c535-2dd f l-1f6d4c535-2e3 f l-1f6d4c535-2e4 b f l-1f6d4c535-2e0 bo mtmmmm}
]^ xm ]s ] g m-1f6d4c535-2da ` mtmmmmm ] ] ]
xm ] s g %inferior-fluid?-procedure g m-1f6d4c535-2ed `
g t-1f6d4c535-2ec
f l-1f6d4c535-2f2
b f l-1f6d4c535-2ef bo mtmmmm}
]^ mtm%mmmm*m/m3m8m=mBmGmLX ] ]\ ]^ ]a ]c xm ] ! "! #xm $]# %g %inferior-fluid-number-procedure &g m-1f6d4c535-2f9 '&` (' )f l-1f6d4c535-2fb *) +bo(* ,'m+tmmmm} -]s, .r- /.[ 0m+tmmmmm 1]~0 2r1 3Z/2[ 4'' 5f l-1f6d4c535-2fe 6f l-1f6d4c535-2ff 756 8b47 9'8m+tmmmm}
:]9 ;]9 <x8m+ =]< >;= ?> @]0 Ar@ BZ/A[ Cf l-1f6d4c535-303 Df l-1f6d4c535-304 ECD Fb4E G'Fm+tmmmm}
H]G I]G JFm+ K]
J LIK ML N]0 OrN PZ/O[ Qf l-1f6d4c535-308 Rf l-1f6d4c535-309 SQR Tb4S U'Tm+tmmmm}
V]U W]U Xg %%-set-fields YxTm+ Z]XY [WZ \[ ]g t-1f6d4c535-2f8 ^] _f l-1f6d4c535-30d `_ ab^(` b'am+tmmmm}
c]^b dam+tmmmmm e]d fe g]d h]ad i]cd jie kxam+ l]k mhjl n]d oam+ p]
o qnep r]md s]d t]Fk ust vreu wgmqv xcfw yxm+ z]%y {g inferior-fluid-value |g %inferior-fluid-value-procedure }g m-1f6d4c535-314 ~}` ~ f l-1f6d4c535-316 bo ~mtmmmm} ]s r [ mtmmmmm ]~ r Z[ ~~ f l-1f6d4c535-319 f l-1f6d4c535-31a b ~mtmmmm}
] ] xm ] ] r Z[ f l-1f6d4c535-31e f l-1f6d4c535-31f b ~mtmmmm}
] ] m ] ] r Z[ f l-1f6d4c535-323 f l-1f6d4c535-324 b ~mtmmmm}
] ] xm ]X g t-1f6d4c535-313 f l-1f6d4c535-328 b ~mtmmmm}
]^ mtmmmmm ] ] ]a ]c xm ] ] m ] ]m ] ]{ xm ]| g m-1f6d4c535-32f ` f l-1f6d4c535-334 f l-1f6d4c535-335 f l-1f6d4c535-336 f l-1f6d4c535-337 f l-1f6d4c535-338 b f l-1f6d4c535-331 bo mtmmmm
] xm ] ]F ]{ f # g error * * f no matching pattern g g %%inferior-object-procedure g %inferior-object g m-1f6d4c535-3a3 ` g t-1f6d4c535-3a0 g t-1f6d4c535-3a1 g t-1f6d4c535-3a2 f l-1f6d4c535-3a8 f l-1f6d4c535-3a9 f l-1f6d4c535-3aa b f l-1f6d4c535-3a5 bo mtmmmm}
]^ xm ]q g sub-kind ] ] g m-1f6d4c535-39e ` mtmmmmm ]
] ]
xm ] q g %inferior-object?-procedure g m-1f6d4c535-3b4 ` g t-1f6d4c535-3b3 f l-1f6d4c535-3b9 b f l-1f6d4c535-3b6 bo m tmmmm}
]^ m tm%mmmm*m/m3m8m=mBmGmLX ] ! "]\ #]^ $# %]a &]c '& (xm )]( *%') +"$* , !+ -xm .]- /g %inferior-object-kind-procedure 0g m-1f6d4c535-3c0 10` 21 3f l-1f6d4c535-3c2 43 5bo24 61m5tmmmm} 7]s6 8r7 98[ :m5tmmmmm ;]~: <r; =Z9<[ >11 ?f l-1f6d4c535-3c5 @f l-1f6d4c535-3c6 A?@ Bb>A C1Bm5tmmmm}
D]C E]C FxBm5 G]F HEG IH J]: KrJ LZ9K[ Mf l-1f6d4c535-3ca Nf l-1f6d4c535-3cb OMN Pb>O Q1Pm5tmmmm}
R]Q S]Q TPm5 U]
T VSU WV X]: YrX ZZ9Y[ [f l-1f6d4c535-3cf \f l-1f6d4c535-3d0 ][\ ^b>] _1^m5tmmmm}
`]_ a]_ bg %%-set-fields cx^m5 d]bc ead fe gg t-1f6d4c535-3bf hg if l-1f6d4c535-3d4 ji kbh2j l1km5tmmmm}
m]^l nkm5tmmmmm o]n po q]n r]an s]cn tso uxkm5 v]u wrtv x]n ykm5 z]
y {xoz |]mn }]n ~]Bu }~ |o qw{ mp xm5 ]/ g #%inferior-object-sub-kind-procedure g m-1f6d4c535-3db ` f l-1f6d4c535-3dd bo mtmmmm} ]s r [ mtmmmmm ]~ r Z[ f l-1f6d4c535-3e0 f l-1f6d4c535-3e1 b mtmmmm}
] ] xm ] ] r Z[ f l-1f6d4c535-3e5 f l-1f6d4c535-3e6 b mtmmmm}
] ] m ] ] r Z[ f l-1f6d4c535-3ea f l-1f6d4c535-3eb b mtmmmm}
] ] xm ]b g t-1f6d4c535-3da f l-1f6d4c535-3ef b mtmmmm}
]^ mtmmmmm ] ] ]a ]c xm ] ] m ] ]m ] ]C xm ] g "%inferior-object-address-procedure g m-1f6d4c535-3f6 ` f l-1f6d4c535-3f8 bo mtmmmm} ]s r [ mtmmmmm ]~ r Z[ f l-1f6d4c535-3fb f l-1f6d4c535-3fc b mtmmmm}
] ] xm ] ] r Z[ f l-1f6d4c535-400 f l-1f6d4c535-401 b mtmmmm}
] ] m ] ] r Z [ f l-1f6d4c535-405 f l-1f6d4c535-406 b
mtmmmm}
]
]
x m ]b
g t-1f6d4c535-3f5 f l-1f6d4c535-40a b mtmmmm}
]^ mtmmmmm ] ] ]a ]c x m ] ! "] # m $] # % " $ &]m '] (]D ) ' ( * & ) + ! % * , + -xm .] - /g m-1f6d4c535-411 0 /` 1 0 2f l-1f6d4c535-416 3f l-1f6d4c535-417 4f l-1f6d4c535-418 5f l-1f6d4c535-419 6f l-1f6d4c535-41a 7 2 3 4 5 6 8b 1 7 9 0 :f l-1f6d4c535-413 ; : <bo 9 ; = 8m <tmmmm
>] = ?x 8m < @] ? A]B ? B]C ? C]D ? D A B C Ef #<~a ~:[~*~;~a ~]~x> Fg smob Gg
inferior-smob Hg
inferior-port Ig %visited-cells Jg visited Kg -> Lg m-1f6d4c535-525 M L` N M Of l-1f6d4c535-527 P O Qbo N P Rxm Q S] K R Tr S U[ T[ V U挤 W[ V Xg parameterize Yg object Z Y [ Mxxx \f l-1f6d4c535-52a ]f l-1f6d4c535-52b ^f l-1f6d4c535-52c _f l-1f6d4c535-52d ` \ ] ^ _ ab Z [ ` bx am Q c] X b d] I b eg vhash-consv f] e b g d h g ig symbol->string jg
string-length kg bytevector->uint-list lg invalid-struct mg address->inferior-struct ng and=> og
vhash-assv pg cdr qg cell->object rg string->symbol sg variable tg substring ug bytevector->string vf
ISO-8859-1 wg bitwise-ior xg little yf UTF-32LE zg big {f UTF-32BE |g make-vector }g fold ~g weak-vector g
dynamic-state g program g bignum g double g
hash-table g objcode g vm g vm-continuation g array g bitvector g bit-set? g
integer->char g undefined g
eof-object g unboundC 5h ]4
89K5 4N > " G 4OiP5:RQ h ] C g peek
g open g type-name g filenamef system/base/types.scm
D
g nameg %memory-backend-procedure CRR4U;VY\ h k ] C c g
t-1f6d4c535-3
g
t-1f6d4c535-4 g
t-1f6d4c535-5 C; h X ]L 6 P g a
g filenamef system/base/types.scm D
CZ h H ] L 6@ g filenamef system/base/types.scm D
C h ] C
C hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 g x
n g tmp n g tmp " n g tmp > n g filenamef system/base/types.scm
D
n C5;RQ 4 Q> " G Ri QRQ h ] $ CC x g obj
g filenamef system/base/types.scm
D
g nameg %memory-backend?-procedure CR4U<VYj h 6 ] C . g t-1f6d4c535-16
C< h X ]L 6 P g a
g filenamef system/base/types.scm D
CZ h H ] L 6@ g filenamef system/base/types.scm D
Cl h ] C
C hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 g x
n g tmp n g tmp " n g tmp > n g filenamef system/base/types.scm
D
n C5 " G M N C g bv
9 g index 9 g count 9 g ptr 9 g mem 9 g filenamef system/base/types.scm
W X X Y X Z
4 [ 6 [
9 g nameg read-memory! C hX ) ]H K$ 4 5 45 64O 5 4> " G C ! g address
S g size S g current-address S g ptr ) g bv ! ) g port : S g filenamef system/base/types.scm
T ^ _ _
` ! _
) a * b . b 5 : b : b
= e
S g nameg open C =RQop h( ]
&
" 4 5 6 g backend
$ g address $ g peek $ g filenamef system/base/types.scm
j
l l $ m $ g nameg % dereference-word-procedure CR4U>VY# h R ] C J g t-1f6d4c535-c4
g t-1f6d4c535-c5 C> h X ]L 6 P g a
g filenamef system/base/types.scm j
CZ% h H ] L 6@ g filenamef system/base/types.scm j
C' h ] C
C hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 g x
n g tmp n g tmp " n g tmp > n g filenamef system/base/types.scm
j
n C5>R4U?VY(789; h W ] C O g dummy
g backend g address C<GIOPQR h0 i ] C a g dummy
. g backend . g address . g size . . C h@ ]4 5 $ @4 5 $ @ 6 z g x
9 g tmp 9 g tmp " 9 g filenamef system/base/types.scm
p 9 g
documentationf Return an input port to the SIZE bytes at ADDRESS, using BACKEND. When
SIZE is omitted, return an unbounded port to the memory at ADDRESS.g
macro-typeg syntax-rulesg patternsg backendg address g backendg addressg size C5?RS: h ] 4 5
45 6 g port
g bv g filenamef system/base/types.scm
~
g nameg get-wordg
documentationf 2Read a word from PORT and return it as an integer. CTRQoK h0 ] & " 4 5 $ 6C g backend
/ g kind / g number / g proc / g filenamef system/base/types.scm
% - / g nameg % type-number->name-procedure CUR4U@VY\ h q ] C i g t-1f6d4c535-101
g t-1f6d4c535-102 g t-1f6d4c535-103 C@ h Y ]L 6 Q g a
g filenamef system/base/types.scm
CZ% h I ] L 6A g filenamef system/base/types.scm
C h ] C
C hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 g x
n g tmp n g tmp " n g tmp > n g filenamef system/base/types.scm
n C5@R4UVY
h@ ] C~ g dummy
@ g port @ g name @ g len @ g rest @ g body @ @ C h( u ] C m g dummy
" g port " g name " g rest " g body " " C h Q ]C I g dummy
g port g body C
hP ? ]4 5 $ @4 5 $ @4 5 $ @ 67 g x
P g tmp P g tmp " P g tmp 9 P g filenamef system/base/types.scm
P g
macro-typeg syntax-rulesg patternsg portg
bytevectorg nameg len g restg ... g body g portg nameg restg ... g body g portg body C5R4UVY hP , 3 C g dummy
O g bits O g a O g b O g n O g c O g
consequent O g alternate O O C h@ ] C g dummy
: g bits : g x : g n : g c : g
consequent : g alternate : : C h0 ] C g dummy
+ g bits + g n + g c + g
consequent + g alternate + + C ,-/0235679 hX , 3
C g dummy
W g bits W g a W g << W g n W g c W g
consequent W g alternate W W C hh ]!4 5 $ @4 5 $ @4 5 $ @4 5 $ @
6 g x
g g tmp g g tmp " g g tmp 9 g g tmp P g g filenamef system/base/types.scm
g g
macro-typeg syntax-rulesg patternsg bitsg ag ||g b g &g ng =g c g
consequentg alternate g bitsg xg &g ng =g c g
consequentg alternate g bitsg _g &g ng =g c g
consequentg alternate g bitsg ag < n g filenamef system/base/types.scm
n C5R 4 > " G i R h | ] $ CC t g obj
g filenamef system/base/types.scm
g nameg %stringbuf?-procedure CR4UVY h 7 ] C / g t-1f6d4c535-1f2
C h Y ]L 6 Q g a
g filenamef system/base/types.scm
CZ h I ] L 6A g filenamef system/base/types.scm
C h ] C
C hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 g x
n g tmp n g tmp " n g tmp > n g filenamef system/base/types.scm
n C5Ro h ] &
C 6z g s
g filenamef system/base/types.scm
g nameg %stringbuf-contents-procedure CR4UVY'.3 h : ]C 2 g err
g s C6<A h : ]C 2 g err
g s CDJP h : ]C 2 g err
g s Cl h 7 ] C / g t-1f6d4c535-1fe
C h Y ]L 6 Q g a
g filenamef system/base/types.scm
CZ h I ] L 6A g filenamef system/base/types.scm
Cn h ] C
C h ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 g x
g tmp g tmp " g tmp 9 g tmp P g tmp g g tmp g filenamef system/base/types.scm
C5R4ULVY~ h v ]45C n g dummy
g check? g s g getter g expr C h( ] 4 5 $ @ 6 g x
" g tmp " g filenamef system/base/types.scm
" g
macro-typeg syntax-rulesg patternsg check?g sg getterg expr g ... C5LR4iio hP ]4> " G 4 &
" 4 5> " G 6 g stringbuf
J g port J g filenamef system/base/types.scm
% # : F % J
J C> " G h ] C g name
g fields g filenamef system/base/types.scm
g nameg %inferior-struct-procedure CR4UVY h T ] C L g t-1f6d4c535-240
g t-1f6d4c535-241 C h Y ]L 6 Q g a
g filenamef system/base/types.scm
CZ h I ] L 6A g filenamef system/base/types.scm
C h ] C
C hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 g x
n g tmp n g tmp " n g tmp > n g filenamef system/base/types.scm
n C5R 4 > " G i R h ] $ CC z g obj
g filenamef system/base/types.scm
g nameg %inferior-struct?-procedure CR4UGVY h 7 ] C / g t-1f6d4c535-250
CG h Y ]L 6 Q g a
g filenamef system/base/types.scm
CZ h I ] L 6A g filenamef system/base/types.scm
C h ] C
C hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 g x
n g tmp n g tmp " n g tmp > n g filenamef system/base/types.scm
n C5GRoH h ] &
C 6| g s
g filenamef system/base/types.scm
g nameg %inferior-struct-name-procedure CR4UHVY h : ]C 2 g err
g s C h : ]C 2 g err
g s C h : ]C 2 g err
g s C h 7 ] C / g t-1f6d4c535-25c
CH h Y ]L 6 Q g a
g filenamef system/base/types.scm
CZ h I ] L 6A g filenamef system/base/types.scm
C h ] C
C h ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 g x
g tmp g tmp " g tmp 9 g tmp P g tmp g g tmp g filenamef system/base/types.scm
C5HRoI h ] & C 6~ g s
g filenamef system/base/types.scm
g nameg !%inferior-struct-fields-procedure C R4UIVY.5: h : ]C 2 g err
g s C=CH h : ]C 2 g err
g s CKQV h : ]C 2 g err
g s Cr h 7 ] C / g t-1f6d4c535-277
CI h Y ]L 6 Q g a
g filenamef system/base/types.scm
CZ h I ] L 6A g filenamef system/base/types.scm
Ct h ] C
C h ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 g x
g tmp g tmp " g tmp 9 g tmp P g tmp g g tmp g filenamef system/base/types.scm
C5IR4UVY h v ]45C n g dummy
g check? g s g getter g expr C h( ] 4 5 $ @ 6 g x
" g tmp " g filenamef system/base/types.scm
" g
macro-typeg syntax-rulesg patternsg check?g sg getterg expr g ... C5Ro h ] & C 6 g s
g val g filenamef system/base/types.scm
g nameg &%set-inferior-struct-fields!-procedure CR4UVY h T ] C L g t-1f6d4c535-2a5
g t-1f6d4c535-2a6 C h Y ]L 6 Q g a
g filenamef system/base/types.scm
CZ h I ] L 6A g filenamef system/base/types.scm
C h ] C
C hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 g x
n g tmp n g tmp " n g tmp > n g filenamef system/base/types.scm
n C5R4ii5 /oH/ h ] L& L 6L 6 g field
g filenamef system/base/types.scm
/
0 1 ' 1 2 + 2 CI h 9 ]4 4L 5 5$ 64 &
" 4 5> " G 4L 5$ " 4
L > " G L 4L 4
4L 5 55Y4 O & " 4 5> " G Z4 56 1 g struct
g port g filenamef system/base/types.scm
' (
( (
( ) )
+ ! + $ , @ + I - ~ . . 3 . - / 3 / 4 4 4 C O R4iii> " G h ] C g number
g value g filenamef system/base/types.scm
9
g nameg %inferior-fluid-procedure CR4UVY h T ] C L g t-1f6d4c535-2dc
g t-1f6d4c535-2dd C h Y ]L 6 Q g a
g filenamef system/base/types.scm 9
CZ h I ] L 6A g filenamef system/base/types.scm 9
C h ] C
C hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 g x
n g tmp n g tmp " n g tmp > n g filenamef system/base/types.scm
9
n C5R 4 > " G i R h ] $ CC y g obj
g filenamef system/base/types.scm
9
g nameg %inferior-fluid?-procedure CR4UEVY" h 7 ] C / g t-1f6d4c535-2ec
CE h Y ]L 6 Q g a
g filenamef system/base/types.scm 9
CZ h I ] L 6A g filenamef system/base/types.scm 9
C$ h ] C
C hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 g x
n g tmp n g tmp " n g tmp > n g filenamef system/base/types.scm
9
n C5ERoF h ] &
C 6} g s
g filenamef system/base/types.scm
9
g nameg %inferior-fluid-number-procedure C%R4UFVY3:? h : ]C 2 g err
g s CBHM h : ]C 2 g err
g s CPV\ h : ]C 2 g err
g s Cx h 7 ] C / g t-1f6d4c535-2f8
CF h Y ]L 6 Q g a
g filenamef system/base/types.scm 9
CZ h I ] L 6A g filenamef system/base/types.scm 9
Cz h ] C
C h ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 g x
g tmp g tmp " g tmp 9 g tmp P g tmp g g tmp g filenamef system/base/types.scm
9
C5FRo{ h ] & C 6| g s
g filenamef system/base/types.scm
9
g nameg %inferior-fluid-value-procedure C|R4U{VY h : ]C 2 g err
g s C h : ]C 2 g err
g s C h : ]C 2 g err
g s C h 7 ] C / g t-1f6d4c535-313
C{ h Y ]L 6 Q g a
g filenamef system/base/types.scm 9
CZ h I ] L 6A g filenamef system/base/types.scm 9
C h ] C
C h ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 g x
g tmp g tmp " g tmp 9 g tmp P g tmp g g tmp g filenamef system/base/types.scm
9
C5{R4UXVY h v ]45C n g dummy
g check? g s g getter g expr C h( ] 4 5 $ @ 6 g x
" g tmp " g filenamef system/base/types.scm
9
" g
macro-typeg syntax-rulesg patternsg check?g sg getterg expr g ... C5XR4ii/) hH ]
$ - &
4 564 56 4 56 g fluid
C g port C g w ) g filenamef system/base/types.scm
@ A C , ! E ' ) C * A C C> " G h ] C g kind
g sub-kind g address g filenamef system/base/types.scm
J
g nameg %%inferior-object-procedure CR4UVY\
h q ] C i g t-1f6d4c535-3a0
g t-1f6d4c535-3a1 g t-1f6d4c535-3a2 C h Y ]L 6 Q g a
g filenamef system/base/types.scm J
CZ h I ] L 6A g filenamef system/base/types.scm J
C h ] C
C hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 g x
n g tmp n g tmp " n g tmp > n g filenamef system/base/types.scm
J
n C5R 4 > " G i R h ] $ CC z g obj
g filenamef system/base/types.scm
J
g nameg %inferior-object?-procedure CR4UAVY, h 7 ] C / g t-1f6d4c535-3b3
CA h Y ]L 6 Q g a
g filenamef system/base/types.scm J
CZ h I ] L 6A g filenamef system/base/types.scm J
C. h ] C
C hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 g x
n g tmp n g tmp " n g tmp > n g filenamef system/base/types.scm
J
n C5ARoB h ] &
C 6| g s
g filenamef system/base/types.scm
J
g nameg %inferior-object-kind-procedure C/R4UBVY=DI h : ]C 2 g err
g s CLRW h : ]C 2 g err
g s CZ`f h : ]C 2 g err
g s C h 7 ] C / g t-1f6d4c535-3bf
CB h Y ]L 6 Q g a
g filenamef system/base/types.scm J
CZ h I ] L 6A g filenamef system/base/types.scm J
C h ] C
C h ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 g x
g tmp g tmp " g tmp 9 g tmp P g tmp g g tmp g filenamef system/base/types.scm
J
C5BRoC h ] & C 6 g s
g filenamef system/base/types.scm
J
g nameg #%inferior-object-sub-kind-procedure CR4UCVY h : ]C 2 g err
g s C h : ]C 2 g err
g s C h : ]C 2 g err
g s C h 7 ] C / g t-1f6d4c535-3da
CC h Y ]L 6 Q g a
g filenamef system/base/types.scm J
CZ h I ] L 6A g filenamef system/base/types.scm J
C h ] C
C h ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 g x
g tmp g tmp " g tmp 9 g tmp P g tmp g g tmp g filenamef system/base/types.scm
J
C5CRoD h ] & C 6 g s
g filenamef system/base/types.scm
J
g nameg "%inferior-object-address-procedure CR4UDVY h : ]C 2 g err
g s C h : ]C 2 g err
g s C h : ]C 2 g err
g s C , h 7 ] C / g t-1f6d4c535-3f5
CD h Y ]L 6 Q g a
g filenamef system/base/types.scm J
CZ h I ] L 6A g filenamef system/base/types.scm J
C . h ] C
C h ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 g x
g tmp g tmp " g tmp 9 g tmp P g tmp g g tmp g filenamef system/base/types.scm
J
C5DR4UbVY > @ D h v ]45C n g dummy
g check? g s g getter g expr C h( ] 4 5 $ @ 6 g x
" g tmp " g filenamef system/base/types.scm
J
" g
macro-typeg syntax-rulesg patternsg check?g sg getterg expr g ... C5bR h( U ) 3 C] C M g kind
g address g kind
" g sub-kind " g address " g filenamef system/base/types.scm
R V R ! X " g nameg inferior-objectg
documentationf SReturn an object representing an inferior object at ADDRESS, of type
KIND/SUB-KIND. CVR4ii/ E) hP ] $ 9 & #
64 56 4 56 g io
O g port O g w 5 g w 5 g w # 5 g filenamef system/base/types.scm
[ \ + ^ , 5 ^ 6 \ O C> " G V FQoK hX _ ] & " 4 5 $
45" $ " 6 W g backend
Q g type-number Q g address Q g proc ! : g t : M g filenamef system/base/types.scm
b
e f . f 2 2 f : f Q e Q g nameg
inferior-smobg
documentationf LReturn an object representing the SMOB at ADDRESS whose type is
TYPE-NUMBER. C GRVQoK hX _ ] & " 4 5 $
45" $ " 6 W g backend
Q g type-number Q g address Q g proc ! : g t : M g filenamef system/base/types.scm
j
m n . n 2 2 n : n Q m Q g nameg
inferior-portg
documentationf LReturn an object representing the port at ADDRESS whose type is
TYPE-NUMBER. C HR4ii5 IR4U JVY W c d f h h h ] C ` g dummy
g address g object g body C h( ] 4 5 $ @ 6 g x
" g tmp " g filenamef system/base/types.scm
y " g
macro-typeg syntax-rulesg patternsg addressg ->g object g bodyg ... C5 JR:QopJ i jLS I eJ h g ] L 6 _ g t-1f6d4c535-5af
g filenamef system/base/types.scm
C kV l h ]s
&
" 45 45 45 &
" 45 45 45 $ 745 4 5
&
" 45 4 5
$ 4 5" +& " 4
5 4
5 4
5
45$ " 4 > " G 4 4 4
5 55Y4O 4
45 55 & " 4> " G ZCZF 6 g address
g vtable-data-address g backend g layout-address g peek % 1 g layout-bits 1 g layout < g name-address F g peek b n g name-bits n g name y g layout g len
g address g peek g slots g open
g port
g fields
g result " g t-1f6d4c535-5a8 & g values g filenamef system/base/types.scm
1 4 < E F F K n q y ~ 1 2 2
. " " &
p z 6 / g nameg address->inferior-structg
documentationf ^Read the struct at ADDRESS using BACKEND. Return an 'inferior-struct'
object representing it. C mR= n o I pQoT m q r)V s tS: u v w x y z {L.18 | e } h ]L C | g element
g index
g filenamef system/base/types.scm
CJ h g ] L 6 _ g t-1f6d4c535-732
g filenamef system/base/types.scm
C k ~ H O s Ga X h
- . , 3 # 44 45 55 $ C& " 45 4 5 4 5
$
6 $ n4 5 4 > " G 4 > " G 4
5 $ "&
6456 456 $ 4 > " G 6 $ c4 5 4 5 4 5
4
5 $ ) &
64 56 4 56 $ Q4 5 4 5
$ " 4 > " G 4
5 C 4 5$ 4 5
4
5
$ " 4 > " G 4 4 5
& " !
& "" 44
55
5
C
#$ W4 5 4 5
$ 4$%5" (& " 45
4
5
64&4' 55 ($ 4) 5 4 > " G 4) 5
4
5 4*
5 4+5$ " 4,-./ > " G 4 40 45 55Y412O
434O 454 5 55> " G ZCZF 6$ 7 64&4' 55
8$ &4) 5 4 > " G 9 C :$ ; 64&4' 55 <$ 4) 5 = 6 >$ ? 6 @$ A 6 B$ }4 > " G 4CD5
$ 4$%5" -& " 45 44CD55 44CD55
4 5 C E$ 4 > " G F 6 G$ >4 > " G 4 > " G 4 > " G H 6 I$ 4 5 J6 K$ L 6 M$ N 6 O$ P 6 Q$ R 6 S$ T 64&4' 55 U$ '4) 5 4 > " G V 6W6 }
g address
g backend g t ) g open N [ g port [ g tag d g tag k g tag g buf g v g w g tag g tag * g buf < g start E g len
N g v Y g w o ~ g tag g len g buf
g remainder g string g tag g len
g buf , g remainder , g v
] g string
g tag
g len g address g open
g bv-port
g tag g len $ g len
A g words O g vector X g t-1f6d4c535-729 \ g tag g tag
g n 7 g tag < g tag ` g
flags+type t g tag g tag g tag g address E g open ) g port ) E g words 9 E g tag G g tag n g tag g address g tag g tag g tag g tag g tag ) g tag M g smob-type a @g filenamef system/base/types.scm
! %
) ) 7 [ ^ % $ ( * Q | & ~ . " $ ) , T Y . i 9 o . w 6 | .
9 A D M 1 O O R X \
7 6 < K O P " & 8 8 & ) , 1 2 9 9 ? 1 D
G h l n # ' ) 8 < = | g nameg cell->objectg
documentationf WReturn an object representing the object at ADDRESS, reading from memory
using BACKEND. C qR=.18Qop n o I p: eJ q V h | - . , 3
# 4 4 55 $ 6 $ &
" 4 5 4 5 4
5 $ 4 4 4
5 55 $ C
45$ " 4 > " G 4 4 4
5 55Y454&
" 4 5 4 5 5ZCZF 64 4 55 $ 4 5 64 4 55 $ q4 5
$ C $ C $ C $ C $ C $ 6
$ 6 $ 6C C t g bits
g backend g tag ' g tag ? g peek d p g type p B g pair? { B g t : g cdrloc : g pair : g t-1f6d4c535-80f : g peek # / g tag S g char g o g tag g flag g filenamef system/base/types.scm
M p s { { * " * 3 4 B C o p
( g nameg scm->objectg
documentationf LReturn the Scheme object corresponding to BITS, the bits of an 'SCM'
object. CJRC g m
, g rtd
g rtd
A B g rtd
P Q g %printed-struct
c f g rtd
j j g rtd
~ g filenamef system/base/types.scm
- B 3 B
5 B 8 @
D
h K
j
$ ~
%P
=
=
=
=
= =
= =
= =
=
=
=
=
=
>
>
>
>
>
>
>&
>,
>2
>8
>>
>D
>J
>P
>V
>\
>b
>j $ >k >o
>w
" >x
>|
> % > >
> & > >
?:
L#
N"
c & c & f %
f 6
g 9
y ?
{ J
Q
Z
b
j
v r
K
C6