From e8d03b642c15de2302ba23c4dc8924397897fff3 Mon Sep 17 00:00:00 2001 From: mainzelm Date: Thu, 19 Oct 2000 08:27:36 +0000 Subject: [PATCH] Snapshot for the generated files. --- build/initial.image | Bin 594329 -> 594441 bytes c/scheme48.h | 10 +- c/scheme48heap.c | 792 ++++----- c/scheme48vm.c | 3750 ++++++++++++++++++++++--------------------- c/sysdep.h.in | 23 + 5 files changed, 2300 insertions(+), 2275 deletions(-) diff --git a/build/initial.image b/build/initial.image index 4dc064d76473a0cbb21b1fba9d191d806b22deec..60d088ab456d479ec918ae75105cddcfe4955c9f 100644 GIT binary patch delta 82764 zcmeFa4|F6|o&H@(4_%QsY23(!Ny9XgR$2{1kf;p=2^uv*)F4r!W|uhhgfM299;asv z7}rLkMkh$nD3{$JQNt26EVKGc#bXH^QSULF+r{1$YIt z{4QvHkL@lv1M;95{|9)1-;*`C9UWN>T8*F;{FvXcjwLtitY}cc=!Xs?|4DS0w zFl~kZJ!mB{?!jn8ccSk{526Rw$&l>_*`7iVJ{hzgMo+`}KL@Qx(QEKPF=!2eZv4ma z=Fv^)C(un#1+6hK35w+L2fRh}BKnV3+OpzL2d!oBBmo=n^fN*0DRdSdv~25HbiB;A zIzgt~wyZMC%EQe8+iC+f#My+GL|1RJt$L8#2wD|*UFhzkZ0n`yX*f`6Ta$zx!}b)q zJzYfx1iT!>poc@YwN9er*q%V=s%ul>4=$eyktLfFY zwRC}Py^8Jm?{BhBhD&VEY_qLX(On(3wFXKcjQ2Xc_O;SHfzz+Cwz>m0V%(R~-%mYLsVy@l<5bOFSVx2?Ccy@qb@q~c-QdI#HG=v7dx zwXO5n4!qB{5@4>@-e$cAV}Xq!0^f&jc)x8;gA8ag&wcc$nsgDFy~wsMB{*`iZH@Gh z-{);>58IVru&oXdZY;C*vE7HB0makGtOIQ4(3PXMbve2LUSs=X=r}rRZ0kz&7(8{o zZG95G0Gofbt&yCv58m z^dLMA7H+bwuduxW5C4;GO@LozvV|Ct)! zO8)`hVLJ;qP1E0QV-IP$@8QMKZJ_B}^u;OL`T<@mx&yR)n?k=~Tesu2iw2`J#Cvs_ z^<%tobOua)hu%QEJMm`G*);#newPfsZd*UYoJY5QkHh_a65L{2_u#dlyFlB&&<{UQ zX5Ek1iB5v`Nwo# zu=p2-Fx&Be<2a-Lh+apxqn|{ZpV-zsn8}hD?sfT-PTLwN1ud(bzVuVN z+FguZ^afm?;}G6$TNP|4;R0B@o8v!B;7cXJ0v#893_6XT1TFV6dfD!U$8NQ(qNHmaN8mSi11gioj}in0Nbx(dkGzVkp6X_ZJo?^(}NuUL5wks zQ!&QSfnPFU9$^@>JqgE`X#tRWAZVSAmqr&s=uuki7eVVRyd-)BMA$xu?G1GQuWf7N zzM%CMwnxxo;O*#1IQtt$FM2tRn0=g~%f`%#ZN;9DOfBm@Z0FGRzoQkv_~VxKKD-p# z{GQB7^S5kg(Zj1YmloUlAlnn@?muuy?z602Z1;)&6NiiNOWCej=kS5tZyDljr{~x( zes^6&*o8fu2N{$lwoX`{nE%_#=7*eiEL6 zGvF!oJp3$NfV;L-P-`wV@Dwn|Ral$Yo`KVyTd4(DIkv*8z#K=%>ng05q9f4?s}Ib? zDy(DJUVu}tqQYQtdxiCKybQYg)fHAhSUs`AIu36VJ&isd-S(Oat6@ilbs~Bmu0Dm< z0Iy&>eM&{zDzUMAa)tFO47-8ap2}XZeKOlAbl+<$tVy;{WqT0a+eii2ejVEr=!rOS z*gl=@#?$E+VCm?9br#$6=(aN{l<;%d9z{32k-pGeVHN8uthWT1qvY6VJcmLs-cF=u zbnZqV>#J&`;cCj5zpGQw^!vHM=T#7l0Zhr^I`fU}~9=3pN*?VAwvucKBT! z67=QhIdmKPW9URXd7`gG+vitUHu{t3DRhAfeFokBZjOIH|6R>S8om~ufX6PVu)c`S zz?t_j9MOw#`n?QE^g5j91oIV%e<6qLB8DQmy}QC%_#mSxZ&|mny@H%VY zK|R|)W_ttOeHr7MJnv+C5j~$|c%ton6;?CoPBBE;9)OopjQN2H^ZmGUGT^VLlQj$=RoN53`w@@;S9)wHvF^j!e6MchQR0-82>9IJ_mCiqx2=l zB)ac9PNiUZj3LQ(5gxmN&IFc-^A5ZMx)*&udg#j))&{7#kv;n&!xFC*y$S;397eqN z;WeW3qYO**B6@U`rv4xs17Ben5wHs#`D%qV2QEeD;XUv=Jo7b%AUZX{8S^HFA9@6i z{S%pflOf1<5uW*HGLA3|*-=-DN*Q4zjIvx53^c1=h{S|ckcW8m*8II_6^gQ|&wD~Ua(ceTj z{V)0z`ZjcWnT^#j!;g)z*$Qg_{XKN^_lSi40lI)*uVu)ghrZ9TL;o0E|1TWt3_}gQ z0k`~+p@!~)C&4}F8TfuU50}7$=)fGK369Kh{9D<0l#QwLkFp+v+u5E3PoQVvKfnuc z-#kMHy$rYhn9liAMh@HKa0u@y^a{G`E)FF~+`%Zqn?MJ09J1RPMMu&3&|N=c6rqQH zmgbVkM(S>^ei*}W!vY0>5)ogD*N>h@A0vtHp>pV#qvz1W=;P3dd(mJa&q!i>6&|^t zxF9Mc3U3iz_yi*gJ@5$2VCE7hBd(!aRg{^GmJSr$2Ml`+gLN z|E_HIJ?8~K{;Bk%>qJdnw8L!K}&046~?$A4>}`hGI3Ewkcq7f6E%kOM^^GwpUT z0LDQE$ZXtZmfiq5z{s{TXVyNBo(HR-#xAoyO;1R&Gu*ORcf6DxzI5mQ9s7HB?z*Bm z=mZX%`|b%w%cjkrh4QBM-e5y{;9k>qZ*W^#)O_e(+*WhVy}@uUU-`c=?s15;oDY=G8BNCReoRILD4FEiS}Fvx&a z5POv8eqa>LgB1|{H3Q_=JRlrI%zy%@{|zGzq`@>;2H^sU!8lj|>md3V4+Fs%$bo8} zaJGOHkhYgLm}kdCFTfkBrIJfNz4FjY-AEF!{*X!E6s)VQVb3LD6mIe~;SEa?9z9O2 zZn$6dVvb{Eu2~93H;o>tVODDfQB@Q61$-4?iqNdQ17l!zMBv+;VnC!?JLI zL+9)uJC*m+pqG7m)u)SYSzE)JE(SNNmOXDY7ygQ&)u~nj9#@@&M}c&>0rQW)3O0vk zHAot0{#VYPS1qZx0Xl{dTZ*HV0+nV;Hn7ySE^AD$CurzwX4?!r&VX~9v`O`EoW`w*tJeazABk&D z%m%lHdexB1rhemgv|;rOJnJ?yHPp5Lo*VLD)mmYJQ zKceCFaQsMIr}?Ye)#!qIf9qskn^tcao=`2v*8Eo5)x9od%tOBoMo(GNVCiBjs@LI4 zUSP>S=k8|0ul{1rtX*Jld4H5J=i+{}W$j7!@7UAxk)A!Y;i1#%wuDXbE-eSf&>64{ z0=(#ofjlpcIIZxAFMh`p!Bd@#ByqO}^uhkb{pyQ1 z_(ag`JICH0o>X%N&Z(9Q&>Rtt`DjJmX7$$K(i2X<4OiWx8cFjvUJg)zSjfFOpW`WPNeGe56&EUH?LB6;aek zFV?JwPNpMrYZJL5V2xZJur|5^&I?U>$(g&(eeo%8L#KeeC6&(9Y%cnJFuFCtrqf?Y z-m~}MWwfc+*M3hY8#Dj%dnU27<^dv?EtzM2A8dcGyepNg<$bDTcjy=%YGo|;y(mqCmaqYw?TqmrMbxtYi=TAyx@IaZpU$JhAFu8T|17#SZYuVGv$ndk!vv zj<0XBdjCW}`}=?usxGq@a?DNH?p$Y7-5;1e`9FfME`LcYDPBh{`prdu47QXpBLB#| zf6CnTN4jB_z$G9}n}?mI<-v9jZ6tdr#g#OC-4`zR6cTPz4QWqFUyb(CCp0{!;S#qI z-3pwZ;>Jx|ckm3MujdLUvkqV6Zgjs!?sFqschFXeox7xLC%#nP>)TS15#SXxrg{?g z;z(Q1sP7)>zdf=SIbY&M)rA)%UQ=H>s+XxvgL}FfT@PdrBY!f@e+q8d8ux{_pu04j z^T3~iHO>L>lBax8``UL1qh#_<(jj{AhhnTCt1r7be5rAk@VdDzQGy7BU# zf=4?UNn@;~_r*y& zgJMVnWT1?ymH{)aS`MUC?$E0k#iLw0@MVES zak$+V-r|Oz)T>?!Hoow*YT2`4H}2+X^)hhQJo0Df*~@cKT}eZ1*1t3YX_IO=2Attk zG|k1}w%7CD;l3r;#WsyAhq+U=q)VulzL+#$C^GXMRcjocRV_O@Rg@jwmX_1)g6G5Q zswKM>)d5~(c*9}?&(l(s%BS3FOI2!AOWLSvYGO60_U9wzwmubno3qayMCkS<_6q33 z^RyJ!uW_Wi5BlPdm~TH7jMmJkH3#QZOBed!XDhazS5RXOE~%D^dimQdCGxbCRn4{> z4=F36TH@C~ZQ7sam~`UxgE24%n~X>;RWnBOtYldU=Ph)}_lKNpN`siYO0 z;u)9w54v3;@|9_iDRWa?qU0QDW*~YG2RZT~3Kn%l^_^>{o7W^TH+Fo}Qk4nlACBtL)_t zuUmNC!QT}Q9nX<2W9<%D1a>(KJwPuoKt_sOUj_*iJpzxF+1Gt5xV>gZy*W7Ng>MAi zYf3?lHMsPGz}jlfIReL3%Uw`?xmkFdT^DLsPtF)!<+j;(bMV-zl$vRHxZHHT+pbGb z_##fLmWzWVlwO|2^BT@Q6e(vnVY{fq=W)GJ-;?$=V9L`Yl!r;U$nM zM59I$&+{d*r==}BeQ^>2+noO%``Gk=nnUoYYMCi}3CHm~Eho?^jWY}9fZW_nWXqj# zFK;|^XBunMZ>`OKPX%DLch=5q3|H@Umb{n}w)PAC!eC5~4a*`v7n zEpWRR$L!r?*Sva)O{vcekfocloHNB+BB_hqRLXKsX}BhH>n1z$5-CLv9Cvb??3fHr z+_DX`?I=519zDvm9A!IGrK9ZBo2r8>$mA}hh9x24qsbQ3@1~E!avvm9y(Z0GYAZ!e z5hhhAz>~AJLA!oadHvC*^=SJ-ImsMtJ0}^TIrG5LcD!uOR8`uMwA3q9>9&e=p0MiZ z#3n1Iy8esIGgN0@R%SJ;Uf|;0rn>7tIsU4pjtSLL*Q9Ex^MGn;nxRVjHO{e=9T?RB zxxXG)EjuJTc*^-q_{;;9c6>|MX7&{nf#mJ%f7NXCrS`>TWl8ht&33!&;byz7E>Oin zG@9`zA+jhdv&uqcRd!ibu>81k>l9Auu`1J2WuJLb7xAP=Nws@bOH-s&%Mq0Yyxu8e zShXB&r*^O4O$*+olqEeu@{#-GRSsVyWR|Mzy_~Pl3)y{JCD??H6z3#Ahg(N;cgT)x zm2n|`O8T(mBGKDeH8wjNJjPxMr01)3)N@7H+tYuz){FR3JBeRVE$P-&OCK$%o`vm~ zyYZy~t5r*PkEnJY!l;&(h`T!NRIWt>q*>ZkONF~s`vd|+d2r+ekak;#MX*lf1p?PKvQ%bCwNz$BwZAelxHr^4l>(*EL+{|R0vD{V;}~XO z7)*c+$b(f7*vh(N5U=3BcF;R}$+0%q?ljr}o8=4Bu-u1lY%902=w(m>;aaez%xZ!= z!1T8^S$(jqgPs5^j74!)4Ibj}W*K9RjFz2dEl6!U$>I5^ll;ErvObQ9!adx8<%(V3)7hrQIHt)^kCy(Jx^cQ}PJF(Z7pGu_t`TD&lxBJc0nbuiK6mfYp}6q!1B z@t)nO15S}C&nN!wy{R5~%P%`J?D^CovCDlLB>u!!`)!B!e1GyF(=Inb=6MNrI**Se zLEi80JmT~8yVeeu+qEXfD*y6Wt!ag~@}HYM^^qkFXEWuLY`V?IYwemd`n_OwefQp; z%XcOY9G;VodSN`gcbnxSJrXF%X?RMzAm>Hluw9beFOA~_7d)R?zIz|FKY7{ilmt8B z0mhAYxOesJ+36kbaM(13?OK^shq)*-`-isnd$HMv%aXee?%~0PRAR*3DzT_bSUQ0h zixy7q+I4t0=mZ4U7QJAq$^md1PBIA{ZyJubx114UG&)scZ=JOtiQUpxPC+eR7_F2# zu%C&$6Xb-^kjHZ^=Upn)WByCbvkq5e#tU<5;2t`uLC){*JW{j5^L+OSqQqyNzzKHb z^=s9FN6*g0rQQ*m z@WR{yxz}rojOWX-=(+4-S*IbD%6q<)>fA8z+_U?mJx&-CoNacbJhaU;Y?GGe^yE~W zsBUZSaN1h3X?d}*H@Y`JwDdMRdcxp~MWK}?`MCKZC8g)QC~|d9x&t%sc`^`o@lPwh z`T}1%hGZ4ssmxTT9wr@kZMPXF`D8GN4a9)2lj z?D_uT@@M@1&LidLp6Bm69KYcDJhPS^A--2|$)8}C+kvFuYR>S7cO2VmsQTyohx2K9 zo=-;FfL)%?LAY$EeYw-BNpsDKG{%TOY`1$uJ>hvyJ&)8UP zr`$b>%ba32JWulI*=vsj?(=Pa9f|?xvJOw8@(_x*?Dow$)wfuIKlK> zzK;{T+f(S5+wEw2&=Qb2|St>;HL* z^!}?W0gHeD%YFmXagYKTunJ;vrk!9E z%!75%bUJf;Fa{QZeFo`4uQ2%-I1fT+GLr@aU>2-^nkJ5aM-$U!Farvp{w(IcU;^ZU zWFiQ?kqm(7Bs{Kq0p0)&XHyX{2?`+6Og>;3WIz!}+Qd1e1q)y!&3_GVA|V(9IZy)i zZzeGq1{tslVlC`F7zazB<}Fkn41yU@0M&1$)j%3dgJlqY8_f=ez&uz74Xu<3(qsI$ z2&&&sLXZa2U>StYWsgA;jDrQR0h-PuF&G0mPy+RBR2U3{3|Ix>chCvJC|Cd+py{35 zY=9Y1cqg}Ak#}*|0){~btb%Ym3BeGMCYy&hK*RYI48}kX*zYDS7zSAoxPS_S0Wbx; zhYWouySg79Q7xT*@MQNPWoS~(8F=nw=fP!YQN04ZcCu}roeFLb*^Dj8wHl7>u+7Qe z3~oOuu4W6|t9pKcH}k6Hp=H+&=b`21w0gs^F}LopqoHZFGH`Z>Tllhit8kHWZs$?z zX`xeem*6(ljd$_v#itupOPS55m~^9EcUnTdBs}hmJK)npswLg1n{Ml@dh_s->dv3D z`qP}!U`K1$)!Kk-8r-T$aAkvOXyExQ|2b{d1h+Og`xWk1uMZwn-N2*R{s!Azduwoe z?UOBCFiSqJ1014yZW!v>FS#PqQ0BeQNc?gQsz1Xsghenv?JhrZiwEr{*GDIL)nGNj;lW zes!Z8@wN4A$iRuiy{hH7w)k|rYG=Hdk2l)U*V2ETWW#XA7uERmglb7P?Ib%buhudg z;sPTjOKGdVWJO=H!0Vim5{h|o;pW%5yVI#&0#3SK)sT9l@HlDTz=51qZysJ!EnR!z zb#B)Vt*f~KSH7Mn`s)>SwOs9_at&~+YUzMYgiEIjcdOY452}{_)lYKRkH)` z#@sVYckfqo5FWvF4$-8VGjL9|)9M@V$mNnMp% z?Qqu_Zs$v>mxhO3Z|j75({NU`bnc9KZ0D+9 zyQW?Vu4c+B1O9-U6)la53j10 zl9p9B-en@=!P>I}%(0~wA-Gd@81|+KauJNF-w3yeQm+;6RxOv0j>Fm+H&y+* zJqVAuX}3(OHv`Y9&fRTBei*E+TGZ_Vy!IxypV{0^Ncq)pZUb z?pCi4?l;%Gg^LWQZ6}v8c+$1z)XKq&j#ag$RtdJ>>SPv*a1$ow*TeC*I>W5CUA-`jCxr(@5ZZJRj&w#xUrLRWJdz383ax@hA;f>Wv`&)&B?^{pCK&%hIJcg~-ojCxr(|91DXw5nba4xH ztJeu9)EiK52p&~$O1)WlUcDvtR^WBltF7e5Tgs?`8&pgEqvyHxZ&j}Y?mo}0L%({1 z@Q8Yo>dnA&>Mg2QfY;Qsxv7`(s^LhRn_pbL7Pwu#UiDINT0NuQ1U#)?R=qsDtX@&Q zz&q&B?{LbfjiII7Mz~G2b9R1*v!AsI^^)+AYMCStX!y8#Q}DcMNk8j`S1qZx0EsqIp;7f!2|L@75>l~Hd3o_?1zso0WLFAp!Pmdhm* zvn@s44zzOsfYb19SZ&PPhTBxjPB*tZE3K*$>LuZUc4xrUj;c2f&#IO*Q|-=9g%{LY zg4exp>c7&iSJ2Ay^+>?c^WD~OQm+;6RxLZ-alVu3mVWgH;StrHKX-O8G^yJ&@Z9rCfEwx;8Gkj(ByWL7e;1<;qUawjv;BoVTcXJkG&6(3^y>ME!9Qo9{4VSID zTBF_soKY=VO~2c0TuFMhmf@l=c=g@xl_PY4n|&B=R4v)ZE^x9Bw|O3%R4v&jE^tpw zL+Xvf;}gv9Z5IL{(T`#stMaJ_12+sJ#Q+qo;bThwod zyHv}welMe5JWor7QW{6rhopV+hgBP2d|BuTcG{ zcv;Wld0L8@*Eq6{X2BPKNj1BAIKIU3(#kGvXq?Imc?@}>eZha(rzinl0x7J4ZP{;G zeb=N~+Mrc+hcCV~c(=LgLU}o;!6WdbYUwOvs-+Wo#mwM&T8f<0II@l?=Zn9n+TZCU zj+a*UujIygvt@U3RRAwMW)VCuffQD+ab$H<+!w#aT+(SrwxqBQu)0o?$YLoe<0mQ8 zaC$||Jo>r{+x)cCen(nDiketrcm;?Kz0a*g7;aV_gC&j(!$!0-Ows#v)reHOP2-4` zigvyrt@zS;lkc;eoV^?%!n{Tr@+Fo?qw0^tv#R9^F!erXD4KtNpM6YvNds2kb=Cgv zzJcfMnbfHA{qCMgcdt<`eJ`ropH^C;N&Qwh<%`qd>hr8_gx4&6Xs22DGq)?qRCYJ5 z;a-yry9u3DZbr4_F=2l4el87Jwes+)YB~2WzhBPdwX-LD!2a96ektAmd8hl|Et~uQ z^qp?|-*HE94}XFBB=dkZ?m*aCQ<^B4>afmyH)qL=g1 z4h(`ED1nwMNC%`cf@$=!Y^T`>eU$4lkbopS4i-S=01vsqAeaLsQ2#OZ02mIaU;7Vq$&HOh2X2Cj$euCPAK`;XfAaWJY2tXQS zz$%Ch(rRE7EP%>SQYh#LGoSz>pCTPdgK4k~LZ7C>APL4l%|e1DMCA~PK_3_cIZy)i zpP|NJ7-T>ZG=7%EU>q!gnnP3=41zhZ2I_}N2Zlig6hZ82x5X0hI9LFcpQ9O?K1ab| z60CvxYv^EL0xW~@2ptRzfLS0t+`~HCHP^actFnakqsM&P>CaOU;HC4XOqI2}-I+@b z+@RWtwA+0|)v8_x+^t@}dV}!DZe8Ipspbqkhv}?vSX8qB+aGdEk`)eX>dVBdwA;D$ zu8L@QJskg#VRZw4s-<2R-1{N7MrrkiVe=tf;xMgd23}Pyx7Jyo&a0L}mp|k@$~-O5 zrxQ20S+%4K`*cjTq-*TcN1*B@-~rV#p-T1{9?(R$sx=PJ`hutWocrd`f_h8vN}sb| z;SKdF_i&hi93pv;U$e)34_w=%W-HvSTI$-d$6eykuihX$rdsMe;%WMYH))lpT$5z% zEOD6A2swBW(^=xMre+C_T;^6sI)?4j)tBkJm$;fOaJ!nZUNuv&Q7z@BRXcxYO=M?@ z!?c*zRXDKMt%5wPFOtYv;t*Cd1~=|?yGNUPop3_E0riI9QP(?dO1)Wl zUG+S?qFU}17F0{CE$ua|S34zCnRF{s14onYtHe-~nyqjLrnAPOPtAUKFzMEAOub2X zMkAhjcD9@xXYI=?$a%*C0+YIH(g4-G(7E#JM7a& zwWOPH(}l9?<>BRh?hX~z3w)SU>xUh$Du$Nc+Xy#**m-go?o=-U52%*jo&2!dyQ@ak z9EYbqYnu8Zr%M08b`AY?=*3>M)cFM`;qzKn_sYpHCu3E~BtCkE} z+_+V}>ZRbc>(v_dCg6-}ISSJ$!$O4UR<)MlqAz$=vt+@BQ+ybX9WX3$sHj=*CF-S-1C>dnD9*9#TYTZ2m^K4+B$1k8e@#0Xsf5vK#zwy4(* z_o|jb)b$bPOc_qAHw;gxmQ@SpBf4)HHM4Nu%{08KUJ(v4&5}YTQJ`O!I>gj$gxge0 zcWowu^p;RU%_Ka4>8y1aRdXDkQms#%!}Gem0I#Ta1^|hjwGJC7IPO6qeG(!f?T8Bk73-Fp-Qp{!oDJ50QL{hb6 z5K%1|)L)@%9op6Gf_txUYEYY2Zy26XEg2X$yegw!7S3Pc_KQ{Zig4hgPCiv(CaY4B z7~J?#H(r~1op3_E0riI9QT3+On}z2;>aKNIQf~#`P%Z7g{!yoi!!=BVrMxKICuj^GW1rMv1lG3WZwGI=yJq;ICXJBu>;5-{vKM${}mJ`$R$J{4p&RT~M z^M9#X7;aQ8kz#-E>{_Tzy-qms_j(!~P;&?#bt6_ysW%JHyI$RrdMogTYPpE4AJ*<# zhZ=4+oZ|yGeB3E`ORIVvaJOo2twXhVP_es;+9deuw8Y1gYY>P^5I)zVL<)9xFeyn4%UQMDYs)wHuuwIS}8 zoW_P5RZIHVmHJA@^WdavnLs73bSF@?Lu!t~Q>rC{aW{k7dG!|H71dIKr7N8ZRPo-) zsX!$+X*Hj4ceDX5m1=@p)$3NT5AIiQM7=S1@)K_Fm{TtYFMh%uOl#_u;A(FCoC8ab zvafRMP_JGbZn?^>LzjBJaLSEWH>{q4r&Y_oOsMu25oC2c4=-Qk9OT-fdI4@U!@#RU zXwYUcxce+OSR+bO~Lc3r8={2nz|+RR^ScQa&BB#?Nzsi z`&_3waKk5^@@iYv>wx>baPscf@Im!P;7MQjm>XWjDh?;l9K85R_nft+UJ0(|KH4dh zJnc{EVNfp)w|vT7^U$SUFP!?6dwCjG&%hI|SCvsO3+F%O9>P`iig4i5t{3K3UCNEY zjq0_j*9j-o8&Gcu9(BFiDfMRI1=Z5t^PhI>zoOncyrKEj@Cd-!Pq<;otwXDN9dNgL z{pt&K&-%+jpAPYl9Q2C4HwGUNxZJ5Ip)>r@pmQ>dnFn zs^v5?|5>;1tf;pRS02(frR_I9YufK%_^8zYx2l%pO^2N1Ro&|K!TpEaB@ZL&jlnaj zrJ9q3%ST>v>Mg>BL+*8^wxp&#Oj`rz*pjGv*zE&x^;+QeVP|f!rB}TaoL22Ec`&*? z0Z%_atTwCLd3aT|^ta_xFbm%~^Q(yP0mO`J6Tc+@RW9^3bZ=9dP&Objd@%nuG9|YN_SO z=bT!eG^5@eT=0eGRLe|!@pDcq)Rxqi=@;` z!^Rgre2shYm{up8F90=%MHrpHTeIiU^pWWH5-tu3D*uZmvl)~5k(y4J}j)S+HC+;^?c z1_#xY#3OFvvnSP?fm5G%Gnzw})RzfePW2+Zrdldpa0=V@0h@I7npWahtCn&iswa5{ z>`fBmc%GK{EgGjC?o}=McYR)V#$6m69@YQ@Px~TGd|vOxvTEkxWz2nF32t>3nH1S@ z7MYy#1s0jqe8JsGsX$b91MF2uUeh+I?|kZCwfqo-7f1Z=7xCqlZNK^wcTn{RtZ6TH z-b{~afMhhOT7GT9U%=c8{6i8DI9j z-mZCLrx%qE4mc5aoPFeb9bVXGFHAp|pvCZ_@_M^9y-u`-e_*(QF^~f#Q2&pdl7O7D zq_=MnPqgf9CE=oLVA+-(i=v%c+kBMTsf+t6U(z;d{8qSIwWRI%2X_$E^s6}tj~t2M zehqC>jTv~(7x=+{=F97gY82qLe{jxfHMUl}8jh%@ICJd}`CeySjTX551%csSHB#`f zYB?XL|B-W%U2#Hs0@K?|XD3tgeIHr}UtUhf#;7CQ2B(1ca#~(U8@AMeY7QeSqDc^V!jtCXC#EWw}^*Yp|W>|nrs->;h$Xve6U0!{oX}r-sDg9S{H)$(J6Z8T(tH@{ACvK$u zL3o_@1>;~HbbN)e4CX)y#J|ea2V_C$Ye#zgG-;`9wUt5S-3{jrQ}#yZYE`?cUJ(wF zvFw@bL15eskEz!PxB0@G-SCqV>LuY(U-*De54mwqn^JEUUh##``}BfOFS+T?-cYZS z9c=|(9cz3#>eCHA-Sib_KQ?m@=%nj|S@q8yVeN=oWAKb>+4V^`No`KOMR?5@UeIux zww9_?!}Y2qedMc#Szz>)YPG{DUvQUC_kPu>-ATjh893t$pHMCHvFWcm^RZZ7y=6F{ zhgynV^`$F*)tz^w!x}-(a52@5uxv}+TMzJuFzP3!%B?olT|aZrk}^0Fc+TKpy~)7? zyZ4aPxmJwgPk}5b0DFRS2av%cKjlkWW>@BiU*k(gvxGZ&9Ic-m+LKK5k&on`_re%_ z$%_x{+`V^)6DnbRoMys~o>5J9PI9gT`+N5E?Bq9^GzTY(MlYQ2;hgEqny-d3C4l6j-2%M;GY`Lv>X(ux6%D|_y>s-z2hKHPYd zbC|2z)a!&3>J6wj1dqC2&6Ikx@VsjBH@AH)c&vQf{w6z|URQquuKXvrj{dK>)!=#c zk%?7Q<21l6;K=9V+^@ySPZ`U8wiA}pxbn5QF4gk2xL(zilRlie?08xO_!!DzU%G)& z|Amb+t$qg1zDOMD&r*5$I_Wy$p_@54pbrd#shcagjYUWw;p31u^KGs0&8F#Q`xN;| z>&VFW?@;l0Oa?khByF-gP)Q1eY90r|n| zZg>bxgFKL3TQR{~?8fr&EvD%f`=k?EsFO1cm~kcd@s;s|d;QzMu&O%AM`0yT+JG44fv=nB*X_FU*w;<#*X@(!HzdC9ethcdcI<>v_R=Y-Qm(zp zi@mZW1HS0>bsCs_zE0gj-!Ki|AU!L~zCjD~y8RJ&H47P zTOCIDl-*DsnKI2&EKqAP7qeN$TDB=W8Zc8_M=z;3*8F_RK8EjAK7uKq{r#pLeTPjO zc~!jl3O>5NXZK~h^?PnnFN}|(_FSIm*(V>3(|wR#Xz{|gxZ!5|E%tHp;jM4dc1$XT z_&hMh$QMYzY3I`Z?jl{q-%VcFMWlOpUBllk{+llGydLo)y}`WwR{OL3RNQ^H+M{)e zX@0z!djWLazh!^)C9A~yB=Po{vom&EP@-+MO#7K-TTVLV z6%_?>58HqvYT*{s~=W>X^G)xt1+=8R3+QPwfannlTO;9LAWv@bgu6#nei z%#Gi&2g(EAHsNpE7jT64e%tP@%YB>Qi1($EVdYQNJmXZNtiyb0#_lMu|Av{Hu}`Wi z%<%K^zGN~g{mDANdvKR?F}pnj`Fe9^#%>Qv6pmx_8D+Ij!G@sQeObua&7VbO#>t{Q zk}>g&eSvfKa~k2w|M{oO|6hEz{DogFPapnlIp5T_4pE8J4>;?ARS^4E=9ypsOo1g( z`9n_ApdU;EnSmGJ$Q%=9FbuLFa69Qi8yEufUN_~MgB0+t z^=T>~dKjKiEnh=5KXC8yq8T-_@Um*T3CtgfZ2ov-aBFQ*jR4gT1IbmMtAzg5c^grs zmK=uWf90<3o%WW^>LuXhzq%8KA@xS#ao0P0R=s(6LABID@{(d+_-*DDjk6AKxOv2C zXg#M&aI2^9 z)fXl$y2ag;K`6ZF6h#K{9{0=t( z?+={%cEP=>C4mf-?P)b+uZLB8vp=~~^GM(hJC@G+qUBXD!;(zeLT0$D>KEb4`6Dx2 z`E`ULep2ClW(yKm4vLpf!lJ}|q3`?!i2AMbEJ5wi4gVCo8_&x~D$u8K`r%>l!YTIk zS^+~?M&rs9dqTBLv8Pr0%Nf}?ih1QcU*lM)I5xekF{I>G)kWA}lfaMNU2;BKubMr# z!m4Ai7hnDks!@IMJYSliP5n+d>1saf#@DwK8X#ZE_7V)>d0LudNaKvclfd5`@}=#M zX>-gFwy1HXIp$PLbL3PXX^ywL2e6<4+#pzMs{NIblal>!ZYxy7^{VCINB+$j+9x=_ z&eEa*?QpMZDXmMjKhqSRe-G0dXBZv_FWkcex`$JQEofZX!&z6Soe!ALYrv6RboX#c z{S(>471jRA$nn`wzw#%%+y~N){rN=k{1tA{I8AW-PuibfWBH=`vg75TAN95N|{L_){tUC|lcUH1?M_PitD#|Y9vhHpy!Ufg- zlGgCN_|nTt8ppnqD=qLJ1KFc}x<@g>+JH2X>`|ku-DA+K0sewympav#W8f7kl}xHX z0FV084ypDZr*S+ltyFl*iv#EGOgz8FGA^#x8ZQ!|q>-h@1=Vs4)>OZ+!uC(yJ$yM8 zu2wy3&i<(#d1I2z5ikwp7Y6ch_dl@+@+Ri-XnD>VzKaViNC5fOf?-(B!hAoOEaXp% zgt#;Mse5Mxl?U!J(YxeE@-EYQmwO|57m@f=qPw_@;{N+CJC*)x3Y5a+*S9)zG%Be4 z8B;#62HJnlDHUWv5yb9x_fv*>g1B;2lkkvgxr7WH(dPQ4;MNPr)tG|kRZC;e9*KDP zNG;%bM@w3<)$emY1C8ZKkxJk9--Qf9D$jh%4&(o53hsNoK`+jDc z?y>7S2h|&aCsj*+W2(Jtq?9>>=g)6WWCQ zHBKCE`ML89EZn7DFPv5_l}i2GEhKEzoPaaF2-6xNlvi^ZUd251&S2eUJ+2`*e7DmS zn;X?@hTF_*7I^q2eKNr&BgMJ{y}u`s+|SPx$&SeQ9MB{~@TBTdSawR%j-#El0n+l! zz-dJd7cJv-PSeRa$f=e*7VqZIDemT1iA!qQ3$)^bsb8?`&gDNRvpC$M+ACNxZpZUl zRto9TI8sQjFMi5gw_w+|`N!-b?op+I7l^h28t!5If-xX|0j|E+E#B#|n%xS#zTmzq zuOyCCqejx)<2End&GA}c?y~RU6Fhxt^}{2or2`G#!&H|=+p$SCXW&I&ggMpncLO;h zJAXH@re+DY?{z1;5v^!F9KV+-Dleww5!AiR^->y^hKE)A&vORP--Z(!N7``O7eAw# zWA4O1bPn&N?&E1J=mMqV`N=bQ3{0Wt;KF@&)C%O8FMu}C2Mm}6^4v#yPtAQMejjH# zUOe5$v$9^&Ih~1TWxMwt=-I#j;6C|IzeMFH$;eS2#|iP`RES4jdHLdc-ZbRhCueNR zt1uy+TjuTh?Gu#eWXj90#Lhi?cI>=_oOkplw!0b6o8RQ^WLoxzIy=?%@0aY4w{Nmv zvP&=Al|yIouH$~%pCxN@zzS&TNReM~z6EJ80kU8fgddxDYiOTfto^lUby<|sU+TJEpLB?52y(({=A zr5B{!Q;VFEmNn5T99ncsEuy_sQUK3M&nt`rmmb{P#~w<}!ubB)9@DhaIU7~i=ea{^ z)(tOHNi2~%k3>40ku!%;e*hkOk+h?D{({Ffj^sI|TDsn>qgmqc!h#okk-Utg;1%`7 zTUWgSdvWBvSoxsaLeh_GRI`_dMI&c*Lj2e0tKSXB=(vzqGf77S%7nYrk}dPP0vI zCG%>yUA1$bQC$yv%`O+NxccI?JjC-2em8q_ubL@1ZLWEU2RBBo2{@x#@|}LjEd0{0 z+niT#8D2HdkmT$DjU`nH!ELG~N!X`jKHcck%}Y+U=Oxrj!b4s-XMzDwlb^Rc9lnJ{ zvTNfSX9}KOG9~I%rIsXFT5^|_t*f^IS3Yb;9^%tNQ4Xb4y#a1jy|kYNQx7|5vd!J< z^}+q-lwa}n=@GRg>#>LRiPDUkb8rq*&b7@2HP_&J`iK-H?NUl zbBO9TtJe;9{mL}_ioa?~sh5U_e82ewtJMs*Jz_>^fGuhz;Q`eg5%)FfsM-4npMIH9e-6&6_D?nz@w}4d#8l8Y za%;J!x&%j--ByzuHCweznW|O$^ORmu@A~FFMf+t9EgI>C-K9(YUO06mj`NGF>0vbt zJgs`PiQffN?LQr7@ces`)i@bWJbBf!%5GV;!dHE1O@Tjw==Ue_|dD1DuZh#eo z6RPDPHmYuhy-G;@Huc5peAMYg?jxB24H$yQRZERVRr_l+h391|$7fdK$ezusmgRj5 zswJN#)&6`W{`#YwMy2cf*8|E0rSjMA!L5NCR7*xt)&7i{@cb2O)i_c>hw4=-)U8_b z=~G>N;C)9DOM*dP0?Aa?Ajx+_=+=9lJ=ABcWgBO48oFvX(Q?CSP ze&g z-GdHf-4e5F|WtQ6t%fRi0hk&eij>t`S&N88DF6%jPX>!+gn$5XYupcvpg8iEE#>Y(PF@7Vg<1y0!^P==!k8#sr%zmMax$ZH3 zqGySnbTZ>b=1HlYm-Xy8aK*kJ_h*)hUKlUGPZE2_K7Jc*xAOx!&g~0(=A`A;!VBM> z+`s$46>df1UN{}=B)$%l*pqaA8%)x6xMAjXzqPkY&3?-r3un^b+R^Q^UNW-X)pH5I zSGJ?KXK&B`-3d3_Me}We|$+wLs%OHV%G_U##XPPLqhynZML z%+qr47d1`+UQ?arV0v*%c%GKCjQu+|e>v#YswK~etIek0*)Qvj`vSbgG634u?}B?( zzgXo?IgxuD!tdc>sw^RvJfz1tJ&ztJJ@F^cTIQa{iWAKZzq5b4W8(L2wIs&0YU!&P z)sjMTIfZpk1#|1~?QES{b(2Up_k!l|9@IjsA2&p~_1tQ0u~W`rg7pX6dYEvDFBOxp z`9Zq>pE&V<$(=dK@R6crD9MnLqGfpHX0Q2!9SEi+e3tlfx|MkIswMt{YDu@G+DWfk z@>%zM^4U-=jaa$v=6Sfjyda3LrwVDC;XktBmXn-w5ypS93$YB9A;Mnl zf-F~2$yW|d=2@EfSvzhu{>6RhBwf^lL`bOb9Y=ZKG>*3fviF*SFWa>>Su&Avl82X7 z(|w&c(XpZ$0TRT3M3l@zJ{|sxz8r5>vkmT4?d4RPRAT@hRV`l?82XDdsR~c2Hw!PQ zmI=+g<{n;Aa~-aH&aDc$TN@IA2cPB9=M1_o-J*f*aF=TTc1TxD%@Vc}hhxuAjE(%1#0D5^V{y;V=BL3mo3i^@wP1wC+zP59~-KF6C!e z_jtcEX%o*I6B5L{r04S82X^dD_Pb-k3uoP()0z7(?b*9y7hP8t?V8AjU3W?!alE50 z2Te{w{dl4W;W5?H#3LJW2x_-VeKYt45V9()Mj!(uYreL@h+Q*xZP@jJuvKB6+OW3= znyrd29bfVKSej_lAP)j%6;2V(6qRi$&cG8Sa-K(K)RY5|wJPNAze3CEt-?hj%ER$+ z$jb?CRP8);DXWkN;#+GE@pkUTPL+pVZkoT$FWySc2T14*%)=`fWnk{1<@jQtth`I| z3@VM5F9^yiJh^SjN*Ji&tAS0R@^0>H_=;dBTD~MW4(3Gj^S||k$xYk}+X3>5ftLGN z+S_p*>t6^M#gGE~$}6lKSOYDA3ab|wAbXX8mqB<_h1CYe!2*b_Q20?5ylSkl`oIX7 z1Cpiy$AjbpGN93R<0s&&D&DQfoWib>V-An0c86LCwG&&m_;+VSAA;Z-$@aERvfY7*F_8O79WgqziD>{K%WkE)jXCw+Rr zr-!`UrqrB;=hX}^sks7gsFoIACxWvSs)pm{R19u7N-Nf?W(VAjdF?~?_QrlSrF{nf z@Alq5K9Z|E^X-ww(=~2;dQ98XSnZkiOoJONk7a0rz`~Y6##&HM5x#dpFs;_rH7R^LgfZ>pAZ^=RK!RojUcSOS0{5Rj`xnC>xPJ4o_X;eA4@) zQ=xpzXdGm@inJswJ7&|4~nzSLGEjTXSdayR?jhmzHD@PAp=KfNjbHyR0w!xiIuko)cO6!9s zWM|l$10j1jWRJSP9CgzB=G@y7%JLb6XJlJ5-H<&NvL_wC^WJ6a z0wm(w=ga`{mF zzYjzvQhZ(GKP<~GKh6TIqwcg$%$J|7f8QZF|X z_%qy*i~Ctd$bH>?Cg$YovX^ms_#vl_A8|Vdy9lhb++}Y3GKae!m$?m>IoH|h_cEu` z7W$VtsU!9|(=9wxmvce^mZSD^cl9#o#EC51UhIeb&*4(BzYeCW&9C)xH*>jjW3G(f z4A=s>L%X|XkZs#dE<7pQj@hxx{kc9hFL4Rp2ppbe_~Br^oT^o6aX2g6N=O~@OE}al zu?_A##3yB(W35GOFKnu|wY%3}H*s-|z67cu9cNU5JQxH`A3qT3{iS`8N$lY#cy1JT zJ{fn8xt}@Y#Q34YpB!?swb8iaerK5P`u`ZQratZ>oTzD!yY+b16yt7NobKgrQrz+G zCdD1^iYD&#l>fO^Q*Gqp4XnoxJCPL-yMoX_0gQkJPz5%?>tDj$3xWe-0)Mlo;YHcj zq`AY6zr<_&iub3TlIu#`gtvDc-D^M3Yo(x>2AUr$*%%hK22ifp3vetjE{syPWb{SyDY)hMk6Zuhmzd!&`%vU@1uq`cdj zbp1=5%v+|FItMSxj{e>5B(;JTOjtIlt;@&u`)0_0+x-s|cPNwad!zwwN?4Dacx#8W zZnz*jTtzQhxQc%HSQSGd|B-}SS#*w+r=-oo3!(I&jAgXIwvgB4W93ys{#Dr=pq{^7 zvnQ`4ZqNy^%pyp#6Ol}>KoqWk+- zI_VqZSFw---Czhzf(2kdMq7ttM>zO_Rgt>N-MZ4buBPQGH+>acxXNw4$}jOMC;j>v z+`S06H1;OLGpF+0VfC^uhth7|N%YgW!Eu$7sYxDjH?7p>BW~)5b7#+sMHY_e;yX$D z_sX_@Dg+Kg5=Y>vki)nf;tLX&;kBf96db8aixO)>@h)8DcDqjMgf<)DcG)&RwCuRC za^$z|SNBLL!Gj^kvU|@H2*zfYKIsGSaNy&f zyP8GZKpkThEP_ptNHJbPC+GvCU>L0bK}}=^ zw!T<~w?XoRfAI0pppMNp*7KM%1copP&noUEEtZYss0o=>^WFhA{o zUka}Y_puatSQ^+CH@MiUNnhhu&9~(mH+_wB;&>08;2pg@Z8?7`UpUos`s6vDlh~YN z2R~(9~RgzaG&5BCwp0vPV(}mSQY%AN1cRw_^5MvP0LX?ebhPe#-1RV1xHYH z@%-s?rJ(2_oiTQ%_`u22r}7`*HpuxRZyH+F!zAZ-QtnzeeyuIau5}x(bxs`b z4SXppXt`h3ajz^+ZPz-PTV?_`4v4^wHKpgW9Hg;d?mt!F*_6L?f-2da6j75p?ru?I zP4jU#b({#gkGoCB83H^WI_{*biN~Gn(Rl_`5c|!03gRv;E_E@+o9Du7RcG%#S2(Vw zWll^p91rX(#|X#F| z>zo@Ra~PIk8*a#Q^Z=WFY^Io_FtZoom5evZrZ%N*!$}IZbesHRFVp1TAh8MVknOcj z4$TFLz3^1XpE&+mm0DnKNZ*2M zuk-Y@wJ62TvleCHX4x5n&Ryr9aI>8f^YDOdn;(lI=RP^dMwP; zqNH_rGqAtEyMWzB3;NeqgRximU6h3D!QNBwel8ZR3mZx6lCPbDTV&fQxLr1<;EtWb zEw&ydyn@3!sMJn7W$B?E?CoDy`WQU9XW9lag)i$;zgl-7iJhPH0vFWq6fd z{1_L~XtniB!=Me=Qn>)zLVgGy2R21#%RH&aw&%rLw{V{aJ8=UuKpzC-U zAy~Q_q?4E13TMxLkjE=${Jc{^8l7*V`OgR16+7j*pTEJmfjvi! z@34Jj{T%Ek+b`Dt)}OY|?Af;M3)^qDzruaI+rMt*q;q#o@kY1pMyKxb(Hot}_jvB^ zJr{Q$xY6mmJk#Jr{u;?%D;S^t@r_RFzL#4SJvaH|%tElSYHu(Mp?zPzER$|>Hg2&! z-1{ou)kcBm`U-BUp#4y;rrBt)y&ual7v0Nwwx1{b(;t16lizn~2JJ`qHn3M-?c7$g$YiEVj{@Bpw8 zOkC4n%Q+`&YU*F>R)5NQQ%(N0Zu4uMBd_km!y6-vunQmH=23}Gp`}yk`>EMVUw_!I zG0SmKeC;%avfi0&^qXQ1GqTNLUbbagl5Gdjs%#5uL$-ysCEG%-eVt#XH6bqBnwyes z&CdFE%4@&3Uw8`EhUgHj_ZGpyyAZ2 zbI8D?MjMGG_m(U`IY`iYiV+aZ+6bSC5`5V!k)GZ1ETScwZ=eapPkC*PnT?;y@u;S z^p{eewJ5m%+>e|z96x9Jb|A9CAo zagM!u4*6Q#mT8)WYg436l{Vn4xi)=T6%JQPe*5aJ&fRbBYWDla zGWW=~0!p&2;IeEhbWpYn&jOoIxIS-oa);L0do7{%U{YTuNxy`xusu_fvlxXJw>&v0(M{i^1yw$ds-{{9_v8~Crcq+1kH@9wN zgeBhOL|#K#)~E5STwLCEwVhwQKo}xr(qE_aarbB6|4+V zO27rvU}jkj{%YHxMxTbU{UIl)*E7n!FjaQa_x zF9?*uBv=LUx3ES4eP9~ctZVC_IAjQh4Kcy817M< z1sdej1o!)PIgpux@S(*_|OfAF_)fyDwx1Ee}^_T|O$G33yJnt=6Yym&3m;UqlQFvMyW+GQd?3 z?n3)%`F>_e?N%U5X@R+tNKPJA8>?K{opO>mtmmkrp|HgR!palHLQCWn1Rb zPkY1Lf4|>V!WcXw+iIJX9WHbpE!@H-`K-d5U~db5;tdkcoup-cX19eg-}Zm*pH#x$ zCN@atybx)U9S+9!PlxnwxF9=RPA^(G;C}fG!DBzu{``pT*7KFxCzCiV$=UYFjBMK{ z^RmMgS+}mbPyLLOJhG+a+P5)*0)KM!uV%B_&cV&H!^O0rh2!m%Paf_C;SRQNf20oX zCv9B57VeO23wJ~|_3U2#S-ew9unrC?wN71-z6`JJX5R6spauRm&a3i?(x0gp=~G92 znr$z0Uc@07=sDRIWwY#XZ&;9>(m4p5OXc{>j=rjURpam|B!zvzAqA?<91h*-9w?4!8LoJPqgS@f}X)XXlVtz!pf{NnM~F zlz_P}qI>Il|Em7fx%d0)`t?BPCJk5n=qI`Ff4`Tf_D*;89d?a>r(1motE`qg-SnN# zk(#bMU5fYKp19L#ZC;^@WC!9V)&hjp2y|(9P9rqXcWOS%c~Ax;z^-Fv;1#e15_j_? z0JMT$FbpQa0;qsQ7j<;866(R|2cuvHtb!^?zMBOnXa@x_2&`Kt;YF|s67QiBU_Ya3 zgG*o-Oo1h^31%LtiBw88k>oub3}B^PBl+R0l>9Ozyg^FcasJap=Tdr!UZtpD~HbB&F- z^&p)%?1o%8j#_pmZE(N)bIw&Y>AT%3!PGVRV&oZ~Slxg6w0%j!E2!gcmqBr(Jp#Mi ze*^{{oe8{|drBWXcj448_!U^y^y1zA(?X~w-Q`yA=Bll&%guH%=`q~9D2F`)9i3p< zc-`rhbN~B_3e?KsnCfyeH*bVo9y*=Bz@tsCPt7IDi1M;?Tv^wgyw&e+OUu05-R`2d zo8RrG-tE-g(iQT3;B@JNR|>5(-`*gN-hS|0>HO*Zy=U&t@7BW;#&^>seu?pJ1|5%$ zZHvdoY}KUS<5nsESQ8^RXv*nQ{uDoe+ljODJ#OwjG@h5%-a`RAM>OJzh7p&yMiloR z`YUsfyZs)9a?3r_>3f_b`)Z2a(~aHEqx;G$@AW4JJ2Zk>%N7Wm(zoI6Q@&3OP6KOP z67~Y)6!iY${oVv#kJha8#!xyxf$`GY(5w#2-|459BhS<_mgq4%0~F+7wk?f%**4pb z*M8Y{{0_;sfJS6n<>Ru0ih{he(k*Y$NSi~JPrcl)U=4@p`+VD`#fmbRT|MQ^*;l{( z##gY;!s(s2`)6O9UF?sl*aJ(OWo(AooUVJHvsP11pY{v0nWtX1b#bF?^KX%D<+RJT z^15VOxfbn3ZmZd;dlY>dEP{1lr}AyM{tWp+FBk=LXPgs}b&SX8x(OV-{lt0xY_V8) z@VwvuOm(N7LX`&bWH`}fdmj@x*al4nzbkEr zP2+Dnbq?N?oq3kk%&vV~WMy|FvL3R7J->|>*j8wa%B|2OocVx%f^Ke-*b0xx?tq76 zTgGnL1-M_f?X+IM5WOLNOLO#a=aiCX;kCe(z!yUHa>x$itDpt8Rauo!luk&Kd{ zXTuuM2zSZ0UTF#0?Ks;@{B0$PWq38@FeuxFmtu%0TY=#G9x542Sc1q8~eX^~-B8BjCg`@7jKYZ|tTa_>Y zZ_1vA!v)PrUxe3XTR|&9LG}kEQ!$OMB-|j|yfOt1gjR_i@QCbgI9ydhdM`XA+Y0IT z3pu*`J8&MF6?lxfB&Sul_N?Di8`xH;9kpB7-cie8nLmB*Av-LsH{lrY`a(VfvTd#je8RR>Fd?65crKJT@Lxo`I>LP~ zYmIl8C*-s)+a|RjL)f+oV)yG{g&SmB&t+uWeX}5M6Ix(fU9Ext-DK!^kqkE83(|Yx zg}?`%m2EylvPa-4*|xvO@7Eahej4#NPaSa1T)d5YzUMem@M(lbxD%B4Nm4I70v51m z;1y5>$s#iz=mz~@6xfK!lID#FUTw08nx|y8nDWwE&bjGxoZa*1+-BHj=W`6Q@gNHe zQ)S^Noh&c&ezy4_o!6IwbS*5sV%J|J{rss59|)?A5?Tb>GXUB+kNXvTf#C2-(Z-7tZr?a#d24dJ;eHcK?cV zB2|xVWj4a?vh9x?w*0(*Bm7X0#1dTgGaYiJjlq-B=A|vctG-sZC9Rf*q<~dqg~uOo zr_VblayeFFrplyRPj`IH{hs zO17n&9V-PdaLJ(w?g%-z;$Rn^2W)T`N-o>S-ZCJEVR%$_`tNrS=n1s&0X;1rJBa2& z{)_HsO6;mlN!xJjg1cJcJ@U*2zXu!OCfVUCTG7H)bjZi5=nnZ8_#5VLcaEIwmo@~? z${zntO=KjnVJpv?$>e{5TS^O(Y)9I(v@BPf7S@7n6j71Q3OiB_bT|ml`~%xYcKSiT zY4vc6Y#S(zvTeWM@1C7IaK+nfF6~l64_uNR?u#;7P=N(HC?D$!H{?I|pqn1#o%$JR z^Kk7$elUqASsY6rC-_y_8?cpa{j!A}tWkpr$~q@b8R7aK6*Ma$ zsK5%c3_(HGQ+fFm;bGa5WDeP$R(TUPqY*SPHeWzvB8l;BCQ z3amgIMAkdowASnxJ~?2v`3EC8gKZ+rU03vCkz`x$R4N#|KS8MrC1acKCE?~v?}*bNtCTR8Ty z`&7S#A$VN26+c35yKYF$N?d@~WRp9xEQfeiVw9bg=<{=B>)EiN8sRS4R%}biZpYbc zK}lj6c0&$>awtzqoPpJ2uyLAF(z`6cyTtHchtAlpLkmP4{%;t)Kt>)`#(gyfWjS$H9oXhS2p zCZPgX_a-JdLM*T}Trb-i>kXT?9DPcqtG!ByPdA zWjgjB4jipXm0h-vy{nPA#{z1B?TMM$b`lE4MHgCN+exiQKHkegvdge5+j}|4y|3(~ zuQC_QYL8u}Nw#wW_fg7DY@6K( zx6Ag9jfcH=lgmA5!RcoAcMg<$fg4n$#UJ572YFBiqhJ=SfhYxMKnv&r{a_r-0Xu!K z!LfcOG0*`@U=U1z1;8r=Mc$@Ba;5!IxBgMC3AlOtsDJbJ zQJh&M*%tSd9;F1bKFV7<$$oe9QL1U~cT@dj?e2G*;BuJ=y)NSZvb|VpmqZq&8|a7l z>W+Q5>lD8g(NAW)GkK8Cty%Av8K_F=AdI`|XzA9g-jezCs)ANBj*?!I^%!T$;)5zK=vkR<~9E1v^k8mxol z0J{fdp5>|ro&}Wwr!La-tNsA9!B!$O`#e&H2i<#q#mU6SBu&CIzhW0cCyq#3g*Rj~ z9K54BUQ1n8L>x{%#zjN}U&WNx47Z`#sp3#xViE3p%)3NN4oe$_Cu9dDC+8$A!Yg|d zHzjPtF`8x}1Ucgw2@P=5fIk;@cS!7p`(?pcb3>R^_t+Z-c#0&)?0BdF$)guW`x&X4}*Aq-=XqosmsFp`Q`b zjZI1*&rYTGT2hDfy>xuTx?kF3Jw?o<6j2fdldxhR4C)o_Mc%Vv4k7`C3oR%C??Z zko|()v!QBU>Q_F=5aa% z^8UPSnY2+b57t3!h@lMHKoQtz;MDz5|J40a{}-vY#WS6cI+ zfBxRHr+8#q^77?|-1rdTcMiEZ*uHi#?mHL-1+sDd{a%h2jWZNC+cGIWdobooXn}2WaalgLPX=Y% zK5}JSnPal8%t_yVySI)E3bM@eq0E796|YL)fa4zzwMx3Ru=e9#fBEkFgqxR-?MD0gMNxTeHkFaXBD zEU;753T!QGrd+Rumq*-}4YSVc9(J3CxxLP@JCJYJ zNZplq!X?fV#~KO3E0l#L?^Welm3mHAVaF40!xOwtRd~Xs4c@)-Cn%YpOFzL>!dm(X ze=QBwBtGF*@VTXtV7>BK=z6!L_>BgO-J%`%R%U0A&Mhl{p}QLs>+VlbKEGc71m#l= zbaWw<;pRPs@!6YCI78(eZR`LgFbt-^68InOgnz2@t?XKFwmrIOb^Uc# zvLLY+?w8HbaKCvISLoUvho^SaY(aRZHkaXwY%6yyu%F#M`m1Q+F(0Kp7E=OF%VxCr zm*$NUTHy9jqIYTDBcTMB_avrV31je#Yzt}fQ_d$J;cp5^T7@@0@TgCHxRsu!mgB=14>K~)|IwSto>Ko?QlwVcnOz93)*LA ztDJnA;SR8O3HJ-!AF;B#N$dB0%ig6!!Qb#cj@m0bT#z8QIpG^S<5ryzfcdA+stc%GjyYhRv4ry~kyI)NgDG z&dRO~`#&>i)^;1*DLdS-JX*M6Mfvo>Ltt;io>0R^NSl?fcX21%ySS50J-b(&7WBfX z_n@)7CWi`K-F4mxB>G#=4=Ta7?b$S(1ABw|MFrJNT3)^uRGVxIs#Es!g0it&{4GDI z0XYoAqr1*KK~12Adum!fbMP|Q8`Q%JYK^q$lYRp%sEYDgP*vFk)wol*1(i^SU@ zIkZmD3r2yruzS)?J;?=2{z#F|J??&c%(*?){M&wG+u*!xo4Gpivd84!``}zz{Wc$~7^q{R3jR6Y zRcgJKez}GRTc8W{f&ayCE0yizN-y}f(#0p3Tz-f1BS`-)m4QKEjhKNqKx&-EfeEk< zGQY?91N4I_um%$UhMU%)1jfJ;sQrDWU(g4pfB$x7Fbuns-Za6?14e*VvFagYmk5#zu{Z_Q@gti;ucG*@>i)=mu;eF^U z*(0F@mqUr(BF&XB22buyoR_c!uZ9xs`(eo~3AJ=q99V2tr?+^>O31;TyNQuz*%oNq zIE#mGM~`QV68qrMkn=#ud05V=X^C_2O2~N;him_@11IXFZNo|SnZk<1eorfr28m5@ z>#ln2j+X`y?7*aK3oA3>uRD{i z5Y4ep_pw-;?LY1CF@ZnuJ0T8dW!o7) zB|H4X$sAhvoYpL#HnAWGXhFrcSgV&$BishUt@1uHs8)57 z)+b+URbIB8sf)gycwR*o*}!M~yXd2Go`C0MTTs)o!!2Dz3kSFo_`_8Y4$!*&umX%u zaw7m(gDt>>YyvDt(%K03gaz0r{bh7}i|lYP-rG~sd*G7na5-hPaKMA|ap4JY@i4E! zhQHhRHQo81CUHg17V(^H>(WKp;fn0gUYEZ2Vq#l*?6XYO;CZ{fOqXO3!%;TKsR?ce z;cm74ewn(pi?p(QEyy0(7Gz0wI7sW&LFv}3R%h9wv926b!X!K&$~+@G-1SRn;ec1= zvjJ~|aKJVWo>Q;JKF3@Kf^m@iobz69!y?WoAsn%FYm;>1jI_!Q2V;j{xAX$sFWd6= zelB$QjVNIpo(-HB=~J@9g)X3lTevKrHFyi`ZQ<**OKSg+$qNK6jQh6#Gx3xX!Y#CY zl9O&NY?d7k#&%Dq^gP@r+sY}vi2nduIQZc|WRzJ%qa;j$z0pS${VZu~Ac%fJw(Xu} z*?WVpNWX#LtFre7pD0iHg{I+p+2Mj3(ZUh8$fq67gK)rh1pGt;sz}DM4Bz2s$w>+hVGh zO-#F2m^M&bKJQ=5b;+RzF6}z+1X4x|2Q?@k7oGrnJL)ysv(u!l$k&_CWLr>+vY!`} zb=10o+LlA?kC?!KwJf~%GHBtT8syUiw}ZVweMddjMOsP4}JKP%< zWWyKS_!oE^w^ivKaQBP&7SO^$^~$FocER4DZctETq|FDujQdI17SoLE7xdhc684^- zHl%OC@#)>&TPr(!G^fzQ0cYitgIhs3;HhKfeUVov;tmpfZEAU$0z$w`~ z6;Y4v_MCJJ*y?oO^H+{jZj;&x=U*ge5iJ~HpL_=35wJJHD;425X$$hTE}fEX5zfkf z!5~;x!nF#~nrHo3kzR$Pf4n;gg1{1Jfo+FRT0Zq~GuRvCcXf=n{V_YCC})eZQ?^B! zm%X)2Nn_&V0&7cePf;fNsV-$XjN(wjy&m+C(gZ?{kUK*d3 z{u7=!@-CkdFXS2VLI6~kB)^xB$G=_{9{*Z-4KprP*1f(hNas1HmwvKz`oeMFr{@J} zy{FC={4{>LG~?fkn{m23a)0XI*YU1LpXGvr?Fp~~8vcydfGMyB5>NTvW=pbW(ya^I z;Jj>m^40mLdX~~BaR43-9H?Me4)JM;bMWGydQYTItV`R3Gt_7`Y-1;}t?jWtb8&ff zwn=HNa3SQ^A=_Hh{b!1#U*Zrv9 wLvmK)0=z7nTKx;*ii9d0eM%R?Y4t=s+=yuR z4_|2kwj(@mrRd$xOPsrwP7N2oHh@umH9| z=4qyKPyn@W;FEvw6j%mTka~ujd!U>AdAJNlz${n;)d~MEb;jpd>wz}lwVblOme)nx z*L=}A{+_--;OBH_i@hh`_rVMHsNQpSgEW2@ck03g`{Mc8Q|~*?D+qr2bdb*P>Mrya zy}T#S^1jUlKb=n%e37r9*FNp8evwyX8=iJ!PupvuPrD7UecAkJ4kTU;GMaUtdfGYS ze)efTP{;d0NGGB+#0!>Z`ls(df8m21J3aPo57nQ2#;tvZ_lMe_aqFMqW!T~~Zrd|X z-O<4yACJ!NJ?DRlf=@|!ZQ?ua&rlmL5g74S?K6B%Jw@+$6>*Sy2fvzWJ=Pec(a4_D z7x?h%`yT8$`TkQEPWg@OoO5$?&d0sI`MB+%FMZ~~@vBo*Y>rvDS+*6LbN|DaoJ^`yQXcLLB^Sy6#SceM zyh_?AyckNK2-(vid+tkKELX2f+k|7Z)k4TnEq_17s?A7hfLlY!O<(qBh`Mfx1-L)t z(EDY-ts~Oxd^S#|^S^uGs^(dV3-EF%Q*hE-Lkn!{#EN`Os|JN6*b5eI8m^aZkp~$Y z(E{5FX^~Gm+%@mdnOB!2mSI=6P49#5eZ0hwnv^sHFNKoll|Q~AaSN_}*58$NDaL`f zE8%9@R%q^7zfU@)S#)_aS)b(kBo4sSvTe`}%eJPChU^J4+D~2T7A3C0n}Gwht*f?} zMx)i1{EGkQvl^r|!L48M3yOD3EWo{p{8q?+Si}te6&@B%DBTL0mOTdtoowr=Md|kY zh85X1F9bfeM%$FW4X3~AcU25FpU2ptNo;Q};a$>mXx5eWUv=KUQ;1d6sEjs!w}c95 zmu=H`P^tO!yohe2qAYz7cE9TFK>sf1q!MP}dD%gf7SR$~P=N)sDjz!^ZG`-{WQPMX zpZJ2`@<6}%3hoP`l@^?AWDsK<%z-ttdHh_3(_iDcIk0Z(Sa2H_oa=w8jP7+8+W80W zy}x+g|9j_dpfiX2y8p8U%gZk#7C1Gt5L9Zr&N zwhjMH>E8SlvSVM@2yT#b6WscBZ>g2+mR5j!Wz#DE0n(6!5qNxW;;e)PczJJPMM4#h zD)yk*cv?a|-1rTDraaUxu?z0`hW|GMc>nJkyqE4OX$+o}9bTu;poPcUynL46b+Gq( z;5l7dZIYH;^gGZlTDFzXt_Nb$sb}|Z2H053C?R}(ZR4*=y7>gb*xu@p-VGOaeEioR z`n5d-kH`);Y#c2p%MPL``OLygU~j|z4>fF+wAyd(Hf%%rtYKTSsb}}*lm#9CrvIoQ ztBg6gS#~(6Hneb1o$|@UyanhdV5H=1vMi31wl=H)4yZ3ActjmZP$4x zkP2EjsH%LTf5B1~><#L>3Mxxl8?a-@g38IZpqgb9)b7nG>#0s9P=;6O#h3llKNHJP zgZWL7H}RJYaWDy1L41jx21PImEEpR)v#Mv|FMf)n2*=<^Usi%0>1!do60)m*;U8GJ zv@+JiU9#;*YmK1-TS9jGU;5KUwj{9(kIA--gCS>E&hZ(E^YGGN`g6;Mv@N(+?V87?j;e05~`!%n&2jJmQn!Vf@dG^(>CC<`Y(rf=M z{SK^4!=pQe79L1h`Q+eMuy-JRK=&3pNb8la4Ww?_HjoOksb_aCv7YQ#Liod`HkXV@ zH=iIF8xT{{XW@k%AAc@c({=@}$__Uy`d7PU*<6xf+ZvySb6{`7&Z=R}q~+yn4QrEa z4eOLmJ-c&>1zr3rxBaiUGdduLVR&@cd8bhmXh8!lsA>7k!OLK8Q0EoY8fnpQ`3;@?qO>|C6pmNbK8QeUV09+oBwm9j?fNoc@+S;VmkC1zvv<-%Ye|P}}l}Ewc;)dxN^5pz29$2e#`irbgKo zQ;Te3x_+l{3#v;AER{UnewJHAv$YbhN-c9AiBG;SJL!`PsB<6YCjjuaJeFZ^eZ(i0 zPCvxohUK5->VB&KImXHvrW|+Cu%cLkKj*)|Z^XLoIj+6Af%Y8tP*UG^x1MvZKirD17seH=oB1rHd+KTD%9_Hr zT@t)M2>EU9oN(E0#BXoE?F{c5n!fMfIlcSJ<*TC+7eqh1KQak-^A|U_kJUuxu~$JA zr0SxPCeQ&UKes{hyd|feYrr7Rdf* zP90zo#5P!2fL>rw-4bQgiIc;yknZIR~ z0Zg9~ufd6mueHD~*Z|Gn=fn+0!6L9cvA<)|1-)PjRDtRBKOndtl*x>-3gVkAq`?4~ z2J0aCLuP9*1ZF`M)c-xF6EFy@pc!}z(LykG<@gXpCP`Rnut`RnxL1FIk&BOmAk6R|Rp(cSB8WG*9WFa%~n1=L?o zW-tjhK=#nVNFI!WMX(K;;^bw72k2#cMA||qt%{vKyz5(gh4tJO2i^C6FZ%M-5XYIV zXhz^E*;eBC_q;2S_=2=$cuiVWT9o54@t+*`Cld#b$Lra!f*Ro##2Y@%uUfk#_P~R( z=N5T_Bin9XmT~5OM8oG?b zcV16}suH8jcxm8;K;VhMX72{;U;AlU{aYVyEU@fJC>!(E8hui28sGCU^R#>ZgD zc5${}cg1HU&cjO*vl|k(;1m<9#bfo>%3h{*@xSrjLpyOuS~J{+cH67y$GpTMJRrN3 zLDYxC`Oi}AsKg0)`fvPkyC`i1UYE8lEygsS{9Dg2*MMyiHNm~ITj7Fi??#kt>$UE` zCDK<%PsWENj=0vq@RBjo*>U}H8Qi#NnC_i5Wk6dXj9@g9Q&c$zDf8jJ*@Hu zxI?zhVokCw{MH|Ohwt%tL1Hi5k9c;Py*VOr9G*h-cGiN#Ww;{S>wh`KqbzN_{)f|l z&mQChbMZ!rEpU4v_DC$j<-hmGqAP6-p7gcUytE~FL$(d}RSL41GgZs#$*PRQS=sia zEcFj+UbDnDxbq*pno>n+eekes%QT=&sR@bG@S<#+LFaJrX3cepoA5T`_x||6@gqrA zZ5B%gZjjyibvOO_19f$++U|f0vaQ7KE&nlKzqBEEWXtc6DQUCt!j`71HHj6tifBh? zHo?-+YEHu~vTeN9%eKAL_#;m6GwjyTNx(Z5({v@Z0r8sANwO>MA|q!8%m#2`m(e&xGLL@s0tN$ z3x@=YYHts~jk2wR`l^3_In^$)3oeBmdT{WD)SyHc9z*nw!x@S5@RE75{5i29aSM*K zaJPD`u3Fi-uexde>|S#=*oOOLH^ae7!p@Uz(mUazY@4U@Kk?$`Gwk*?^I@fo!qXwI z3E%5@d{N>GypHI#Xj@{83yI`^_4^^-z=pSb;8uwzx+NCie%W?*>D{s2#n(nthqO5k zPbu$_1&Pb>nruEd+;GRPf0T=s#6N0$)U#m$G{Pavgjl$Ei zt$>N3fJKQb@TP2AWUb?1i>y?P3o#2J2{*{L5;Bp4eh94+JK%zB3!xhad!HcQFL4MS zLG+H=DT%Z2LLjb5tiaVkOmNj_0i@yjeFxq1AK{uoT07je?;xLtJDw^@E5ojA8-;`9 z@#2`2I0MfkdU32u+<>>_nTm5!X;r4+oNQ}Sw&tMw3$0WytrO0p*{)9YNgRMjWn2Bj zI9UCuX^C_2O2}amhimWKEp?l;SnWX@RH+P?vKC1L+$!55X{uGB-4Y9MzigW`dvSR7 zQ3{nd4o?M{79=ji71>tmTHp}nirK17!1c1tA-&)4|I4Md!(IE`(Srvwb&|@kE8DUR zlEv?Si8Js#qRpxCRf!w$)_!kC#^YR-d%X{5FY&czX>D-lCE9mIiGA=uAdX6$fTsg- zQQ```9*El#V_fkk5BO!K8rZPPo8S)F){Ishyk-<6_QL(j6(5l}4o?N*g2ZKbEfA{` zquf$RMAeXbHmuS{xFry~B=*3iKpd3l!efCrBXJ&H3d9YGTX3zTic;LPu!^#9PGYJ} zVkcab?M>e}cmsDp;xIfR+ZNcPfy11{MR;Adm9QcQZua=~#<)q6JQ#E}8(vq#9kOj^ zX~n@i9~LC`!b7rcU-aYP1vV~m3SN+HCCuV*c*8kyNLmH1S|--IsRTD=tlBi(DBFUq zzf^m;U1As9gXpbW%Mu6SG1->O4RXy$oQIbz7i+2`8xptRTJHH+y_{LwACIQ4(q% zx3|*33xhBdm-_`~8zr{DJt2p7*|v1=!r6KvRhBpikIA+X;Nsw&AZH}b!>h8bSC&*= zYD;1*x7Jc1h$nuCJ7s)Dv`$(x+$q~?Xd~ULp(wEr9+qu23>@;Ot_f+=@En<}TjMJd z*WpcxsTgoDw)|_C-36CqTi88^y|9mV4I)k|!7{kA zt)em6zm6WLpKRs=!}g#;@?hPr*6a=9RTuo_s1P-X^gV&Li^f q`O({FM)ybhl+ge0xPp*f{B17lWV_4UWtTmbcFM#CDkS%L;PYFvZH$0%WGAV|=F0Rse$yYbne0Rr^%`BnXDrr_b- zv-_Ss?>X-|&z$p}@ArQ1-@5l!)vZ6N{?hd?`yV4OyP~E1b*Fsh?9ZQF_W85RKYw=M z^Jj1R!P!ThaiF~P;)(tPNBw-$JD2YbTGv>XH8UTy!uJKO1gO0O9WArcTg$8@xQ_T% z{5FZt1+41{_n>oN8r(p537+_E(CRZ+_Z&5w%RdsdM!^cWnP~gbpw+z`v~EF^^I z$Ds8?!gcT<7zI`MKf#+vPyZ=s-HKj=?UkSv1-~HN055|P{9h3+p|`>*!nease-7rX z)jtQVW{f*A?0;pO(D$I*(aALmBzzy?9J>ASpmjgG4<7wn(0UL(4JX%wRtKoZe;Ci8 z!|2D*;U|Jt2K0hi%J?&00bM}<#mZS$=*gfp4jw0B4(@v@Xgz@*hTARMdKw)nv#nY% zSZ-TZnPrW_RRPdf=stMSl$JHxg$L-=^YJ?MOuZH*FsDdEOrZL5XMC!!b8!!@?`GW5#JZ7cjr+ZsF1 zwq8Ma`bV3rli(uZ{%y8(3c9Y%wx&T5te#+7ufYqw%eHcT{5J^ZF<*~4g^sIO zgy+!>@3pO=YI~dYE{qWZ9Ynqt9eAH@^?^YUHqU-(xO**S3Cw7eyyPeu0-o z4}#n+%!cpS*01me(8FR3{D1;5Z^ty~=ntv%M`XCcw(i7>pzA>F$Mnkk%dC6wYSGQ0 ze$uv<*pmD3n$XiA{d3#8pYR~O0;-tT4-yVcGi{z_FGi1|m!IM2^%#MwU(hX}fbnO- zq5sJ^qyK`QLC4XLqtm}+UV{D^GC$3pj5mbNp`S)K{K~eH8$rt|XD*@pZnLdT=sCCq zYVWYE3c}6s1em^q@$V$!7|DRqfPOK$t;kS-$X)Ecgd5@En=I>i^e}p2j=dJW0XN=5 z58i8AClVfoWAp4l_%9>efHq+MZuVZnW9W4-MEE4a;rkf>_WNurgK-K*20aHNzh^g= z0^k|22wFKwyk0Ub(gPq5#(opD&cG|7dmg0ldxF+kga^^~L$Fc-k*(8KT=7=4EQUGl*LOSW|xy8T%; z3S3dnIbs=+245qhp+v#pD)a_?4P3M;tYuIF*Ab4ERagU{#jdcfC)@$AgFr=vHAr{g zfY*-BgWfxX){TTG(2L+^w0(4iRR?ZCw;r9Vu+jtyFRHM9h%pPtLlxFf&<$`axD}m( z2f#1TLvR}W3Ox+Rj;XM2M>oRl;7)WFUIzD|H{i9+71n*|P-TTR9ImkLM;GBzj{l;6 zS7AMf(FhNNQP7S5Fy1_Rj7*QA8>(mo`p;;C4j)@#{RJI^ABUUaR`3M64SpKV!YjvB zFmX7JY^kssLE`udYZKvSIJeAyCD22n3e38#71qr53hNm3SWShs0h$vP){6;u!hu)N zV9-sPWAR$itH6FG-F;$(bv#}Jx(WSK^a6V7qzdaqblc7fYXq!;mk|!1T#>T|POh*r zBzOgeL9f)Y6@*VB95{srfCj>+5UzSPV|^+OAp9D__4O52eFJG~E3DTOo<_I4zQS5~ zQNTKbaGU7UsFe7#2**#SF=sFrc2!vYcy9`@M(Jp(u%2LM0dP_aV7jV!UO1K zu<@!2>s-QX=!rK{FyVJedUXGr@Cd(`a2{R%W;TlO-xF>^uf3(h`VczNQem}$#McAX z`Gm)FXERgJAv2gG(FK_CR$2%K2=65veOrZ@0fY|{E}#SGi_yt<&?qYV zBzg@!fxZ-Nk`mtgoS4;nsImSXZID z;qbdFtZUGH@Eix2>m>bq7_twrE20-aSYdU3h~b&DtQ!dTpqqEon_wYVZrzACf*v`a zIg>57ZVs^juM;SIg#D4oB{6vqNq1>yQHR#@|374(qi7`)h*=)KRf z>!PR8!{}qt-G`V1=;P731p-wBUMhhB#`QDotLQ~^)tA{%(G741cm=u#o(3nOi|{G% z3LG0`mqa(i9Uy-NyCmUBxb-VcV6bp`g>?pA0Uh}&L-|$q{~pY5CAj8u8B8|PNDxE z-JPcaLv-zj2!yUF%!Oh=d7eog}IAVf>=-Bn_W*~JVyCC6y zxcMI`IL2;BIENnHR$*O=j^D(Xqd$jUM2FE|%n|4tW86+)H$*3HuCSIsFX1Z)$G%5T zpudJ*K-Z$LLYwb1>0Zk2h;AHbY|+=D7tvYt_2|A^nEmJ*(1{B$?ormm@FL-cDRv=r3;bue6W;hayAC=t z%}fVXzh=)NTnFcgdjj2qUIBsIIOP6}y$G)!Jp@XWVI4(1=#^RaB6Q^T9H+$F$#4f} zKa40m1?Is3iH^aui*zIU#gZA_fIb$Typtmx`gru3=({-j&9NsD?uBFbkQR)8hCK?e z8=XbJ3?2Fna}5289Dy+cbp%dAx82LcK%atMN5|&bt7P32F^fF!)L*ZaN)P? zIilgJ-?7)A>*4$Z>@DcfL+l|BbEM2~vWg$JtY1dC3Gv2btcfSTc+`7;W-e?E9y`%> zPVmCd=eP&Z$+AhV@nrdw2Xg&44X=T!yMk5&2yuI4El_T?p?knEm;}AXy>+sLE`c~p zvL?`WWzb5)vP2sLMIfu=+Bt49fF3Xcx@P!q1%z2jPgR#$^>91r1tXvcWSN~{>D>l; zzz~q7_#&`brq_bOZDr1qy$3xEra{Cmv%bJINShzu8H|?on|tpJ#>)!kDWRg-c2}^j zymY5Y-WA+d7Bl3dJH>RGn@CdDXYLjnHGjJ+ z7%Q7GTkZ}f%2v&;yQv~%-hVf7b>`C&YBg8i9jqL=rLcJChj=)>N-(f^|4dFGwL0A6RhWqY3ru;a1i2vkcBc(A++2Z$CAqri@rd zb$hn#@Mufx`qdwT^9v?thEI*cuTORGQzkx zErjdtcekKLy*4=Q#WVDsPW+bgp8HK~EVyOYpvDcu^Ikf(bkwKEeR|5LXWhECuBx{I zS1~7~Ez%pd`RoJ1`1V@08sMzzX1E*3&Y3j7d?45q9?&T1GV_4D>6K$@PQo(}IDNEZ zQN0y7%vAFRXI*_~pnmUmLqg;0;Z|STCO5t^rCtW^Rc}bWJX}z3TD>B?px&B#B{;Mw zZHvF0SuV|~gWFWk+{LO#we(8Mq8a;Hux3kIy&kyla9R_a306mjH9QKBtDei2UHR9F z>a7}_hgUsKu}h1l^Fbzq%}ymvsDfh;y1me#UNhXGT6!tz##d(5%fSP#7ambhhGXo( z;FYhox16Ka9K51hwrEkc6e-E2dKq9(%VZC*TZ!b9#Pm{zX{uc_|&RGGD)TH3YzkkiwV5Qh(`I|9d5lh&L#6WkhZR6`ou z@&}!Eooc4xo^kH{`G^y7Lr+o44ZhU30dj0Uw!|n(a)SG}8RLiJOtCq$WA9hDzO}!Ev(gQSU zoe`*vt5F9xKH?N!-KJhA+@o5CH~on8Z1quc+!!>$N7?1ZG+Jiar0N-XQT6N{+|)Ji zcr+L*Uw_189t~EX+03)80*}jP0fsdQ#=$(;0CPMWlIL2oRI8KcUYwg-VLe(s8m!&k zOEPDD@M0FrtTxWSWZ&)!_oQ}q?fbZsY}owWGOLLx^E#+}=~2_M9IRo%^y%ebZ%Gm$z1t@*90|hnF!~cNx=e?pO}C=U%93hghe~ku~rbr$kTy3qVF)dS;P0 z(JSz}YXAN!o9*9U!(LuErCQP_9t)mwcplelL=)`K+^W8K?T@ju|K8pn?NzfM&Z~}d zMjCo7c;$Ka_R0zMrs3ja&b*8+tG5P+c);lGKqU&j^Z1Gr%HrngKL(>`H)>o9+@`vb zLGv2biRWoqjHNY=40Mlb>484;>>q=X(}#VQmrXixT>U9{R`qi`(Io#AtllnV+#<(m>oI3CWrhJ7A zV`j%nF!@TaczIeXMIK@fHq1O1Qcc2qVW@$yr+_n~a>K=JG!W6DJ&wW|FlN{R%BjwogkFxk1!(N;{sz9Zzph($Z?p zmH!%S-m-voidy+EG2<`f&itxb{ny}@w`c#t^gOeShhLixH>&$}0c#L{6~wq#(Eh(z zKB9-0CLSAbrT3|T6|O3?inA;|3D-`X_irrvkB*Y|HPqK?4*ezA%yR#ZzXTJx z9In&dTq||$yXeBM1G^9I$?S7BV3@cuAe}hsrQ-&57hNP9D76~xtw*cs(b%e?nt4t6wt2`-bhOZ$(;9PE~uV>y$U4nwE8mRJ%7QMW*J=qvVm)` zvw_ra^<1zgb%C}z#DIC3Bj`FH8RD>$f%I&pvzgMkVeMkkExx=m_-%y6mw#TFX}s8) z>&ryR^=P6#cviJ+@t|sH^|0zu*eggT`ndYiTT`l~VlR#8dG(ikd1a=qx_-{u@I@5< zuFSHvb&|PCHPhg5q5dsyAl|ENkX@x&)BDquIs#UQ`hyn-tZvn@O9EDQ&8)5kx4cr` zeV7HIudy)vD(eNbye}c|Ppk}aF2|Emm@p?l&iQkG%_JWWZYy73GnvOZokh)8ALp>t zWd7;#VDg+X$poT*Ws-tkAd7$rcn#G3jdMAWp>a;uq!m2_FRGUGbB{YK+0EB??2BLctFv0EE~yuy zv2ks%&w@mTINl&`RO{H(XCb%9#AbClUtXK+14dT z*Aex{;2G7@j7il29yfT^&*6DmnzE>Aq$w-Dyz8oECk&WRKM{3uS|?YLTA18M~sFa%^w8q7^kI(LokpvJOZ^Y21=v*oE^)6r|Bi9f{=$b9grV6?JC zP^N1LEAo`HvW?WC#cPCHRC8%(&dmq6Ztheg4fmKwp9;ougGlE9$dR_EYj;}u^U%#) zyKRsJbPtqS2A%{9paf!1vwMIJAn!X2gDD{IK?I(miJ%3ffV?{qJE6>356e3hb6^>i z#D6xJw3?pfbPD=_ypb^rmL<&kTHe;E1M)Uf3dk!>^2*aBm;>@kR28pI)dK0ejtx`y zZ16bq*hcUr+;DqpgN__A)lbudGiKM*9AcI?Oy|?Vnh%6%sU^Vt&*T(r+AbItQOmAUt2-KK`$>>hPA8$;6|G)8`Ln4Dy3W67Z)KO8z%3wc{vb``dZ`3)=z+@TpEb!+u)2KhS(7dW zU-jA;L*=xB4%>aWKeJBD8@)I>*6pb#$EOEM!RXeEFZy&}Klhtwsp*7*7aj6)?{x0W z$}r7*eU}}HE_x|&vKM7#^PTe7OTn-2w_m!gWDthY7W79FF}dRYMm+wWOtE996y?#nx+dKUH{{^r$}U3Ez{MO&+`ev`G~%OFcVJK%Pc z6yg;mnLRCCS?f#F5U|ZD@3xQ2CDrVJyH!v6mT*}-uMj!(=QPa#oCk7=Gcr@|9AM;O z$=|ctGF}DZiki0Xynr>KTJFM3tEQeKt8F<-Eoj6^zO9fW*P8m0#%qjhQD~F9)e$(Z z+MmX|1U&RMo>3An4IBrf=oyf$=Bh+mCzqS@lBaZK*!*sj9Xnd;m7(Mc?pjtMdS+#6PQnhSQN63DaQ?YDSw?;_MXI0Bq%2uCzuH5e_KgMp@Qn#570JA{K zb~!)0a7=KGuNB**RYO1rguezQqd+S|%EHk(YPefkIMD&0+x<~6F8O>R*w z!`Y@<=18aNEKdQQR=kYIFL)Qwu`&;&9J!)iVeHl_jUBf4@x1NhVLQE5qSN6c)j8SE z;wsZT6}DqrWjB!-B~w~Tk>stsC^j&0>Wl4#K$$U>$J&uxp~@{mq9;^KvT4;aA&aU9 z;04vvFUzWBL)KJF*OpYvhKG)I%a^7^R7)qsU7d5eCsTdq#p5#nZ?w6(lKKx@XF0Ou7tYf`npF|yloGw?V&a%$c2>_MOt z^ngJy3Z}q3SOuZ2?D3!xWUEbPhy5z^v*YZ?b8Q%DVDnx=A1oK81ARsqP{(4%LRSxayU#Gt|trMW0p=pLYK`$5r1(4q-LSU=}Qa4Nw)MA)pncKra{q1uzX3z#0gh zNY{b}&<@g|4-A84%C-&H+2|Rt2sS`?I}HJ?=G5cu=3ENd3x+`l$s558ojgW(7A%7j zh}KXIXahY!j<=1BuD7IMEp^}$W}oEmQ#7}!ZhoX;U_MT7joD>hAjhBe`TH~3k9q#mbN!Ed{>Jf)yt4&ITNWAi zICrnKu!y;Qs~y=|#|(6m(6;PFAKtr%>SSYD%ugk{(~G7lDfiZj6WwF}O`->%6TREH z!6dm^8&`9{new7pFs3fpePHKB`%}BKT}}xLUL33Q?7;)9Wp}3b>^hSLt-G-sFBE^q zk@zUPfzxnCLCW5xOW}IY4_dFXc4xC0xuYg+YV{)Mj6E!ncc%^>u8ie=wH=kq4QOlL zOUYXDBbfuKE-itDd(`F@N3}^t?Jc=gFBt`XIFs4iwR_*;0z+QUvvty^J9oL;=xtrC zFJ8BPm(%xNW4(B`?!pYq^^Cg_DbL?*nTMmSn)*CLZhoEbj*x8au;(*yne)#-+^})a zC;cb74rC-k($D&Q%5jEL{H5pk?ma~DH(Y;<^>f~(aK@I=^9o~by_D{(H{XR$OL8o6 zM(Rk)GrW{(FOEKR`@xBFn#8riOPOPNFNtj7?jtQ@G)}N1@`Az%oB~&$lWO!_eLe2ULia01YH@U@0vK) z9^REG#4CknkZNn@InleFIUt2FJ`$bxM>9Th|5c(HpA%_f(H~9OUg66z(|ICIEcxRp z+>572$bMWM$8>MwFWh~xQ*yKU@rm?H${)4Iy?|z*$hCFQi=rLQ!GYt3w25xpF2^M= znjYPoy3mQ5^E}DYwP!B}B*$Oze5S=guG3Sy56bbtiL*I#c#YfrVfR8f>Ur#VT^H{^ zeDJRK{FhkfmhJXd8D!eBHRJiD_a6c1-R*Yl)KM>*rgo>?Yu-uEV~66HefY>CTR6Yn zBx~&I*RFYKD3+;u_*@a<_V87Z;EE$@8TEbZkkHB-F{!}ekc?h0Xy#}|`vyosG#9qUS z6XXD8<*Z4>3P`+`RU;?>BCG{C@;WkuK`;e2KtlsdQDDFf2)~{+Gsu7fSOB5ZShxcz zCk>B+B~W!bm4g8=306*L{1c5VLqR{703}d&23-k8ffOQGLRX#XhMVE6>JfMj1a{F7 z&`oK6?0##@8mslVR zM!*~hpF?Jl0eMgaB~aH&gTWw}0;{0*Z44I}0dpYyb{6rVA56TR%b7Jq{2gQjgJ24* zg4!f42GV5)o&$k%sTgEH9xQmSEn5yLtVBJpc z_I;wFrc%95IK9)p@=q1pEBn+Ngok&U#WFkYC7Z&UCF`x<3vPe)lBQdQV<)?H*5Agm zO?}a}`ch|=x%^~1{^|y`n>3ThgaHR7(y+6+f~=@t_2A7$v% zYWBc=Y9@x&9EE39OTFW&<*w}%iEsWHB`m4A3U6Ru@vjxzqgAhV+Yo~rRJSmBYF|yg zHPQo*4)-S5L0w*{e%U-dLj;fYDB%oS)E_^Dj{kMvp z;U+a(;daa`n1bPqn!Rv8rp(K5Ud;kLf$6lcsOAE^tSL_|sTty2&^rJk*uEk2j@R1p%@b-(!$rr6E~~W$ zhd9wn^^&7R@iP4@<7(EyjjwYybVr+dop7IOsWPov3g~guRt~E-3Xi*9^{jgH@TzJV zh9!-+Im1gss^D7H5+7@D>JK-omxMbSZ1b13itU@TYUbbp^Hc)|(-F1C;K>G4%G&WA zYAwP677bF39Nkvbm!_{%q_g8jH9-Qdf4yz?PB80Ry?`Z)1z2}QfwR?=6KU)!<7c=vy}VJ)7C5b1N@(+ZO6WAd zJA=*ZQ)>_&KEo^?;4G=u6g;n5a?hUOOyJ5@^)_JpOw)9lT~irjHR*J{tT4}X(c(synw`$4WVLsSw$D=v52H+9ZvRE?B^g4^Bt&?ibz>BIS|D2P* zdR?sm7fMkeEs@&8Z*qFHvR=I=xb;o$mZ#Lqz`g1Xsh5Wft{0wGuLv)^iDhTt=$cCP zN^t1S&c0Q%l?yVdw+?PmEt9SB&2Aey)l0)YZ+6=-sNOI<>ZYriQg0SsQZ3suue$y= zQ}@M+=w=PtT=!MI#Tnr0TC_Bw0ZyuxCN#grX+m|kdRchD7oT(E!z1dA!IN)sXHxZ? znv3wdYH81ko2e$uHKtS=h3i$zu`r>U_Hxx0-K@cOIMw2|r&qmxIImiY9&+QO6Y5RF z3%>Ybi#rTnnI+;vZ*>n)aV~G2VSrmyOPP&t)nQOC4fnj&Ic$ap)fW!&43D3A*^`d$!aDWSNDOddu*ddLb_IrQQe}Z*}WvRIdeY zQ!lMv58S8TuzI8LxO%hd&BIHsSG}R0{Wgxyz}ZeYI={`?&S-;r&2WcmSs5qaW}EBo zuBh3nUJf>@WwsBv`76iNn}lcH=4?atqIxTE;O%amavWKIn>%}=>LuVN)zbI%Z+B;G zyLu_OSGDBNyxmNtS@WrthYN2v8x3;CRIdmxtCnUixJ8Cb>V@9Hy_$EpXPN3c0@5Fi zaGPq$)bb8@4y4uVf&1R!EGD)Lt2YXdt7hjb9dmT_I1SFjOGl#W{)xA}G-xLo1>nuL zs-!8F+cldT)N6*5=BG)US5Vc;!UL+MlX6LS;6~INgJ-;W8b6uTbLgU)EAV>K?fLMz zZrxG1UbSp-;#_x&Th(iaQ|CI1%*tN%`r)B-O^k(SbwRxexTsnhH|>_QV_Cg5IP%UT z+gnm!7TKY9I@?}dr}2$&n`#;DmUlWQy{&2Wdf-9TQWt-A@=nfbqiT)Av%cu5ce;m| z>LoQ-Vf#F{EmHo5TYfaAUM<|LTFP%Y&n=*`L(OhDd!Eygl>_P-c*OClZFyiYNv2bN z65L|WX|qFTFKDV|culpu#^WuYN_d`@_v=G#Zu2BfM72Dch?{S;@sOrbtroanbsO9b zr1DPKd6E&38_n*^9$7r8LgI7&_*32ZA&r+ADKC-a35%B377D7RjEOe8(TR`>y*5iC zPs>tpK{G7FCDqcEYi(xmEPGo{-fD@wOQ!=|r&{jkd*w9Zd0HCOqG{yaiZ);RPSt5& zdU@rkM|~;7D@XF8BhCg$Lx(ldC_Mfyr*UtW#?7if4=<_q57;W6SEw{@L(|9$A@;kE z3?6IWcXOa>P^%ecx5mnKtCfXwsylhj#4B|G&(l(a(KPb<$%rrgm}<82aC%AO<&~|O z(=?0limTsY`8Q`B)5{>01>WOsg1mwjRxRnHsuQr6Ui!M;-1Hu{sa>N}aIb2aCK=T- zf4pq{c%GIjhcu16ev|j5FR1oUH%a5=mF+9KX>!&AVp%izw{H#4%OI7NG>yCz6ly;* zToKjJ=}gi{-jn(Btrp@B@=ltB<>e!({Fhk*0s8DHQ*5^noGJdSmLu_Ay`q=YUxlmQ z>(;x0mNc?s^6>e+cH|>5qP%R<+}h_QmHkp?Z?pPI*r@J+y}Xj9Tm39NpjwXfx%bL! zf0eTo1U3Haq-2cT=Nqi)tx9@jm+<&aPOG z>GeSq+BtafCu5gTsBCPT#(M{+PAx=U5KF6;GJ4FvzmNL`!)lGfQ>x`iKR$8t`|X~x z|NFr9zvW%C|4$#-#y`OAx;y#1l*jpl`c;-{gyq9EDR>CT$7{yn1t1@>DZ#N1a)|)s z<2CZ(nhtayI6-!`Iubb3jKi1wVT8VRa|D(URiAJpo8c@N z0gE8oOF>`=6hR5peUkgwKnj|Nt3Jgg1IU6Aun5ARW>`Q5j+ zq7V##8L$o#pP^FF4<^7Gh<}!aFBk+VvqrOPy{7V_eEL^2Ei<_zeHw`1!G_ZBo5JFFa)MS3Dgac z4-A4?umPOzzl^+K1T0=g7lgk|#h@2VgA!=GoS6&8!77Li(o0|f$PD)|LwH5K=oLre zTG1I_xa})61bF$pHPmAD1@7Wx1rF?SwIo`=IvmH)hI`1{~s@V?@ zVLIVnqwaIzdG(gysB0K)w0ZLPP;c5 zy4B0V1HSm28y_A~Zw#JH+gE;}qNZA{MR;Ac+{a%@yAOS%VGe4}(82YprLBp*`ffw3 zn(c5#wQOw4(+sV*mX-Tky<~LWZ5Yx7dANWnU7DCyvk0%LmdUZ;)5|1w-fak7=(a5a z$1ilvM5CH5a9Xw0+osz2b7vCsJg}xxy+L>w&v~_BT+JzXUbWnw=K1BgJ&ky?0~z~tk0=A0MDp4@T6+Fh!{~V9XCcs=hcQqHCNzuOy|{xa7M=m zPGt1eh9)&z;dV^t>0?ICUbtUVo|;#)057PP;hpg5Y1Ph-lX0i;ntCO;j?4<8{7vJyZYf-Na?(?PX^y#!}$=BoN3lFO|3XkvCEt*wx9$r$jazjn~W9(cXbM75R zYthoe1~{o&W_k0++*w}Pt!5U^X(prI2t27;rs5cxoTuhh-{bs%0elG=5aQad_4jKb1A%*YP}AtyOp<>%QDj zS;hK7+7W|m4>~uFE1T6z!W{>l_9U|E<=_$3a)299Ep0ak-DmmXNi}ESIZWsEh7~o} z;lM>YP*IjLQhfq$QtkA;Ca7#zGX-ZZa-RqEt2YGaT`xSL-ZWe!v$J0}(-*-t^v8xC`7F2XCAPG1CA z_(_#vIC`;rh^nktvk7j!*d6JVdKq{~wd@+bs%3ckDZqKfp`hjjJdG(;?O0HA84j_W zlxn4fHT9*0(#2-s3|>x%YkVEtc!|@3>NfQ{;U3kJKkdd>4yrc{k6z-=i7EAF;dxEB zs@?`{f5J@{V;L*$sf8QVORCoacdM6EZvZx*a9?s5Q*RQUQ!O1o^9h{;D{8L8Vb;dp z5C?kQ1l0*O>)}?_vKKY=y32%=dKtK1wbant>ptMft5<-heen}i;GB0C)Le$wFrAki zLM+RrDG@mSNq520s9p=)sak4k`=qHm%dXkgqh238t9lUj)(g%ZWA#VjDb;d38mEr4 z?31gP)LVsZE(4tIAb#VM&enuu>ea#xpVGY`sb&Y<{VDemOisN4*tlNJn0k}&oN767 z%pBGxc1tk2S%d3v;L}cVTcTWgNLvzcy=q=_a2^(GupLf)+LUUgc%9(Yi-%#6OA`-Q4Tx`6YY|?#)ZNYiS8CFZFdY4i>(#5*1h=|gIHg_&?)?l4r4p|-tCxoh zcyeH=o>sF6FRPXbx9}Nvo|M!JaXA?ItXp9nS{l&^w|v$~SJSCp8tzjq+tQ<&hnGbj zUT)UlC_MgIcfXlcZysJ%ElpT*i>|i0@|5bT;9AuZAM0~oN2ydR33v3lbE!J3W)3#0 zr8xtAZga=fn}p|7%kgkVHO=LP{OD#4uET-PIa#ZtT=YtF5^$4hDZ1W`kG89qf_r`O zna{byuvxu4T=<-OkeXJn2rsLaG8f!3D@*EyxVVmd-hI)b4(*Hr-12#MIK!Q4rr{nn zD+kpahDSf|j^UJgv+%rntLkmQ_7~iAF|ORDmRh($y`*{_aJTDK=hPd3M^wuem@l~V zXi~iycuvb%QEwd%^t<&%xg+58E?lo(t9tElO1)n7`r#q<3hGV3)9Nj#w+yeT7ve61 z)DeN>Uv%qjRIdeYQ!lMv58UT^)x+wI!c(f91N0Z&*)gx)61<^WmdUFcU-c!o?ik#l zTJqO^$?d14dL3~0mz=g$=hPd3M^wvk#C*w}J(KFqz>BJ-@8{eytJl>F9O9q>WZNZw z_>hyovR=I=xb=|xrb9}-4BW3;+Sz-^X=gaEUICsswYpNyFvYV+gG@u<1 z#|NC1$(Ba-THrR-viI>N(Jg5W_rQHe;)>5yM7L^i6rNHo+dMwtJnpZYS8oYk9dP!T zYWp&``YO0qwd9Fi<{U_>)k?zMUNo)mxJ=KZIW-4hbD7)sW9m)9bE;*NXD)Ncb49&% zIPhinRfp)8-F774`Y*e$I<%_S4rf$L+frY4%GuGc-Vi+Di_fc;<#yrA?yC+(^%meY z)iU18Uv|$sq04m`;5yY(SNw9Pu4s#TZE)Hb-+8&7H2TyWghy3N1;dv+6-1}hn}wHD zO9k^Ma#@=fSX;fx>axKzqZ`rI~;0hL$S2)Fl6KJWr9&WnA9qn+tnvyw%DWCh^)vIPd-0~GS*ATj> zzO3Q$stfS6YH9Su70w#~?_a#Ykz)Z=MMAJKZ_aHFRwzwRr} z8Zp|bUK;N6#rJ$gFSdr&9EHa*ue&XHLSPo*yi)T1uiBy9iYAeI*Hs6;dZZoloHk6@ zIgHBJ@m0$YBzSF=FZ0&FfG^K%Th*7e?W$9-=KZkql1N4)q@Z5a@+%Df3WlENA3Bi^ z<*SSGH5U2krSoA9!t&mWeE&s$T2LOu@z?7^cGJ-kJo)wVT<-EAJF;1Vl5&(BLlfU0 zvQvT0g)8}iGM>syNwucN*d4im(Wy$(uxiN?RV_&qs-+S2s-;m)s-=;ws-@a?)kXZ2 zYWaMmY^-e55Z)M=HFle|jIgibq8BuR4j@~V$9EnbhV;v7&d1r@M~{YbX z?3Qz8NE!Ga>`ov9@}LMxpzdn7`(!fDkxnL&Z04fs6iSiN?A6gQ`6OKwu2(JT z692=U)R9&-+u_ua1m@^ZFXQ zwu~?NUBj0&mWNH}HTJ9cv5iC55Xol~q3s=%=Zt!#e6{2N-_GDq`1kGW+N)#1_Y|+O z3uTSw8`pAm(sHdkB5g3=M7!4AzH9AhgM4R8K1X$kw&jU!;9%yA9phclToZ6nwe-;R zwYKxs=NR1-mvr5y1HLrj>zrn8u2-)K zZZ$u?j(0^!w`pCJWcs^KHd0D zw--CrOT&Y{_#V}=9_st1vmQ!}sy7bL`_fMN^z1j?)Bc-R)szF!hHCp;htEt_%R%01 zCMY9&|#@UhGp5-fqLZ*yJ+ogfEBfXpSnO!#d(TE6-Zru*CW$?}nzZ`-wRXeHL^ zyUjY2QkjePIp5B5XH(jX=cunyJ3qdA??qi~f|SbF4@Wsi@O}GHJCz$7r41l-1BX=5 z0_3-ZGqC*5@CcX%t3ZB>xE^$X9xwvtK?zjxgU0dik{`$q9?LRm7@h#~qsXBG=Sa{A z`auB{3wFKpGvp&AUcm_62>9MyJ=_8Mz$lPrPtr(dvug}(iqtD~m- z22PiJ=;j7?BR>6e1LrPImp9mn*Y?tGCtH{omG|?L5l6m0?-V=i#q;uWhHsrpRdmgF zcz_Fa=M@YzWkPq2*l$qIHnfMxFdNX2pH$%6f2 z`P}V|WaK+Q(6$9S%Gn~;gde_y-yPe#=fXXF9YnwOF6L4nBq%{P8CH#pYAjqJDdm{jxH?;B%8bRMRlVuL-komrpy&*WhKg$TXARHIRRW zG1K$|`xCr=ck<14TTr66@*#`U%eL$|`DI)Z+{_OS`?AZ-^k<*E+0D*h2!GFRJ6)pX zFe8f|d38`;6O>|--{bd*eZ|Ox_ZKt$J*SxR`R|#Q@7w1wqE~<4?ySjwpI|1G|@>r2Fv??6&gN8z#d4WM5uh)BHnz z5#5)Ko$xu?CVuF)VAh=eBfE_^A}{}u9j|Hsk!}6ZmrD*W{>o;5d{OXZtVxuYbJz|HX&9pa0$N z+~E&*SIM%OMzs8dqZyb28zA=2EcrnWjDbav_$ezh&A+Wa%f)G9hfUK~j&5Le)RB7W;PaxXM~J8{p=DcGnXf>UG0e z*V{Fqo`FYHOBRu&+C`elpa{cJnNJ8mP+Q- z;UT=$y{k2AzUNjnM>!AP$j4(= zeCgIPWdcRR%xGy+6s}h-J(2jC+Y^yiHQV8oYDUuB%$N*j3aZMpLPpO`T{VkbS-}$1tYI@09RlVU$FMoDq|KiAe_R5hih^b!-H@ljTr12%_ z291zUIC~kAc%GK-=+HFXa4+z8hkOS5liD5q#1%BHbjOft>5jbWBi-?4_ZT;!5nL-+ z)2jWAk>k>W`pa-hwG8swFPt6n1oyA!{-?X?akx>n)K;h3UuX-Se+%0*O(&cM&)>p> zx`jF7Ml`K#;ee~%k5wCuII@ZE7LKWZB3n4A+TR!%pE>mx;T6^Xa@O(u4G#R$-PkZ3 z|7G&IEtV;Iv9`F51Z|pFTHL5w#-v5Hzar^YzB}?uyQyZ1=wJEPCGv|O{&h+HjJqyr znX#?gN%snOT_VZ6rpl(}iI%;!08gm)*Eo&mrI*=O)HDn5D)5hmY}tO@vJK*5zjDi# zEwf$ijzyJ5_$!i4t5sjd!mCso*{psN?)K&FQ0*VDES{HF8l3ae!1-ULp4(#CKQ7Z2 z7f4Xl#M0sk)iM^-s-NHB1@-w;J8N0>fcfaJ?bw;kzvlQ4`at+7RxfbpKXAkQdR~P^ z%Pq}SIC2|nEg)aa?}X(dirF{HA+DNkbFZ49^7&tz zmIg`L0oC5Q&1p2AzwCsjsfW2*x!sPpx2u(cdsRzu8P)#c`tkh54QZM@JfT|h7H)Uf zBTYp$7vN>p{sPzV`~{XYO^8m9{EK_DELx`{&W7MS3XtNw zszt}~yiSyA>NJg1)96dzVt!tmoaj}vA1?S345^m) z@be`8%XfJXOT8kzfG2;Nv01$m9JbqFuwcO=yN*mm%+J9V2U;xNHAelug zcbU}P9NBo3bhn*2p^>D{q~dPV9=XkU;G+HVxpzs*hnFc)ewIs!KYpBpxQji<6RD-U zO~;(Q;|(E-cJgyKa$jcW;UcoMTgs^Q;`z~;o;?RI@TZXYR`c^Y?ys>zrd0X;jeG1& zPBxT{akj(1!Lp&=M#~1vwmyFw51qjSj(a%j^LChw;sjde*_!Zg*u6my7zR^d6~yl4 zVh1$1558i~MC>PnOv)j+pjryb-{Tx4qtogY;bqlQ;le%cF(X`3GeixM-?$er;W`3R zY9rj@nVo9N#7JYxs|(>ipE-#6;KRW!l|FA=6IRZuIS()W#%WyThI%$zRdui9g=^7L zbpzaduO8Ss)a-_Hs^y9+O9JOtVHuKnJ61EUaZ~V;>RH%3IL+T{lJoMdfAypyIZ|wB zTA7aayxRboo>i*7G9#Xr*prx%{8NZ z{BT6gF?jN~_LZTEnlsf}grhWADv^R$)L)0au9k)bG>v%S-rN9ZH3Da-0h{xzR2`E+Q(E%%%{&DaRH zd4`DK7j$IX(we3R?prVvRTCaoPx6dXi5#CQr_`K<=NFtUu3S}b1Geus z`3J}xV^n1;By;Wk?v0*svzqji)gdM~(RO9k%)yhYWqSuy8`x{MG<8IM@y70#VW_E` zQ*RMoaa&Ls&^Z)_qYts32 zFFe3Oo5f>fP0bP<`n}s5bi4DYl&4O=r|w*{`boG$wSV2vjptSF9NsjITovY255Qxp zSVmi6+8YJZtB^pmb{ez9)9WapeFdj6bPQGXo{Eb0cBpDxeTMD^mui#Y;~^+f>VoaGjn{Ice4Ya%98$ z9^^)y>@WT|=j1#wtQkh(DPKY3FHq1dp1(o!UV186Qaw$BRz05vZK$5T_q|6lON*)= za(hBDNTKq?EcF3aXF&9RUU}FHL^qQ*tLde8ld3!5?uVRRZ&yye0l4)KZrKJsr@pgm zs~&@ARLint@*($~%tgF_=9Tm-nnv2Uu6mT!oYx6q(t29bM>TH(Zc;7f*Z)Dv-*J>I zO;cvuk{vlSy~NoDOg_Y^6`lv{p!s1Y&;6`m7b)&xiUFOV7Yu_j-e_qym5Sp3_&EJ0w-Z#J@kvLws)h$N)yX0hGb=27-<^ z6%X4lH4o zOs13}Gfrln%s`omzkHgn^S-9yM03oa>_>Li|H<8KNztTQQnsp=98${3ywsF6+g9wE zn#78mMW(qImBhPGD;;^n*nhTfI(vj7o%pkOg!gCLx}SInOT#2?x{vqH{+)(>-CerL z?ju#pt|YsZR4uz#$HcRLwgbVO#J7-Mj+kfTqZ+4Y27TRygK(ogW>#XQNpqXxeP&95cz%7oz6gC%6OLY@U6BLk_2gC%J1eXwG@kZm#iHafkz=G|7XMvG#-+ zd(z(WhNdSOdoTbBU=}Qa5{Ny;lN%uScG}@ykO$LX5lA^4d!M2WS#$DJcKrQ@Tu#e5 z%%(E@$hG`v;m+*Ai$3xZC-sCE&++g`yd00+Et~h^ZQd_Ga3FI)@A|AhX$nu-)x6{M z%ctzvX|+`DRKtd)+UHr8DdTSaXhD=cp5?)i^8%Mb{RQC+G(*Wtrhn@;B7_QrB9@&<^sH|+AFELq(+Fk<3OsEzpIZt<1DD6jq0_)ovLLq)Ao#8 zdUcPQeekeq+0O=_F~zGn`HeqgGSAvIxjBtngjZDi_t$kiZ{L*DP~cg&F>(wDtB%4= zs^u7vP%WKXui9Uxw4>Gaa~4zCsX(54r7;8i%=-Xb05aivU~g|dkjWg}slUj;jtV_Bs-owwlXL{Uy!i(Rcley=Du6;YtXX?u9x@NFs*POgT8gJC4r{y4Im)s4l zf@@Vv564QfT&&(I?QO-+f;^Z8(%$y3|6N6*Ecf-(D{2FUlKu4yDz*oT@MRURO@yrq zs|lpQ5b)}Xs!qW5R)zaV?X7A`@3&*h6?izKW-r{2DWCO-=G82~)2f}DDJ0-g#@6aX zJWhL|1LdJ(P3Bte;7PkfWfg~a%dU%4UHj$OBD>{YUU1;sdh)_tnp;Y}X!+KjygVn@ zE7RyTP{sH48bIg{`6X~>B3iz=Hw-30FTXBZOPpN1EfFq(IOR3n&CiRsT}eSi3}Q%y z8#Jb)oVR+x99Rd5K!tOQs1?qD0$2cbn<}hMu<PfmR zo(y39fSLxLQ5~n?5uYCO>B;hnE6=mHhZoh8!dA4f$^e`HSy~f@qXEV+H3zr z;xs%H7PTaC72ZI6#b3uyH^rY61Y_;4mA!m_@ZnYq(stCJH4lgP+>M2VhA#;l39 zmGTk`a7A`KO>+^u7_m!a^gC@);tISjv8mc0Wo#z6Rdx!tSi{&d(oJhR-4wA~y`cYI zZA;}oC0Kz2vWMWX0*iV?y1fcHCfg>#(8u(tPY z>1ir;fImLWll$1CU>Ym|OD~YO1QtQ{6-jE9BWEu@&w>^!MAoi06PjkBmqhgD0+V3s3P*KDUe= zu4wPR_knxflnd?_UO0EJ|0Ilkt<}Ebx`JPIjprX>*RODsT){t(a9^(R+D~^Q`$f>u zK`trSAE&*1ki~@D2i>!-^qT6*{IqY!R({M)LhKzS&(^s7l^)kVYTU$?-u1QyzS8Tq z<^EM(>RA2jIG?zUp4)VlKjo*orS-u>VLDrH;HsdPQzS zTZY%jWc%&QcK8u?m!ghceg+4NBdkk60hGWZ*aWEr6T|yBmj62Uq_D>xJrv8r)Hv7@XireNzlVwR!=s3 z^_qDUXyQ;^a!`rG@aUeSJN5BH$B#@(n1*MLx_qs7^2s*AEJ_kQ}&@r095giBWkb9iD-;v&2v@yM3M>L+`##FMSsI{y+U zz5isd{w3|m))!rHuk7U??9EpFXyMFdv)iD2Z1WFC{72o(Ygu(nOPYb_{o2mFbXD30 zye&IgMZEU$Rn+p^Lb58-vdzDt*7bhfJC<*g)(Q7S(!(&bXrXN(=j3DM(R{ybE3Y7% z-PHHD^Y=-#d9VR&WKYBXUh?GK4>-GruJNv}TB>zp*LXZFR_n^wcsKJV@Be*`*Tf%$ zuDjMt-#l>*t2(d&($}(EgC1Z{(hkDoU=~;vQ`flcwchnri`TeO=Q*6jmWO0 z^d2KZumoz8j7pFPC9n>{{ivUGvj^c(+5WQaSa6_7O-h`G=R=3bcn+koRL z*t%(3>1k;Va9bq3ITezt!d z-;z-M6lOkP%{0e^``S~yv|YV}@|{ZQfwQtJk)0=p79ELs`4r#@u>Tp)XH*9Z!70)> zEc&(jPfW_T6X{vm)RW&W+&XPp35?=h-NxIdbn^*=vH7Lucu+wSu9qG42^R>Lx!IAd z^J2}Q7Yu_Un62Z9gEfqr6enMx8w`OWm;>ve=BcECE|3G`U=FN%M>eo}fOjRl6`k#vLV#+!@u_a~gm>l_x58xBAz{%2 z7thSyPQ#oYtCNtkC%guW|6~yVNw1-5`h*)e$^5Z= z!nu>Qefxwf!*)^ByjtDAoTSa%U`g|f8!TzsJbls)q-pcgNjH{eCX2hzA@j=QKcp$Y z#~nN6HQYMF#tNf(+JymLc6{JMaPQ_#el(L|`r+NyFzW>^nN7R=DO;Xc)|a53|gE1V{R zjZzJgfiobfVsF9x zGa#M`<_nuUx+uV=#9p|+KA3n@!xBf~N!fNd7{|fR8&We8=iyb^e)Htex-BtIOl`ob zFo#;%^~9f!*bNc8`DsBdT|E-Ba6WV(j9h3_NH`B#;h}Bqa`Gv{CE57+S9SAq5*Fbm zdMP|6tVp-$)+6>-#IBC`Cn9z#VrL?D7*r&{TL0Qbhn%|MzU$n|)3xdxl0E{D1$x?A zG$p+ZFUYPZ(An$!Luh7A+9sT2D_f&%e%y)p)?6PPZX1=}0=HkUt==oKA0C!%6$}QM zlH<}Q;c3~l>I47m)m^WjOYpXA%eoq|H-chPwHkeCxLLM!PD4i5Av)a^H*iSqSK1&v zEIWEg9z_c~*A|E4@|lDyVE-ZcAZL))Cv&8&%hwLci?Z#Iyds-=UbS1e1-GSy8`!zS zO6{PNxM6Q>hq`U7jPxeBb~=&u%$;P&s}_MyO+H60xkey7s2usbS7-~VOLL$tp9iW%=@ILSWzteByO(NLtJHLxzIOLw&z+q_OM%UB8VQBV7mxoWU z5te_z;n1%KAnqG@(*yU~vcj@)1SZ?@25R%&?7m-c;P;bR?KF6eb_#wI%bc+W*Ljmy zS5<0o{l@bRZsaEKWPUx&&6$XQz_xV@$1T4CV)RR9Z4n0Wz`d95xkw0>o(a>*%hiT^ z?|mD$UhWR^wuNbQzKQ1F9cowamgk;!*1MV~(w}?QYpj~O$z{)ae|)=bBkSjIJK1)z z{aydHGws8EJfvb%I-}MHr zwV?fzTurmlU|WCuS?neEFi8({fvx=0XL@}Hu9!yqF}^cwl_u|wyp>tq6qITC60$9S zO16!@jO^WdU&JUv`w3-Poz_Yloi<9Xd6vKUoS=Rib!*s`cLz>Bmn8usl(@>zf3|nF zs;crF*Z*Aag;kr+ai!;a$DUP#M>xVRy_qXvIXZ=wwxJ)SW-EQ|p`gYL`@zn0%3II1 z6Au#nf)~3|>DEWx&kIJKwcLDcFYf10&wDGU`$+OT zgg;_-kt7=-BWOp-Zj(p1yY&_?+q;HjhZ!5Yo3j16K(@Ko+!FX$ZAsa?Th*= zMYsa;PY*`g;w_##nuy=vZffyf@RAZKen4z*J3AmIe~+6Bb>@b1eSPP1w&kA9X<~~P zdkUpmyJ{Ja)+c0*jh6qo#aldZ_0sdb*i%WjCtTJ^OS%udz-xb2*9*MZDP)@%El8Uf zZGyC6W{tE-(~2CqRYU#Oa^hC+)&o`UR@d3;-Sy&i60Ar3%(AV3>Q?C#l8|kMretSe z3h>*+X?m;IbYzg9H&}>dnQY|?-`-s(&Gt7Z6V@u}H>ruq+q~EppWzxy2amZ=-R7OT zwgcfAO0=2Z`mV41!`qlIZ?)gqUku{0*mANhp1kbvSuXplfkm`uQh2G1L z+fl_2gn^NGp%?oFr8m1TzR)Y*VzbOFa@ZBVD?@Mx?fJMawlNqeuH!{PKW1UeQ*3bM zHt%n%R@>b8i@XO9b)&!NMQ-7W_%WO3U+krCG`BHiD|&Zy(;d@jzpNIU&llhB7S<2F z(EaI)z1x1#1dG8g73W^;#T+PuWl()P+ZD8fK2QKz=|(+y|;7z zH2Y$gznufw+KXNBcCHC0+;80O9dqBg-Mh*zvfR$eFE^OlIkn>Aay#di?snJJ?(wMN z?JnQW!D;1oH{Q;4_`eg2#c=rsVrXY|4^}|pmso0n0Wbj;K+Q{N1F(*<#Y+J{vmIQN zZSAstFune`%7A@FH2m5cR~jmvWbKLu47WIu7_J>TT2^X z;<<;uaOg~4S}!~)o7TtrBlcj#9*)?f5qmshhrJl>QQPTfYfgM-o+P~Uclcv$aifwV(AfINq14I{>_N3)M9rQPK-XG81 za<*XlWLq!;vMrb)*%r)*Yzt;gb~G5RGk#S{XZ&vyOob1R4-C$k5tOT>yBKBs) z-ig>X9ea7hmhbQKM)|bBU9xRS-Y&b4uibkJs24FT$hxp!PJ?g(M7z*l2S3Q9=Zt#!$53ab~G5< zC03}W-{O$OY} zFZYtk5haho6S7GT&RNS6X5j_d(Q=m2qCLDOpG`Ra@}G_O$Lir)(wc!a&f-nWws;$4 zQ_tQxo(0^d1nc3jQtQ1>OYvV>+ssc1Wv##a>J`vMr{hY+^dH zTet<)=)V679zDk+iwcmyKDHZ82436H~)( z;TF@P5^UPCO6_@sHMDn8;N~k_>6I*bI7fV?SN|(rujEoH7y(5v2UbA!9f5l^47?OcpT8rx z)wdyS8?L2nE6ei7yMpuvY0YqFB)u(2Ph_R#;CxrGp6PQEi}0dsE3_1`D-nAxVuxd3 z1ueAwqlkRA;ObWe!KKs@8Msxp)zkDUp77&~><7BtlV9yMS1rHFb-dcU{p=P#mTpfD z+csL`x4-SU`fZF zZJ-YfgUZ8Iv5j0+Y!Z78Ea$8IUTmUqy#GQQ>+Gc9PRvRycQW30x*aV)$>&wSeW#Z>-A?QM&A?;vxl8vy(0AzpJ!=(g3hrXP#;d=p5W4Xa z(uD_j>^*pJ-j882Oyfe^{pak_*mI9dp9|B;`<8)wE=2RL-svV@!``@ar>nsE6dmn{ zgYTtt_dKqg<}i)p!2My`*;{k$;eH(5VLEXB}18+a|fz0l(d@C()>zW1Nc zUGhtzl~zuik?4m(Z$EG$ckz7RJ$K*Jw^tAM4++JdRC*nQj+?@-;}I{)nU%T@q)35~d8@p_08TO*2lJ^eNPIydlohVtU; z%A>FMjvc7ld3|}Z*L%l-eE%DQiNSV_aKf^c!LamEctiF$Tmsg(N!V{3$DTJ0+~?1{ z6|@DV&qdOC`^8URMzcCB|5}iq4?aFakJ;3{EeEr0O%y*D1ZVqet!&$W)3Pm~2H945 zv+S@UE64J7M)HP@v^gYu?z*6Y91c!SHZA5OcHx}=sOItOZoYv9774F=-@@SHKF0-;EFGy4yPw8^o}FZXvaTDGV75y zM*hS+&-svCHGbZ8-_3qDcis(CYSsFAH+eThj{Wv-?!EIo!QG5mo+rpcXQLmf ziXZK6Q*tMq3tfr3Ct_zKb{JkBEwru5f_xlYe6t^FrXp<)UYBisvKX;f2+3}icU04{ z)|Lc3AlsZ%vNLd>Y^$(Ib}QU1+uGQ1k6+*k_tg^5fAinb)QFPD;Hl7+q9+2^)2*`- z7vQ8e>N0k;fot;Fglptu_3cmy&zqlZZIsvo56f1~oxkuPvcHuk+v+bS5B z&m=q($vZ9EE|7(J=g~sj>RJl@@1ixUPmsX|__p-;eXL1=b#*P=DcgL~vK!zw*|w>h z?~Cr}-~03-@9xXD@o)q#?R@`W4qgK}UO$RoU?hQg><+je6u_iuU<1?+Fnycn+JO$b{6Nqet!J)k%B}A7caVn-}KI;D$?fQ71{P@{uaq(7rl>c zNvtNe#9RGLM>5zJOB38Gty@|jJP>H95ou%alx!<};;lhMO|udg;GKxWvTSS0TEyNY zqeXQrsh+8a8)frnS{vW$aW6r?yWrl(r)389dl;USZIz5h?D6}9gG_2h;yk<>aah8^ zPHd~T?|0>#ck(64T+ko&aHH(>Kkx0)Eojj_x?MiD7j;Gad)>)PJSILYX%rsk?{{DF z&b)M5+6+7|J6gpOTC|E)`B)Vj5&!L++jxa{>}>5N4JVii{LMM}9sYcy>}J@?)9inV zYezkjY|Gocl$EQ^3pv?VL|!&4YW@UxP;^+FR2$hP`BdOV*)~e%WZU+^-+l74 zhpv9PO{VKg*n+DcP&*>soj?mKus~DtvA)Pe{F@$dqXizB?~v9FkIAn62#aCa7W{zh zAvo-p5$teH8qQGGzzO+;9W|xAHkp=XTluqr{fd}Xu%Lvn0?TX}!iHE+ZOUf{u75CS zxb;p=#7;iw?_0;uUZ#K+61stH#dg?_)=u1ck3Tp83$`#%wGMhMRTB@ooPO&7@b9^ZVrLO{A!YwX6uVyWZ(K;p+m)1m*M$^2C9w{&)0F516+1ooc^6ge z$?f4^r6cLUC>DN|3)3b{lDGqm8{ZbN>AkYY;Uy4%JG}(*AS}r8l=!^`nuZuwAS`nh zdj~ZB8uJqfb<5-1d5lpK=9L)#^`LTdu#09s(6YcXEPsW)1A9(>)xSY6fB|6XHk7P) zM#*pXI6N!c$_&TzG`5Wp_rTk{rzMx=u?BC-#@pTYC)|^z*;Y~#u9t0T7x~k1NA$ZL z?s^;k&x`Y!Sc!x1sB8;u_-(;8#7Sw>@O&hFCP+`NO51?9Wm|>ZAU>X|rIRh1G~6uP z3U7G3Ch|^+J#bDox%q?cfkUDo(ZNNDnTo_YcwM#?yBM)o-X6qX&Gxhq5^zSg`KE^a z^n9zd4!B#kMG)@YeQ2R=Z%Ply$KI44l5Jl$7?HjB)xD#OZQ2RxQ*c>!q^C26bhwrmT0BS=ryGN%1)3pdENm`)Y>%tV`nPPiwMXrm&TlaPlC`xA>2 zN^oUgVro&s3cMxTVqX7sji&@VmIal9n`E0q<~KB+IwW?(eW5rcaReSio&mE>Q3#E=oPby-+X@HbLTH=0ea3a=?LUun4w5Ej2ZRE?|f796SzY!78X8 zW)%%uKo8)7fn%{j3;B!lbm|UWgq5Z(9%P0>|w5l?>yux4|CO=TTLX} z8sCT)G2X$&AfCv9s)`T0-gj`lbmn0<^bXEhRvvbQaKk*xoUFhbs(|b>kgw3eG2p%I_ksDciH6c3xyrWQ ztHW;Mo!$rXPt^DStA5|#-Is6U3qkK>DE=n%9T)*+um+N}q8$u^Nw5U!A7lC+VGMx$ zh*uZe!eHC_$E|8InVo=B?rXp4)hC)HwZa|08Jr9y`y>v)L$VnV{y`!!CSd}eQjWx| zL{5cb%ZPSu>By$U9k}LQ{uxiQo)|5JMz}?GSah;WLNDCEKXF*XC_KI|F)=M+2A+SH zKO^?8O51>I)eH4>&$e{4;}Jca5p3v(wjB~0m!;mtN(*GA)JwIg{S_5?+`qF(yD|GxLbDg=6WAm zSd-0v1M(SyN5TG^)32=#);{B;&B)iDG?alq`_9KbE?`|bFDH-PGOW}dMOu}< zzq_}k$NwXn4cKV0?)KkKXpqnhx5une#5Iq&*zqD6z+kxvargf!S6)T-8?mg$M-~%-&S}%+zj^j#2eHTZKP%8Ydz5^+j^o$Huda1 zsbM{lbMGl|wp~!VgNw4mhFjewwCL8U$j2Hv7x7<|O%~t(@+m%>`EIr#XaiYL0MlRr zYyvvAikEr6{B90ryt@5v4sG0ydj#T^GF0W>?YbV}m^SlnH}nXHkL7ne_lVt6ez&VU z;@$o9>?3=J|GV$G_q-jxas)u%#)e5N0^54r)_afLC49v7zsI}r7ndX12KcnnefPZG zK49hl+3>`BSS5gNFbKv$87zYxV8w9+r#L%;zbAOrbd+D*&KdRUPfp_F4;1b|_6^*3 z@t%9nakn(*=bL?x%a0QN+Iw6Pwy#@^dTpIyl~!F?jeR64H_FK!SO=;1vcdzlNo@9` z9N#X$lobq<#~7!h!FsnMZ4O?Eq%Q{Pi7jc>l$m&MaJ4IwQ3XwKw``j|TO)RdoKpi5 zhv2b@!w3$a{BT@L&iA_PZ?OoOlfxpsCEKn=ugJFL=elfbUO3{af9vt1FTro?0^1@f z*|vo;vaQS}*;Zz2V86oev#?Oh+#Sgr>Q?c9^dWdcwspZs#2)*t$fJy9CCtKWvKL@0 z)W*s(wm%-Yp~wf({6AQ1E!dQg+4fq+j`DUBT+RD}R)*!6kLl4s8{g+$>32m7&h78> zBjT}?dwEzDVHH%5vEBh~pbzAM13fL(u?oBdHbCv8oLzuUFn#~QSPpie0<5c+;VqDS zKYpMS*b%B9wiYf>m*2vx$Tr4eZ{vM#YK#l*?Ac@N7~E(#V$XgQ;zs+UUaGD@#eODM zrMK8+B6U}B%=JF%ojExdrn9=_Nvb}UpT3h-xH{%09_0b5?J-xz*Djh{$-D(k$+n<= zf3Tp2s)~=g-uLr?`8gWk*T-ttzbeIB7p!;(Y`3>E*TQtJS_P}!y_i^hzn}7XDgFJF zPc_hq9$N1gNQPVX6~;$yKH!b!f8K`pUu}ectMjeXFW<>};se2Ab^}g3HVUYKb&&cX z)3W=>x%1 z>)5tLKEfNT1?JrOe%JdHKGdV1&2ZapQm`bvL%*|dUbdB+3+>1D_WlA|bj&;X6ycI= zMs;wKJ||%jUWp|7C+S-fs_BUYuwX5xe_badp$YDgZ6URO(4R|>^hq0lhd$_LcDQyf zX#$@5U~pd0J1cPkUXyJ*-Lh<(N5bZq9@^I3JMyVvv(y8>>$wnUi#e* zcm1cJ;zYm1L3kL^?!u(TB~HRKvh8yBG!FKm!sL>~Rd_>o*e6YKhJ?jX3%AL(+-cd? zmWGJk{Gs3&($ym|3+H9qjFF2thYjD~2~IvmxU`qo-%6P|35)QSY%5?zwneo5q2TD3 z2nRCUB-?y5_P{$YgugK?>UVxqKXhVx=VcFKuQs@IOfc*`!S^e# z9sUM=`^EGYhlF7zgoRoLa~hX!K4C9d4^K;>#E!&Y#%>)A&>~GnlYFPtmoxpm*KfRM}Eo+laJ$vVz7In{r zf7>yilS3XZ>^biS;?SZ&73EWcXTkoUeoa9wkhUpb3u;-m1+^yoaY5PW-BD1<4+pKO zhZ|)_d#VL38dSS{y5KC>AJjt%Do2`=uLYHtZ9x@eQ&015;TBX;3E>#9!e`OeK>Q;F z2>jLEhh5<#oU?3x*p)sKJU#J|;8C`Z@TDzQbN`hadV1vgj_4!T|L?pMUf%hyJU>@8 zTXdP<_U=wC6oW2YhBsx~thH9uGvJ(3{Wc$~| z99Rc6PbD4vAABt-|Ae1Qy8I}U%I|Pk1SPNzQokFl<2v9WFadA~+W*FJ z800_^EQ0FaV{QO_U<@pPn&0Pa;P+p|%!Of>(&vpq!&FdF7A}HCQ2kL3iNJO-o4tAn z$m}ef`yKzYCjLk83ep{1l+Cv#+z-Ct)t%ArIe0~OJzHc^Hs5vdKbDu=l2A?S62L05 zM1Osjku|g$~ND6_n}FzKGiO%3+|7&_D=eXpfh#SM&ZdwI`#OMev>m2=i#M2hoCPu zBy7WRHuK{;DlMS_ZjL1S-y`gl&;w`xo9fC-EWl3o?nWs|sK9fPM1P~KNLYur_9Y%k zFxV`z6rB0Jy|L0Ny#wwJ?Qk;>NEm`g_9fO&NSK0WWm~70W!s25`Z8|yg}>n)*)%A& z`Fp_iRN^>1Bijm?lx|GvM} zOfE@Vg*Wzm{Y`l!&Q4~L)WYd0zmxp$0X0i+gL`CK1)WoBLQY~Hb`gidR8VV4S_Pil zOZRI{tVmdgwHQD9OnyvB6L49! z9k`}sN8gZ~MT;K97UZ)GZ-D4Q%w9-6rGwZuY3V-*y2}n?aoHTi?u^yyNAzfEaW+V| zmkFC?M}zSfz0!N&oNUXR{R6+RgXLL42@WpGj#gGei?*sFpE-CLL|bKVA3j5^S|hFI z5BFNN8Rp~Ayc5{9k6YGTWXV4aE}S|Ld>}W9l!&B0?;ObJ)1JQC4XwiUE^2xw0;PO!( zgDuYSSON=E>(a02Vs|@<{c^U5yJXvHr&o5gBHObErSCs~7?nN_Pwvl~XUCmJj7B*l zr+IhCqsqS5wlhSFO&x%^cR1O-g8myCa!9WJkNc z4=oz-fP9AFQ4kH-#=$q$tK+22$k%#x@?+i`{He<#o>oFMV(Zp<>BJdZk{u1kcE1hj z+i>k41wCSU<9`&{{Th_e40p=5%GzW{3++LRwlFK796SQ{x9}IVNybPk%hy^s5!k`| z;8RM7w$Qf8taNMPg6wE8wt3d1Z^AWyyf@N!p1?mzdNla@KW3EKc5Wo04eXCTrsz9K z%K`JX=zC<_=E=(5AADZ=O$1+%y+8P3=v2a?@&pCVp+zHJl+Oyh38Dep9`F+ls2$Sk zr}qM`k!=AdWm~{kg@s#p^Y-wxy*;e-F1R=18@l$Rg|?ki4$5a3c3^)@f1#L)q|JrC zbYe-i#Z-|^Onax4Hc%I*gHy_NIc&kzAK%-|VIT>#(6*pb^2xw0V1H20)|PE2tzW+W zd?wq1>XrStpsb??KOO`%Du;1+a?g1;kZH7NP&4wGhgZPiM_42rF<4t zwRD2oyGr9vU`n`+@fKF<&tKA8;f}q`yFT4$p}+N9pL_=3VX!~Qr>N&fKk;l%kmPJ# zH!j2EG*oDocV;y|92k7T~higyzvCS+h}1v3o8EKgWjlxGhlyEHz}wl(z@kq zF}2FJm^x(tOwaWxVgK=INcspov6neECOf(}PoYHvF3V>YUINj8r%&>Cl5bGNt0czD zd)s+vkl%H3WdD4pJ ztOH*`wgu^AM=P=^yCgl_*!G#M4YZm+;}8S7z#w?RIR8z91+Wg{6{bD@#786iE-Kt6 zlYjk~yO91}!Qk;XKaFoh{~7lgc?iIWXYnc!4*@`Rla%G>1y7dm@Vn)c98JIs zh<}PT1;~LSur9PE*#drMFT1dOqo=C)%ZT!M&dh?m?Xy zlsF7e%N~U%fi->nldk(y-m^0EN?U@rWt-osY^!J^s3=vdpwn=(Y)fzWRB#sDDXj<2 z%BHN~EI2Qr0J~4=EVv}G0?#4Z>owP{@Z)h?D;GRLvV~sz=^%XW0e_mCzuap6G~b-# zUiOTaKHRTF?)T2{1m?u2UC)eHcSTw9?5ACR#=HK>8~ommKPi@+(Wv^gE2G;D;C$Hp&Wh`7N)Dx!?YbclvcTRNxD|w07^n;Mq66?ULP@_nk9g8ZX41 zyL9Os-z~rQ+#ApH#6ghW9;Wj`-KD_+KkwOldAR0Mkj^IwKFhbv$3EjaKg(mWGoNuo zpS4FpKjS7~`#$++*@Jiv$f(oZ{5d{Bcj|L|f{urQKIhe+aWu@2ja&HV@4I;EZR|8z z`-X?=FMrn2*6XWQKI_Im#{;lCpLMjg?nH{l`uVs`cF%?2lM{S0!fz8_Tc>DyW?&ZL zN!nRHiar%)2={t5(|T+!Orw$6^OyL3>Kh-(o_*7~OXq?{u6@oGXTA6NTl4>9Oa8pA z7~O)G-^8OipXZt=m;knGEW^n!czyogC+zv!8dJ zU*v7THEEl04Z&HVmcH|Of5(1Sy|hNSH7X#K_!oo5Hb}E0S@Rdk^t*?yZKXxNV-K8-WC{;=IkeEW zUd+qKv_e=&QDO2gM%4Y>$|DxY(b=7P>i#P#iWZS%+n)9PiwMy%N z`y%PxbHThmBy9v9n+rFk#4@}f+X|fx3Qep@v*0$#WL?r!qd}8|+hyCJtCwvpYmC?} zj|DC0mDUdrhv`%{_*l^YMDRtiS>qkdGaXh9dqWvZDc+&%{3c@(o-MLaUzlGO^S=2XD{?a=@2i8ri zUv?Ao-i^;m@Z0Y$w2SxObKk(l;4hkILY*l*(1SM>EH5uZ%yVRB0rnLyU6&6%Nx3C( z^=okRuInp2S5^trncHptmW%JRH1Ec~;=MGl&>t6hG~&yrShjwJ=@G1g+OIOTf*dG< zMPS`(+oYd#vj^cx**5xzBlc*-9{)#4RG`R z#7+r4aCU!UUP1wO`w|l+2^Dzmt6D~_NL+`v5dFVF$m4!r^HTZD*Mb%|!L72R3-k`O z=wR!XPaix8_MZrRQ|DB}q)p1#&Q?Zc+lj!qZ0gzj_P-6bX(dEYtZe|!OE;e|7~5Q{ z(l_AkJ)hu7huVdpWofuUcC=;9XklTt8@0)&6Yc~1TlUv#*#K!{^0k%?$+nh_$flmX z%TgBg#6obBpe%=3cwx_ZH;`qtXi#hN*@WX?|Jk6vqo8U@YX&xWEvU3?3#vi(&ji)> z_29Bpj~udaZqIo)kUUy6sDgYPJO%dm)c;UWWzv@AYeCJ*wxAYd6V%>iDeI{E)+!41S0n1V8WHFnce|{M!DUT^ekG)^D&{0ux{X?109_poeVibmC*Z)$`}iVL#Fj z+t;%ZI~TF@5xel`!LHR*l30P)W!sx-a}npoh`sXX{)CaKCK{_f0XNCEd@0!$Nah>C z{RM~V5$R*_gzV@ZH-#1*M`iiU!b@QPIC`@#Dy)(g|BJoBy`g+I zj<#h}&)!^OJz1*^(JzB$3pewZToXWWchGFL#Pd;0TtVWi?n_?!Y|j#- z>76|C503)#$in^_jE^gwe~`cY%0JUNIsT@Xsv2K%-QV<{Rkg6>3g7hVo>Tix#>(By zIdB&k1orj+33wiCfb_RG=LC6RMX?C~X7Iqi5i7TEaq`Wjvu|+`W$K$Q`z`Orqf6xT z!?>E2Gv9x7&-}J`?SXH)^0$J&%J?m=oN(IyZHV`6zwM13NSD9;ZEx^EzUw&abrAp9 z!Pqd|^pE^~^OO7qEbM8p05(9PE*{H((jOg+wZc7M5R8F&Fv*3MRd@%aQ}I|U=>7zM zX96AsqhJ!ufF+RpA)i1=#q&HsM!}$oYu0UWFBk%2U<%}B55^pr#a;z7RR?3q6ZnHp z&`Kr!@Guw$OJD=koTOaP0kU8Olz0tm9G(XAVD)4^&fn*Y$7<6Q2s%I?7y@Hp3e19K zunB5T#bfoL8FYhwFbp~?Jmm_nQGvsb^B3c%`8@|#z&1#5W|XlHn1b0qJ?MYTbSTe{ zanM7C7BENmmiRpn*1!%(ouNX|1qOlrVPE^R_Vy=%OB;Mogx~fj?)%^|V1MF%8eRtW zr|x%P`$NRd!2Z0w{b~CiZ2JSnPYwsQjl^ISmV5uk``d&6|G@bF_Q1&h?7(2+<<+a& zzhim=c~Al?AoKT}DuWSF1~vb{l_)R{mOy-+Hn;RgnHy8UXU31Xe)er~Gc^zX31-mO*ld%wQDEgLv$4tQlm119M;tG#xk` z>jPt80qlU5s>88CFbP&cy83Xe6BNK4*aA%l$p^;3?7_qN*d|8(lMctaz%ZBw8z6m% z%pea+UwB?O}6D~{=48*B+(-=3+FY zZ>~$+f>Z3fR@dwT4=%{I%a@72_fLhcYLeCpcetPaJ>PujlQaMi{k=jOlQ;oSA%5nM z4xMhAmAC-!$Zq;F7vUrJnry3dlZ@}ZIexk+$qZsq)x%w~En{QEZV7$J*!~Ye##Fz= zL3mVlH{a+P#^F>WZ+%TloQCHk4l_6$z2fkhBhohDZM54S%m8Pa3ep^0l5OoRhBg~FT>aWhWEBcNRpQd^q8wJ>bwumcOf}P` zg_D4rWZUpaMeNLXbtS4pVmI6;@%kZ&Bk+`Lt9MNH5{;YquH$jt`l}=@z{}rtqu=B1 z#HO?zILVZ3!L&1eYQ9IMA7j)tN^F7K5&6Q-=|r!@et0kxDbLS74o^ya){Mk?IL?%A z+FR=hSL_a{v@T;o8 zbMkCjk+=@0IGk84wrRJdn_Vs4-)}ZFgqtL`!UK_v9TB@*wq@)KGmc0cgJ&bo6A^n# zwq-0UV`5q28oY_!rioyDAl>wh4zMPfVLW#V(}(_j(@;ZfN(%7<~Vn^uWQiPP{* zm}^PmD!eV*2IB?}{-4vW<=AQgr0rNM+s0bMKT<5OS!OyV_P}}B&0k{Yk!_!_&f#o9 zCY;0~T#}fYleh@4%eGuAIQY+YS92)07!q*mhx`eH=J=WGrM1F+vaQ+<*;YU|zJ9es z5=Y=MiK!`xWq3ihZIIc}VNK#DT*J!2LNJG&z~Ri5(i-6w_x(-g)-FlCaQ`Ngcr%S2 zmN*KJBYx+8!k0D!ugbQGZeF&9zl5(nubu@zo?=XZd3h>8LN@50X+SVS}A+a0o zL$sw&YDnS;JR#ev8pGikx5ZDlmL<-@H7w_?t_AFH0bxhSW%;bZJF;!&*|b{t?0KqQ z85`kt+2+vlli&(?ue5%6@F!}-sKjx2QjRmy=HaD4JF_8e8?NQ#!XmUINqpCK>5m_( zOEl@Gepe&&d@PPhln@0OgzJX{FHqQnwhi5>pH9ebHqkk;|DB}b~7(?6>v z0cT{}*h(F+Jf{<_(mLSo1FCUA;t)I%IG&l1HU-bhw&s*&H+|V9UdFi4&oy|H^8DSX zhI38}A_+Ijwjk=O{2)^8(z@XONP2J8VfV35d1tPYHVThdIZj>Aq^70Kz)P|%p8256 zGaJ&j;abjbt$v#)w zQxePYti;r^#5H(Fwm*HxgVB=Yx`x$R54Xs+HFcwR*gf=i?@XPvUU*QpxTQTU<|WH zIW{D51Rj&k4!QF2L#b=^vkcGfB_%#_C{?GQYw(V28+)4+`}Ha&vm{rE{EmPdYl599 z)h@9M?hhTv)r*5oE_KpI;mI(a28@&LFBfJc&cjQHe*bSs+=gqp80A+>uK1Nfvm2x} z!);g6Y+JAPNX)`HL|eqB3KAV$l5MRj1|?Tqyi>&bs2j|U?FP>2)&31) #define S48_STOB_HEADER(x) (S48_STOB_REF((x),-1)) #define S48_STOB_ADDRESS(x) (&(S48_STOB_HEADER(x))) @@ -408,12 +408,12 @@ extern void s48_check_record_type(s48_value record, s48_value type_binding); #define S48_BYTE_VECTOR_REF(x, i) (s48_stob_byte_ref((x), S48_STOBTYPE_BYTE_VECTOR, (i))) #define S48_BYTE_VECTOR_SET(x, i, v) (s48_stob_byte_set((x), S48_STOBTYPE_BYTE_VECTOR, (i), (v))) #define S48_UNSAFE_BYTE_VECTOR_REF(x, i) (S48_STOB_BYTE_REF((x), (i))) -#define S48_UNSAFE_BYTE_VECTOR_SET(x, i, v) S48_BYTE_STOB_SET((x), (i), (v)) +#define S48_UNSAFE_BYTE_VECTOR_SET(x, i, v) S48_STOB_BYTE_SET((x), (i), (v)) #define S48_STRING_LENGTH(x) (s48_stob_byte_length((x), S48_STOBTYPE_STRING)) #define S48_STRING_REF(x, i) (s48_stob_byte_ref((x), S48_STOBTYPE_STRING, (i))) #define S48_STRING_SET(x, i, v) (s48_stob_byte_set((x), S48_STOBTYPE_STRING, (i), (v))) #define S48_UNSAFE_STRING_REF(x, i) (S48_STOB_BYTE_REF((x), (i))) -#define S48_UNSAFE_STRING_SET(x, i, v) S48_BYTE_STOB_SET((x), (i), (v)) +#define S48_UNSAFE_STRING_SET(x, i, v) S48_STOB_BYTE_SET((x), (i), (v)) #define S48_UNSAFE_BYTE_VECTOR_LENGTH(x) (S48_STOB_BYTE_LENGTH(x)) #define S48_UNSAFE_STRING_LENGTH(x) (S48_STOB_BYTE_LENGTH(x) - 1) #define S48_UNSAFE_EXTRACT_STRING(x) (S48_ADDRESS_AFTER_HEADER((x), char)) diff --git a/c/scheme48heap.c b/c/scheme48heap.c index 9870e16..642579c 100644 --- a/c/scheme48heap.c +++ b/c/scheme48heap.c @@ -83,14 +83,14 @@ static long copy_weak_pointer(long weak_1X, char * frontier_2X, char * *TT0) char * x_3X; { x_3X = Sweak_pointer_hpS; if ((x_3X == NULL)) { - goto L2423;} + goto L2424;} else { if (((Sweak_pointer_hpS) < (Sweak_pointer_limitS))) { arg0K0 = frontier_2X; - goto L2428;} + goto L2429;} else { - goto L2423;}}} - L2423: { + goto L2424;}}} + L2424: { old_4X = Sweak_pointer_hpS; new_frontier_5X = frontier_2X + 1024; Sweak_pointer_hpS = frontier_2X; @@ -98,8 +98,8 @@ static long copy_weak_pointer(long weak_1X, char * frontier_2X, char * *TT0) *((long *) (Sweak_pointer_hpS)) = 261190; *((long *) ((Sweak_pointer_hpS) + 8)) = (((long) old_4X)); arg0K0 = new_frontier_5X; - goto L2428;} - L2428: { + goto L2429;} + L2429: { frontier_6X = arg0K0; new_7X = 3 + (((long) ((Sweak_pointer_hpS) + 4))); *((long *) ((Sweak_pointer_hpS) + 4)) = (*((long *) (((char *) (-3 + weak_1X))))); @@ -130,14 +130,14 @@ static void clean_weak_pointers(void) end_9X = Sweak_pointer_hpS; arg0K0 = (x_8X + -1024); arg0K1 = end_9X; - goto L3994;}} - L3994: { + goto L3995;}} + L3995: { start_10X = arg0K0; end_11X = arg0K1; next_12X = ((char *) (*((long *) (start_10X + 8)))); arg0K0 = start_10X; - goto L2635;} - L2635: { + goto L2636;} + L2636: { scan_13X = arg0K0; if ((scan_13X < end_11X)) { *((long *) scan_13X) = 1074; @@ -145,23 +145,23 @@ static void clean_weak_pointers(void) if ((3 == (3 & value_14X))) { a_15X = ((char *) (-3 + value_14X)); if ((a_15X < (Sfrom_beginS))) { - goto L2681;} + goto L2682;} else { if ((a_15X < (Sfrom_endS))) { if ((3 == (3 & value_14X))) { h_16X = *((long *) ((((char *) (-3 + value_14X))) + -4)); if ((3 == (3 & h_16X))) { arg1K0 = h_16X; - goto L2676;} + goto L2677;} else { arg1K0 = 1; - goto L2676;}} + goto L2677;}} else { - goto L2681;}} + goto L2682;}} else { - goto L2681;}}} + goto L2682;}}} else { - goto L2681;}} + goto L2682;}} else { if ((next_12X == NULL)) { if ((end_9X < (Sweak_pointer_limitS))) { @@ -172,14 +172,14 @@ static void clean_weak_pointers(void) else { arg0K0 = (next_12X + -1024); arg0K1 = next_12X; - goto L3994;}}} - L2681: { + goto L3995;}}} + L2682: { arg0K0 = (scan_13X + 8); - goto L2635;} - L2676: { + goto L2636;} + L2677: { x2_17X = arg1K0; *((long *) (scan_13X + 4)) = x2_17X; - goto L2681;} + goto L2682;} } static char gc_recordP(long x_18X) { @@ -221,8 +221,8 @@ static void note_undumpableB(long thing_20X) else { list_21X = Sundumpable_recordsS; arg1K0 = list_21X; - goto L6367;}} - L6367: { + goto L6368;}} + L6368: { list_22X = arg1K0; if ((25 == list_22X)) { Sundumpable_countS = (1 + (Sundumpable_countS)); @@ -248,16 +248,16 @@ static void note_undumpableB(long thing_20X) *((long *) (((char *) (-3 + x_30X)))) = thing_20X; *((long *) ((((char *) (-3 + x_30X))) + 4)) = b_28X; Sundumpable_recordsS = x_30X; - goto L6289;} + goto L6290;} else { - goto L6289;}} + goto L6290;}} else { if (((*((long *) (((char *) (-3 + list_22X))))) == thing_20X)) { return;} else { arg1K0 = (*((long *) ((((char *) (-3 + list_22X))) + 4))); - goto L6367;}}} - L6289: { + goto L6368;}}} + L6290: { temp_31X = s48_SlimitS; s48_SlimitS = (Soldspace_limitS); Soldspace_limitS = temp_31X; @@ -491,9 +491,9 @@ long s48_check_image_header(char *filename_61X) SstatusS = NO_ERRORS; SeofPS = 0; if ((SeofPS)) { - goto L2893;} + goto L2894;} else { - goto L3626;}} + goto L3627;}} else { ps_write_string("Can't open heap image file", (stderr)); { long ignoreXX; @@ -502,301 +502,301 @@ long s48_check_image_header(char *filename_61X) { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } return -1;}} - L2893: { + L2894: { if ((SeofPS)) { - goto L2926;} + goto L2927;} else { - goto L3590;}} - L3626: { + goto L3591;}} + L3627: { PS_READ_CHAR(port_62X, ch_64X, eofP_65X, status_66X) if (eofP_65X) { arg2K0 = eofP_65X; arg1K1 = status_66X; - goto L2871;} + goto L2872;} else { if ((status_66X == NO_ERRORS)) { if ((12 == ch_64X)) { arg2K0 = 0; arg1K1 = status_66X; - goto L2871;} + goto L2872;} else { - goto L3626;}} + goto L3627;}} else { arg2K0 = eofP_65X; arg1K1 = status_66X; - goto L2871;}}} - L2926: { + goto L2872;}}} + L2927: { if ((SeofPS)) { arg2K0 = 0; - goto L2959;} + goto L2960;} else { arg1K0 = 0; - goto L3566;}} - L3590: { + goto L3567;}} + L3591: { PS_READ_CHAR(port_62X, ch_67X, eofP_68X, status_69X) if (eofP_68X) { arg2K0 = eofP_68X; arg1K1 = status_69X; - goto L2904;} + goto L2905;} else { if ((status_69X == NO_ERRORS)) { if ((10 == ch_67X)) { arg2K0 = 0; arg1K1 = status_69X; - goto L2904;} + goto L2905;} else { - goto L3590;}} + goto L3591;}} else { arg2K0 = eofP_68X; arg1K1 = status_69X; - goto L2904;}}} - L2871: { + goto L2905;}}} + L2872: { eofP_70X = arg2K0; status_71X = arg1K1; if (eofP_70X) { SeofPS = 1; - goto L2893;} + goto L2894;} else { if (((SstatusS) == NO_ERRORS)) { - goto L2893;} + goto L2894;} else { SeofPS = 1; SstatusS = status_71X; - goto L2893;}}} - L2959: { + goto L2894;}}} + L2960: { same_versionP_72X = arg2K0; if ((SeofPS)) { arg1K0 = -1; - goto L2994;} + goto L2995;} else { PS_READ_INTEGER(port_62X, thing_73X, eofP_74X, status_75X) if (eofP_74X) { SeofPS = 1; arg1K0 = -1; - goto L2994;} + goto L2995;} else { if (((SstatusS) == NO_ERRORS)) { arg1K0 = thing_73X; - goto L2994;} + goto L2995;} else { SeofPS = 1; SstatusS = status_75X; arg1K0 = -1; - goto L2994;}}}} - L3566: { + goto L2995;}}}} + L3567: { i_76X = arg1K0; PS_READ_CHAR(port_62X, ch_77X, eofP_78X, status_79X) if (eofP_78X) { arg2K0 = 0; arg2K1 = eofP_78X; arg1K2 = status_79X; - goto L2937;} + goto L2938;} else { if ((status_79X == NO_ERRORS)) { if ((i_76X == (strlen((char *) "Vanilla 20")))) { arg2K0 = (10 == ch_77X); arg2K1 = 0; arg1K2 = status_79X; - goto L2937;} + goto L2938;} else { if ((ch_77X == (*("Vanilla 20" + i_76X)))) { arg1K0 = (1 + i_76X); - goto L3566;} + goto L3567;} else { arg2K0 = 0; arg2K1 = 0; arg1K2 = status_79X; - goto L2937;}}} + goto L2938;}}} else { arg2K0 = 0; arg2K1 = eofP_78X; arg1K2 = status_79X; - goto L2937;}}} - L2904: { + goto L2938;}}} + L2905: { eofP_80X = arg2K0; status_81X = arg1K1; if (eofP_80X) { SeofPS = 1; - goto L2926;} + goto L2927;} else { if (((SstatusS) == NO_ERRORS)) { - goto L2926;} + goto L2927;} else { SeofPS = 1; SstatusS = status_81X; - goto L2926;}}} - L2994: { + goto L2927;}}} + L2995: { old_bytes_per_cell_82X = arg1K0; if ((SeofPS)) { arg1K0 = -1; - goto L3029;} + goto L3030;} else { PS_READ_INTEGER(port_62X, thing_83X, eofP_84X, status_85X) if (eofP_84X) { SeofPS = 1; arg1K0 = -1; - goto L3029;} + goto L3030;} else { if (((SstatusS) == NO_ERRORS)) { arg1K0 = thing_83X; - goto L3029;} + goto L3030;} else { SeofPS = 1; SstatusS = status_85X; arg1K0 = -1; - goto L3029;}}}} - L2937: { + goto L3030;}}}} + L2938: { thing_86X = arg2K0; eofP_87X = arg2K1; status_88X = arg1K2; if (eofP_87X) { SeofPS = 1; arg2K0 = 0; - goto L2959;} + goto L2960;} else { if (((SstatusS) == NO_ERRORS)) { arg2K0 = thing_86X; - goto L2959;} + goto L2960;} else { SeofPS = 1; SstatusS = status_88X; arg2K0 = 0; - goto L2959;}}} - L3029: { + goto L2960;}}} + L3030: { cells_89X = arg1K0; Sold_beginS = (((char *) (((cells_89X)<<2)))); if ((SeofPS)) { arg1K0 = -1; - goto L3067;} + goto L3068;} else { PS_READ_INTEGER(port_62X, thing_90X, eofP_91X, status_92X) if (eofP_91X) { SeofPS = 1; arg1K0 = -1; - goto L3067;} + goto L3068;} else { if (((SstatusS) == NO_ERRORS)) { arg1K0 = thing_90X; - goto L3067;} + goto L3068;} else { SeofPS = 1; SstatusS = status_92X; arg1K0 = -1; - goto L3067;}}}} - L3067: { + goto L3068;}}}} + L3068: { cells_93X = arg1K0; Sold_hpS = (((char *) (((cells_93X)<<2)))); if ((SeofPS)) { arg1K0 = -1; - goto L3105;} + goto L3106;} else { PS_READ_INTEGER(port_62X, thing_94X, eofP_95X, status_96X) if (eofP_95X) { SeofPS = 1; arg1K0 = -1; - goto L3105;} + goto L3106;} else { if (((SstatusS) == NO_ERRORS)) { arg1K0 = thing_94X; - goto L3105;} + goto L3106;} else { SeofPS = 1; SstatusS = status_96X; arg1K0 = -1; - goto L3105;}}}} - L3105: { + goto L3106;}}}} + L3106: { v_97X = arg1K0; SsymbolsS = v_97X; if ((SeofPS)) { arg1K0 = -1; - goto L3141;} + goto L3142;} else { PS_READ_INTEGER(port_62X, thing_98X, eofP_99X, status_100X) if (eofP_99X) { SeofPS = 1; arg1K0 = -1; - goto L3141;} + goto L3142;} else { if (((SstatusS) == NO_ERRORS)) { arg1K0 = thing_98X; - goto L3141;} + goto L3142;} else { SeofPS = 1; SstatusS = status_100X; arg1K0 = -1; - goto L3141;}}}} - L3141: { + goto L3142;}}}} + L3142: { v_101X = arg1K0; Simported_bindingsS = v_101X; if ((SeofPS)) { arg1K0 = -1; - goto L3177;} + goto L3178;} else { PS_READ_INTEGER(port_62X, thing_102X, eofP_103X, status_104X) if (eofP_103X) { SeofPS = 1; arg1K0 = -1; - goto L3177;} + goto L3178;} else { if (((SstatusS) == NO_ERRORS)) { arg1K0 = thing_102X; - goto L3177;} + goto L3178;} else { SeofPS = 1; SstatusS = status_104X; arg1K0 = -1; - goto L3177;}}}} - L3177: { + goto L3178;}}}} + L3178: { v_105X = arg1K0; Sexported_bindingsS = v_105X; if ((SeofPS)) { arg1K0 = -1; - goto L3213;} + goto L3214;} else { PS_READ_INTEGER(port_62X, thing_106X, eofP_107X, status_108X) if (eofP_107X) { SeofPS = 1; arg1K0 = -1; - goto L3213;} + goto L3214;} else { if (((SstatusS) == NO_ERRORS)) { arg1K0 = thing_106X; - goto L3213;} + goto L3214;} else { SeofPS = 1; SstatusS = status_108X; arg1K0 = -1; - goto L3213;}}}} - L3213: { + goto L3214;}}}} + L3214: { v_109X = arg1K0; Sresumer_recordsS = v_109X; if ((SeofPS)) { arg1K0 = -1; - goto L3249;} + goto L3250;} else { PS_READ_INTEGER(port_62X, thing_110X, eofP_111X, status_112X) if (eofP_111X) { SeofPS = 1; arg1K0 = -1; - goto L3249;} + goto L3250;} else { if (((SstatusS) == NO_ERRORS)) { arg1K0 = thing_110X; - goto L3249;} + goto L3250;} else { SeofPS = 1; SstatusS = status_112X; arg1K0 = -1; - goto L3249;}}}} - L3249: { + goto L3250;}}}} + L3250: { v_113X = arg1K0; Sstartup_procedureS = v_113X; Simage_portS = port_62X; if ((SeofPS)) { - goto L3288;} + goto L3289;} else { - goto L3497;}} - L3288: { + goto L3498;}} + L3289: { if (((SstatusS) == NO_ERRORS)) { if ((SeofPS)) { SstatusS = EDOM; @@ -804,12 +804,12 @@ long s48_check_image_header(char *filename_61X) { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } if (((SstatusS) == NO_ERRORS)) { - goto L3369;} + goto L3370;} else { ps_write_string((ps_error_string((SstatusS))), (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } - goto L3369;}} + goto L3370;}} else { if (same_versionP_72X) { if ((4 == old_bytes_per_cell_82X)) { @@ -819,53 +819,53 @@ long s48_check_image_header(char *filename_61X) { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } if (((SstatusS) == NO_ERRORS)) { - goto L3429;} + goto L3430;} else { ps_write_string((ps_error_string((SstatusS))), (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } - goto L3429;}}} + goto L3430;}}} else { ps_write_string("Format of image is incompatible with this version of system", (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } if (((SstatusS) == NO_ERRORS)) { - goto L3399;} + goto L3400;} else { ps_write_string((ps_error_string((SstatusS))), (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } - goto L3399;}}}} + goto L3400;}}}} else { ps_write_string("Error reading from image file", (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } if (((SstatusS) == NO_ERRORS)) { - goto L3344;} + goto L3345;} else { ps_write_string((ps_error_string((SstatusS))), (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } - goto L3344;}}} - L3497: { + goto L3345;}}} + L3498: { PS_READ_CHAR(port_62X, ch_114X, eofP_115X, status_116X) if (eofP_115X) { arg2K0 = eofP_115X; arg1K1 = status_116X; - goto L3266;} + goto L3267;} else { if ((status_116X == NO_ERRORS)) { if ((12 == ch_114X)) { arg2K0 = 0; arg1K1 = status_116X; - goto L3266;} + goto L3267;} else { - goto L3497;}} + goto L3498;}} else { arg2K0 = eofP_115X; arg1K1 = status_116X; - goto L3266;}}} - L3369: { + goto L3267;}}} + L3370: { status_117X = ps_close(port_62X); if ((status_117X == NO_ERRORS)) { return -1;} @@ -874,7 +874,7 @@ long s48_check_image_header(char *filename_61X) { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } return -1;}} - L3429: { + L3430: { status_118X = ps_close(port_62X); if ((status_118X == NO_ERRORS)) { return -1;} @@ -883,7 +883,7 @@ long s48_check_image_header(char *filename_61X) { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } return -1;}} - L3399: { + L3400: { status_119X = ps_close(port_62X); if ((status_119X == NO_ERRORS)) { return -1;} @@ -892,7 +892,7 @@ long s48_check_image_header(char *filename_61X) { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } return -1;}} - L3344: { + L3345: { status_120X = ps_close(port_62X); if ((status_120X == NO_ERRORS)) { return -1;} @@ -901,19 +901,19 @@ long s48_check_image_header(char *filename_61X) { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } return -1;}} - L3266: { + L3267: { eofP_121X = arg2K0; status_122X = arg1K1; if (eofP_121X) { SeofPS = 1; - goto L3288;} + goto L3289;} else { if (((SstatusS) == NO_ERRORS)) { - goto L3288;} + goto L3289;} else { SeofPS = 1; SstatusS = status_122X; - goto L3288;}}} + goto L3289;}}} } long s48_find_all(long type_123X) { @@ -958,12 +958,12 @@ long s48_find_all(long type_123X) sizes_130X = Simpure_sizesS; count_131X = Simpure_area_countS; arg1K0 = 0; - goto L5577;} + goto L5578;} else { - goto L5517;}} + goto L5518;}} else { - goto L5535;}} - L5577: { + goto L5536;}} + L5578: { i_132X = arg1K0; if ((i_132X < count_131X)) { merged_arg0K0 = (*(areas_129X + i_132X)); @@ -974,24 +974,24 @@ long s48_find_all(long type_123X) v_133X = Hproc9231240_return_value; if (v_133X) { arg1K0 = (1 + i_132X); - goto L5577;} + goto L5578;} else { - goto L5535;}} + goto L5536;}} else { - goto L5517;}} - L5517: { + goto L5518;}} + L5518: { if ((0 < (Spure_area_countS))) { areas_134X = Spure_areasS; sizes_135X = Spure_sizesS; count_136X = Spure_area_countS; arg1K0 = 0; - goto L5598;} + goto L5599;} else { - goto L5524;}} - L5535: { + goto L5525;}} + L5536: { s48_ShpS = start_hp_127X; return 1;} - L5598: { + L5599: { i_137X = arg1K0; if ((i_137X < count_136X)) { merged_arg0K0 = (*(areas_134X + i_137X)); @@ -1002,12 +1002,12 @@ long s48_find_all(long type_123X) v_138X = Hproc9231240_return_value; if (v_138X) { arg1K0 = (1 + i_137X); - goto L5598;} + goto L5599;} else { - goto L5535;}} + goto L5536;}} else { - goto L5524;}} - L5524: { + goto L5525;}} + L5525: { *((long *) start_hp_127X) = (10 + (((((s48_ShpS) - (start_hp_127X + 4)))<<8))); return (3 + (((long) (start_hp_127X + 4))));} Hproc923124: { @@ -1015,8 +1015,8 @@ long s48_find_all(long type_123X) end_126X = merged_arg0K1;{ type_139X = Sfinding_typeS; arg0K0 = start_125X; - goto L4503;} - L4503: { + goto L4504;} + L4504: { addr_140X = arg0K0; if ((addr_140X < end_126X)) { d_141X = *((long *) addr_140X); @@ -1027,13 +1027,13 @@ long s48_find_all(long type_123X) *((long *) (s48_ShpS)) = (3 + (((long) (addr_140X + 4)))); s48_ShpS = ((s48_ShpS) + 4); arg0K0 = next_142X; - goto L4503;} + goto L4504;} else { Hproc9231240_return_value = 0; goto Hproc923124_return;}} else { arg0K0 = next_142X; - goto L4503;}} + goto L4504;}} else { ps_write_string("heap is in an inconsistent state.", (stderr)); Hproc9231240_return_value = 0; @@ -1113,29 +1113,29 @@ long s48_read_image(void) if (eofP_145X) { arg2K0 = 0; arg3K1 = "Premature EOF when reading image file"; - goto L6079;} + goto L6080;} else { if ((got_144X < 4)) { arg2K0 = 0; arg3K1 = "Read returned too few bytes"; - goto L6079;} + goto L6080;} else { arg2K0 = 1; arg3K1 = ""; - goto L6079;}}} + goto L6080;}}} else { SstatusS = status_146X; arg2K0 = 0; arg3K1 = "Error reading from image file"; - goto L6079;}} - L6079: { + goto L6080;}} + L6080: { okayP_147X = arg2K0; string_148X = arg3K1; if (okayP_147X) { if ((1 == (*((long *) (s48_ShpS))))) { arg4K0 = port_143X; arg2K1 = 0; - goto L5092;} + goto L5093;} else { addr_149X = s48_ShpS; x_150X = *((unsigned char *) addr_149X); @@ -1147,30 +1147,30 @@ long s48_read_image(void) if ((1 == (*((long *) (s48_ShpS))))) { arg4K0 = port_143X; arg2K1 = 1; - goto L5092;} + goto L5093;} else { ps_write_string("Unable to correct byte order", (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } if (((SstatusS) == NO_ERRORS)) { - goto L6187;} + goto L6188;} else { ps_write_string((ps_error_string((SstatusS))), (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } - goto L6187;}}}} + goto L6188;}}}} else { ps_write_string(string_148X, (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } if (((SstatusS) == NO_ERRORS)) { - goto L6135;} + goto L6136;} else { ps_write_string((ps_error_string((SstatusS))), (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } - goto L6135;}}} - L5092: { + goto L6136;}}} + L5093: { port_152X = arg4K0; reverseP_153X = arg2K1; delta_154X = (s48_ShpS) - (Sold_beginS); @@ -1184,33 +1184,33 @@ long s48_read_image(void) if (eofP_160X) { arg2K0 = 0; arg3K1 = "Premature EOF when reading image file"; - goto L5114;} + goto L5115;} else { if ((got_159X < need_158X)) { arg2K0 = 0; arg3K1 = "Read returned too few bytes"; - goto L5114;} + goto L5115;} else { arg2K0 = 1; arg3K1 = ""; - goto L5114;}}} + goto L5115;}}} else { SstatusS = status_161X; arg2K0 = 0; arg3K1 = "Error reading from image file"; - goto L5114;}} + goto L5115;}} else { ps_write_string("Heap not big enough to restore this image", (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } if (((SstatusS) == NO_ERRORS)) { - goto L5210;} + goto L5211;} else { ps_write_string((ps_error_string((SstatusS))), (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } - goto L5210;}}} - L6187: { + goto L5211;}}} + L6188: { status_162X = ps_close(port_143X); if ((status_162X == NO_ERRORS)) { return -1;} @@ -1219,7 +1219,7 @@ long s48_read_image(void) { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } return -1;}} - L6135: { + L6136: { status_163X = ps_close(port_143X); if ((status_163X == NO_ERRORS)) { return -1;} @@ -1228,7 +1228,7 @@ long s48_read_image(void) { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } return -1;}} - L5114: { + L5115: { okayP_164X = arg2K0; string_165X = arg3K1; PS_READ_CHAR(port_152X, v_166X, eofP_167X, status_168X) @@ -1242,54 +1242,54 @@ long s48_read_image(void) { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } arg0K0 = start_157X; - goto L4309;} + goto L4310;} else { - goto L5152;}} + goto L5153;}} else { ps_write_string("Error closing image file", (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } if (((SstatusS) == NO_ERRORS)) { - goto L5345;} + goto L5346;} else { ps_write_string((ps_error_string((SstatusS))), (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } - goto L5345;}}} + goto L5346;}}} else { ps_write_string("Image file has extraneous data after image", (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } if (((SstatusS) == NO_ERRORS)) { - goto L5315;} + goto L5316;} else { ps_write_string((ps_error_string((SstatusS))), (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } - goto L5315;}}} + goto L5316;}}} else { ps_write_string("Error reading from image file", (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } if (((SstatusS) == NO_ERRORS)) { - goto L5285;} + goto L5286;} else { ps_write_string((ps_error_string((SstatusS))), (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } - goto L5285;}}} + goto L5286;}}} else { ps_write_string(string_165X, (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } if (((SstatusS) == NO_ERRORS)) { - goto L5255;} + goto L5256;} else { ps_write_string((ps_error_string((SstatusS))), (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } - goto L5255;}}} - L5210: { + goto L5256;}}} + L5211: { status_170X = ps_close(port_152X); if ((status_170X == NO_ERRORS)) { return -1;} @@ -1298,7 +1298,7 @@ long s48_read_image(void) { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } return -1;}} - L4309: { + L4310: { ptr_171X = arg0K0; if ((ptr_171X < new_hp_155X)) { x_172X = *((unsigned char *) ptr_171X); @@ -1312,22 +1312,22 @@ long s48_read_image(void) if ((2 == (3 & value_174X))) { if (((31 & (((value_174X)>>2))) < 16)) { arg0K0 = next_175X; - goto L4309;} + goto L4310;} else { arg0K0 = (next_175X + (-4 & (3 + ((long)(((unsigned long)value_174X)>>8))))); - goto L4309;}} + goto L4310;}} else { arg0K0 = next_175X; - goto L4309;}} + goto L4310;}} else { - goto L5152;}} - L5152: { + goto L5153;}} + L5153: { if ((0 == delta_154X)) { - goto L5162;} + goto L5163;} else { arg0K0 = start_157X; - goto L4408;}} - L5345: { + goto L4409;}} + L5346: { status_176X = ps_close(port_152X); if ((status_176X == NO_ERRORS)) { return -1;} @@ -1336,7 +1336,7 @@ long s48_read_image(void) { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } return -1;}} - L5315: { + L5316: { status_177X = ps_close(port_152X); if ((status_177X == NO_ERRORS)) { return -1;} @@ -1345,7 +1345,7 @@ long s48_read_image(void) { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } return -1;}} - L5285: { + L5286: { status_178X = ps_close(port_152X); if ((status_178X == NO_ERRORS)) { return -1;} @@ -1354,7 +1354,7 @@ long s48_read_image(void) { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } return -1;}} - L5255: { + L5256: { status_179X = ps_close(port_152X); if ((status_179X == NO_ERRORS)) { return -1;} @@ -1363,82 +1363,82 @@ long s48_read_image(void) { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } return -1;}} - L5162: { + L5163: { s48_ShpS = new_hp_155X; descriptor_180X = Sstartup_procedureS; if ((3 == (3 & descriptor_180X))) { arg1K0 = (3 + (((long) ((((char *) (-3 + descriptor_180X))) + delta_154X)))); - goto L5166;} + goto L5167;} else { arg1K0 = descriptor_180X; - goto L5166;}} - L4408: { + goto L5167;}} + L4409: { ptr_181X = arg0K0; if ((ptr_181X < new_hp_155X)) { descriptor_182X = *((long *) ptr_181X); if ((3 == (3 & descriptor_182X))) { arg1K0 = (3 + (((long) ((((char *) (-3 + descriptor_182X))) + delta_154X)))); - goto L4413;} + goto L4414;} else { arg1K0 = descriptor_182X; - goto L4413;}} + goto L4414;}} else { - goto L5162;}} - L5166: { + goto L5163;}} + L5167: { v_183X = arg1K0; Sstartup_procedureS = v_183X; descriptor_184X = SsymbolsS; if ((3 == (3 & descriptor_184X))) { arg1K0 = (3 + (((long) ((((char *) (-3 + descriptor_184X))) + delta_154X)))); - goto L5171;} + goto L5172;} else { arg1K0 = descriptor_184X; - goto L5171;}} - L4413: { + goto L5172;}} + L4414: { d_185X = arg1K0; *((long *) ptr_181X) = d_185X; if ((2 == (3 & d_185X))) { if (((31 & (((d_185X)>>2))) < 16)) { - goto L4427;} + goto L4428;} else { arg0K0 = (ptr_181X + (4 + (-4 & (3 + ((long)(((unsigned long)d_185X)>>8)))))); - goto L4408;}} + goto L4409;}} else { - goto L4427;}} - L5171: { + goto L4428;}} + L5172: { v_186X = arg1K0; SsymbolsS = v_186X; descriptor_187X = Simported_bindingsS; if ((3 == (3 & descriptor_187X))) { arg1K0 = (3 + (((long) ((((char *) (-3 + descriptor_187X))) + delta_154X)))); - goto L5176;} + goto L5177;} else { arg1K0 = descriptor_187X; - goto L5176;}} - L4427: { + goto L5177;}} + L4428: { arg0K0 = (ptr_181X + 4); - goto L4408;} - L5176: { + goto L4409;} + L5177: { v_188X = arg1K0; Simported_bindingsS = v_188X; descriptor_189X = Sexported_bindingsS; if ((3 == (3 & descriptor_189X))) { arg1K0 = (3 + (((long) ((((char *) (-3 + descriptor_189X))) + delta_154X)))); - goto L5181;} + goto L5182;} else { arg1K0 = descriptor_189X; - goto L5181;}} - L5181: { + goto L5182;}} + L5182: { v_190X = arg1K0; Sexported_bindingsS = v_190X; descriptor_191X = Sresumer_recordsS; if ((3 == (3 & descriptor_191X))) { arg1K0 = (3 + (((long) ((((char *) (-3 + descriptor_191X))) + delta_154X)))); - goto L5186;} + goto L5187;} else { arg1K0 = descriptor_191X; - goto L5186;}} - L5186: { + goto L5187;}} + L5187: { v_192X = arg1K0; Sresumer_recordsS = v_192X; return 0;} @@ -1488,12 +1488,12 @@ long s48_find_all_records(long record_type_193X) sizes_200X = Simpure_sizesS; count_201X = Simpure_area_countS; arg1K0 = 0; - goto L5742;} + goto L5743;} else { - goto L5682;}} + goto L5683;}} else { - goto L5700;}} - L5742: { + goto L5701;}} + L5743: { i_202X = arg1K0; if ((i_202X < count_201X)) { merged_arg0K0 = (*(areas_199X + i_202X)); @@ -1504,24 +1504,24 @@ long s48_find_all_records(long record_type_193X) v_203X = Hproc9691940_return_value; if (v_203X) { arg1K0 = (1 + i_202X); - goto L5742;} + goto L5743;} else { - goto L5700;}} + goto L5701;}} else { - goto L5682;}} - L5682: { + goto L5683;}} + L5683: { if ((0 < (Spure_area_countS))) { areas_204X = Spure_areasS; sizes_205X = Spure_sizesS; count_206X = Spure_area_countS; arg1K0 = 0; - goto L5763;} + goto L5764;} else { - goto L5689;}} - L5700: { + goto L5690;}} + L5701: { s48_ShpS = start_hp_197X; return 1;} - L5763: { + L5764: { i_207X = arg1K0; if ((i_207X < count_206X)) { merged_arg0K0 = (*(areas_204X + i_207X)); @@ -1532,12 +1532,12 @@ long s48_find_all_records(long record_type_193X) v_208X = Hproc9691940_return_value; if (v_208X) { arg1K0 = (1 + i_207X); - goto L5763;} + goto L5764;} else { - goto L5700;}} + goto L5701;}} else { - goto L5689;}} - L5689: { + goto L5690;}} + L5690: { *((long *) start_hp_197X) = (10 + (((((s48_ShpS) - (start_hp_197X + 4)))<<8))); return (3 + (((long) (start_hp_197X + 4))));} Hproc969194: { @@ -1545,8 +1545,8 @@ long s48_find_all_records(long record_type_193X) end_196X = merged_arg0K1;{ type_209X = Sfinding_typeS; arg0K0 = start_195X; - goto L4670;} - L4670: { + goto L4671;} + L4671: { addr_210X = arg0K0; if ((addr_210X < end_196X)) { d_211X = *((long *) addr_210X); @@ -1559,16 +1559,16 @@ long s48_find_all_records(long record_type_193X) *((long *) (s48_ShpS)) = obj_213X; s48_ShpS = ((s48_ShpS) + 4); arg0K0 = next_212X; - goto L4670;} + goto L4671;} else { Hproc9691940_return_value = 0; goto Hproc969194_return;}} else { arg0K0 = next_212X; - goto L4670;}} + goto L4671;}} else { arg0K0 = next_212X; - goto L4670;}} + goto L4671;}} else { ps_write_string("heap is in an inconsistent state.", (stderr)); Hproc9691940_return_value = 0; @@ -1608,8 +1608,8 @@ long s48_trace_locationsB(char * start_214X, char * end_215X) char * addr_216X; { arg0K0 = start_214X; arg0K1 = (s48_ShpS); - goto L6441;} - L6441: { + goto L6442;} + L6442: { addr_216X = arg0K0; frontier_217X = arg0K1; if ((addr_216X < end_215X)) { @@ -1620,15 +1620,15 @@ long s48_trace_locationsB(char * start_214X, char * end_215X) if (((31 & (((thing_218X)>>2))) < 16)) { arg0K0 = next_219X; arg0K1 = frontier_217X; - goto L6441;} + goto L6442;} else { arg0K0 = (next_219X + (-4 & (3 + ((long)(((unsigned long)thing_218X)>>8))))); arg0K1 = frontier_217X; - goto L6441;}} + goto L6442;}} else { arg0K0 = next_219X; arg0K1 = frontier_217X; - goto L6441;}} + goto L6442;}} else { if ((Swriting_imagePS)) { v_220X = gc_recordP(thing_218X); @@ -1641,67 +1641,67 @@ long s48_trace_locationsB(char * start_214X, char * end_215X) *((long *) addr_216X) = (*((long *) ((((char *) (-3 + thing_218X))) + 4))); arg0K0 = addr_216X; arg0K1 = frontier_217X; - goto L6441;} + goto L6442;} else { - goto L6475;}} + goto L6476;}} else { - goto L6475;}} + goto L6476;}} else { - goto L6475;}} + goto L6476;}} else { - goto L6475;}}} + goto L6476;}}} else { s48_ShpS = frontier_217X; return 0;}} - L6475: { + L6476: { if ((3 == (3 & thing_218X))) { a_223X = ((char *) (-3 + thing_218X)); if ((a_223X < (Sfrom_beginS))) { arg0K0 = next_219X; arg0K1 = frontier_217X; - goto L6441;} + goto L6442;} else { if ((a_223X < (Sfrom_endS))) { h_224X = *((long *) ((((char *) (-3 + thing_218X))) + -4)); if ((3 == (3 & h_224X))) { arg1K0 = h_224X; arg0K1 = frontier_217X; - goto L6482;} + goto L6483;} else { if ((1074 == h_224X)) { descriptor_225X = *((long *) (((char *) (-3 + thing_218X)))); if ((3 == (3 & descriptor_225X))) { a_226X = ((char *) (-3 + descriptor_225X)); if ((a_226X < (Sfrom_beginS))) { - goto L7062;} + goto L7063;} else { if ((a_226X < (Sfrom_endS))) { new_thing_227X = copy_weak_pointer(thing_218X, frontier_217X, &frontier_228X); arg1K0 = new_thing_227X; arg0K1 = frontier_228X; - goto L6482;} + goto L6483;} else { - goto L7062;}}} + goto L7063;}}} else { - goto L7062;}} + goto L7063;}} else { - goto L7062;}}} + goto L7063;}}} else { arg0K0 = next_219X; arg0K1 = frontier_217X; - goto L6441;}}} + goto L6442;}}} else { arg0K0 = next_219X; arg0K1 = frontier_217X; - goto L6441;}} - L6482: { + goto L6442;}} + L6483: { new_thing_229X = arg1K0; frontier_230X = arg0K1; *((long *) addr_216X) = new_thing_229X; arg0K0 = next_219X; arg0K1 = frontier_230X; - goto L6441;} - L7062: { + goto L6442;} + L7063: { *((long *) frontier_217X) = h_224X; data_addr_231X = frontier_217X + 4; new_232X = 3 + (((long) data_addr_231X)); @@ -1709,7 +1709,7 @@ long s48_trace_locationsB(char * start_214X, char * end_215X) memcpy((void *)data_addr_231X, (void *)(((char *) (-3 + thing_218X))),((long)(((unsigned long)h_224X)>>8))); arg1K0 = new_232X; arg0K1 = (data_addr_231X + (-4 & (3 + ((long)(((unsigned long)h_224X)>>8))))); - goto L6482;} + goto L6483;} } void s48_do_gc(void) { @@ -1717,8 +1717,8 @@ void s48_do_gc(void) char * end_234X; char * start_233X; { arg0K0 = (Snewspace_beginS); - goto L6697;} - L6697: { + goto L6698;} + L6698: { start_233X = arg0K0; end_234X = s48_ShpS; s48_trace_locationsB(start_233X, end_234X); @@ -1728,7 +1728,7 @@ void s48_do_gc(void) else { if ((end_234X < (s48_ShpS))) { arg0K0 = end_234X; - goto L6697;} + goto L6698;} else { return clean_weak_pointers();}}} } @@ -1773,15 +1773,15 @@ void s48_begin_collection(void) sizes_243X = Simpure_sizesS; count_244X = Simpure_area_countS; arg1K0 = 0; - goto L6812;} + goto L6813;} else { return;}} - L6812: { + L6813: { i_245X = arg1K0; if ((i_245X < count_244X)) { s48_trace_locationsB((*(areas_242X + i_245X)), ((*(areas_242X + i_245X)) + (*(sizes_243X + i_245X)))); arg1K0 = (1 + i_245X); - goto L6812;} + goto L6813;} else { return;}} } @@ -1805,8 +1805,8 @@ long s48_trace_value(long stob_246X) char v_248X; long stob_247X; { arg1K0 = stob_247X; - goto L7253;} - L7253: { + goto L7254;} + L7254: { stob_247X = arg1K0; if ((Swriting_imagePS)) { v_248X = gc_recordP(stob_246X); @@ -1817,16 +1817,16 @@ long s48_trace_value(long stob_246X) if ((1 == (*((long *) ((((char *) (-3 + type_249X))) + 4))))) { note_undumpableB(stob_246X); arg1K0 = (*((long *) ((((char *) (-3 + stob_246X))) + 4))); - goto L7253;} + goto L7254;} else { - goto L6840;}} + goto L6841;}} else { - goto L6840;}} + goto L6841;}} else { - goto L6840;}} + goto L6841;}} else { - goto L6840;}} - L6840: { + goto L6841;}} + L6841: { if ((3 == (3 & stob_246X))) { a_251X = ((char *) (-3 + stob_246X)); if ((a_251X < (Sfrom_beginS))) { @@ -1838,36 +1838,36 @@ long s48_trace_value(long stob_246X) if ((3 == (3 & h_253X))) { arg1K0 = h_253X; arg0K1 = frontier_252X; - goto L6862;} + goto L6863;} else { if ((1074 == h_253X)) { descriptor_254X = *((long *) (((char *) (-3 + stob_246X)))); if ((3 == (3 & descriptor_254X))) { a_255X = ((char *) (-3 + descriptor_254X)); if ((a_255X < (Sfrom_beginS))) { - goto L4193;} + goto L4194;} else { if ((a_255X < (Sfrom_endS))) { new_thing_256X = copy_weak_pointer(stob_246X, frontier_252X, &new_hp_257X); arg1K0 = new_thing_256X; arg0K1 = new_hp_257X; - goto L6862;} + goto L6863;} else { - goto L4193;}}} + goto L4194;}}} else { - goto L4193;}} + goto L4194;}} else { - goto L4193;}}} + goto L4194;}}} else { return stob_246X;}}} else { return stob_246X;}} - L6862: { + L6863: { new_thing_258X = arg1K0; new_hp_259X = arg0K1; s48_ShpS = new_hp_259X; return new_thing_258X;} - L4193: { + L4194: { *((long *) frontier_252X) = h_253X; data_addr_260X = frontier_252X + 4; new_261X = 3 + (((long) data_addr_260X)); @@ -1875,7 +1875,7 @@ long s48_trace_value(long stob_246X) memcpy((void *)data_addr_260X, (void *)(((char *) (-3 + stob_246X))),((long)(((unsigned long)h_253X)>>8))); arg1K0 = new_261X; arg0K1 = (data_addr_260X + (-4 & (3 + ((long)(((unsigned long)h_253X)>>8))))); - goto L6862;} + goto L6863;} } long s48_write_image(long resume_proc_262X, FILE * port_263X) { @@ -1966,23 +1966,23 @@ long s48_write_image(long resume_proc_262X, FILE * port_263X) exported_bindings_272X = s48_trace_value(v_271X); resume_proc_273X = s48_trace_value(resume_proc_262X); arg0K0 = (Snewspace_beginS); - goto L6983;} - L6983: { + goto L6984;} + L6984: { start_274X = arg0K0; end_275X = s48_ShpS; s48_trace_locationsB(start_274X, end_275X); if (((((((s48_SlimitS) - (s48_ShpS)))>>2)) < 0)) { ps_error("GC error: ran out of space in new heap", 0); clean_weak_pointers(); - goto L6952;} + goto L6953;} else { if ((end_275X < (s48_ShpS))) { arg0K0 = end_275X; - goto L6983;} + goto L6984;} else { clean_weak_pointers(); - goto L6952;}}} - L6952: { + goto L6953;}}} + L6953: { s48_mark_traced_channels_closedB(); symbols_276X = s48_copy_symbol_table(); Sfinding_typeS = 8; @@ -2001,12 +2001,12 @@ long s48_write_image(long resume_proc_262X, FILE * port_263X) sizes_280X = Simpure_sizesS; count_281X = Simpure_area_countS; arg1K0 = 0; - goto L5907;} + goto L5908;} else { - goto L5847;}} + goto L5848;}} else { - goto L5865;}} - L5907: { + goto L5866;}} + L5908: { i_282X = arg1K0; if ((i_282X < count_281X)) { merged_arg0K0 = (*(areas_279X + i_282X)); @@ -2017,25 +2017,25 @@ long s48_write_image(long resume_proc_262X, FILE * port_263X) v_283X = Hproc9672640_return_value; if (v_283X) { arg1K0 = (1 + i_282X); - goto L5907;} + goto L5908;} else { - goto L5865;}} + goto L5866;}} else { - goto L5847;}} - L5847: { + goto L5848;}} + L5848: { if ((0 < (Spure_area_countS))) { areas_284X = Spure_areasS; sizes_285X = Spure_sizesS; count_286X = Spure_area_countS; arg1K0 = 0; - goto L5928;} + goto L5929;} else { - goto L5854;}} - L5865: { + goto L5855;}} + L5866: { s48_ShpS = start_hp_277X; arg1K0 = 1; - goto L7002;} - L5928: { + goto L7003;} + L5929: { i_287X = arg1K0; if ((i_287X < count_286X)) { merged_arg0K0 = (*(areas_284X + i_287X)); @@ -2046,16 +2046,16 @@ long s48_write_image(long resume_proc_262X, FILE * port_263X) v_288X = Hproc9672640_return_value; if (v_288X) { arg1K0 = (1 + i_287X); - goto L5928;} + goto L5929;} else { - goto L5865;}} + goto L5866;}} else { - goto L5854;}} - L5854: { + goto L5855;}} + L5855: { *((long *) start_hp_277X) = (10 + (((((s48_ShpS) - (start_hp_277X + 4)))<<8))); arg1K0 = (3 + (((long) (start_hp_277X + 4)))); - goto L7002;} - L7002: { + goto L7003;} + L7003: { resumer_records_289X = arg1K0; imported_bindings_290X = s48_cleaned_imported_bindings(); if ((1 == resumer_records_289X)) { @@ -2068,163 +2068,163 @@ long s48_write_image(long resume_proc_262X, FILE * port_263X) if (((SstatusS) == NO_ERRORS)) { PS_WRITE_CHAR(10, port_263X, v_291X) SstatusS = v_291X; - goto L2019;} + goto L2020;} else { - goto L2019;}}} - L2019: { + goto L2020;}}} + L2020: { if (((SstatusS) == NO_ERRORS)) { PS_WRITE_CHAR(12, port_263X, v_292X) SstatusS = v_292X; - goto L2028;} + goto L2029;} else { - goto L2028;}} - L2028: { + goto L2029;}} + L2029: { if (((SstatusS) == NO_ERRORS)) { PS_WRITE_CHAR(10, port_263X, v_293X) SstatusS = v_293X; - goto L2037;} + goto L2038;} else { - goto L2037;}} - L2037: { + goto L2038;}} + L2038: { if (((SstatusS) == NO_ERRORS)) { SstatusS = (ps_write_string("Vanilla 20", port_263X)); - goto L2044;} + goto L2045;} else { - goto L2044;}} - L2044: { + goto L2045;}} + L2045: { if (((SstatusS) == NO_ERRORS)) { PS_WRITE_CHAR(10, port_263X, v_294X) SstatusS = v_294X; - goto L2053;} + goto L2054;} else { - goto L2053;}} - L2053: { + goto L2054;}} + L2054: { if (((SstatusS) == NO_ERRORS)) { SstatusS = (ps_write_integer(4, port_263X)); - goto L2123;} + goto L2124;} else { - goto L2123;}} - L2123: { + goto L2124;}} + L2124: { if (((SstatusS) == NO_ERRORS)) { PS_WRITE_CHAR(10, port_263X, v_295X) SstatusS = v_295X; - goto L2055;} + goto L2056;} else { - goto L2055;}} - L2055: { + goto L2056;}} + L2056: { v_296X = Snewspace_beginS; if (((SstatusS) == NO_ERRORS)) { SstatusS = (ps_write_integer(((((((long) v_296X)))>>2)), port_263X)); - goto L2143;} + goto L2144;} else { - goto L2143;}} - L2143: { + goto L2144;}} + L2144: { if (((SstatusS) == NO_ERRORS)) { PS_WRITE_CHAR(10, port_263X, v_297X) SstatusS = v_297X; - goto L2061;} + goto L2062;} else { - goto L2061;}} - L2061: { + goto L2062;}} + L2062: { v_298X = s48_ShpS; if (((SstatusS) == NO_ERRORS)) { SstatusS = (ps_write_integer(((((((long) v_298X)))>>2)), port_263X)); - goto L2163;} + goto L2164;} else { - goto L2163;}} - L2163: { + goto L2164;}} + L2164: { if (((SstatusS) == NO_ERRORS)) { PS_WRITE_CHAR(10, port_263X, v_299X) SstatusS = v_299X; - goto L2067;} + goto L2068;} else { - goto L2067;}} - L2067: { + goto L2068;}} + L2068: { if (((SstatusS) == NO_ERRORS)) { SstatusS = (ps_write_integer(symbols_276X, port_263X)); - goto L2178;} + goto L2179;} else { - goto L2178;}} - L2178: { + goto L2179;}} + L2179: { if (((SstatusS) == NO_ERRORS)) { PS_WRITE_CHAR(10, port_263X, v_300X) SstatusS = v_300X; - goto L2069;} + goto L2070;} else { - goto L2069;}} - L2069: { + goto L2070;}} + L2070: { if (((SstatusS) == NO_ERRORS)) { SstatusS = (ps_write_integer(imported_bindings_290X, port_263X)); - goto L2193;} + goto L2194;} else { - goto L2193;}} - L2193: { + goto L2194;}} + L2194: { if (((SstatusS) == NO_ERRORS)) { PS_WRITE_CHAR(10, port_263X, v_301X) SstatusS = v_301X; - goto L2071;} + goto L2072;} else { - goto L2071;}} - L2071: { + goto L2072;}} + L2072: { if (((SstatusS) == NO_ERRORS)) { SstatusS = (ps_write_integer(exported_bindings_272X, port_263X)); - goto L2208;} + goto L2209;} else { - goto L2208;}} - L2208: { + goto L2209;}} + L2209: { if (((SstatusS) == NO_ERRORS)) { PS_WRITE_CHAR(10, port_263X, v_302X) SstatusS = v_302X; - goto L2073;} + goto L2074;} else { - goto L2073;}} - L2073: { + goto L2074;}} + L2074: { if (((SstatusS) == NO_ERRORS)) { SstatusS = (ps_write_integer(resumer_records_289X, port_263X)); - goto L2223;} + goto L2224;} else { - goto L2223;}} - L2223: { + goto L2224;}} + L2224: { if (((SstatusS) == NO_ERRORS)) { PS_WRITE_CHAR(10, port_263X, v_303X) SstatusS = v_303X; - goto L2075;} + goto L2076;} else { - goto L2075;}} - L2075: { + goto L2076;}} + L2076: { if (((SstatusS) == NO_ERRORS)) { SstatusS = (ps_write_integer(resume_proc_273X, port_263X)); - goto L2238;} + goto L2239;} else { - goto L2238;}} - L2238: { + goto L2239;}} + L2239: { if (((SstatusS) == NO_ERRORS)) { PS_WRITE_CHAR(10, port_263X, v_304X) SstatusS = v_304X; - goto L2077;} + goto L2078;} else { - goto L2077;}} - L2077: { + goto L2078;}} + L2078: { if (((SstatusS) == NO_ERRORS)) { PS_WRITE_CHAR(12, port_263X, v_305X) SstatusS = v_305X; - goto L2086;} + goto L2087;} else { - goto L2086;}} - L2086: { + goto L2087;}} + L2087: { *((long *) (s48_ShpS)) = 1; if (((SstatusS) == NO_ERRORS)) { SstatusS = (ps_write_block(port_263X, ((char *) (s48_ShpS)), (((s48_ShpS) + 4) - (s48_ShpS)))); - goto L2105;} + goto L2106;} else { - goto L2105;}} - L2105: { + goto L2106;}} + L2106: { if (((SstatusS) == NO_ERRORS)) { SstatusS = (ps_write_block(port_263X, ((char *) (Snewspace_beginS)), ((s48_ShpS) - (Snewspace_beginS)))); - goto L2118;} + goto L2119;} else { - goto L2118;}} - L2118: { + goto L2119;}} + L2119: { status_306X = SstatusS; abort_collection_return_tag = 1; goto abort_collection; @@ -2235,8 +2235,8 @@ long s48_write_image(long resume_proc_262X, FILE * port_263X) end_266X = merged_arg0K1;{ type_307X = Sfinding_typeS; arg0K0 = start_265X; - goto L4852;} - L4852: { + goto L4853;} + L4853: { addr_308X = arg0K0; if ((addr_308X < end_266X)) { d_309X = *((long *) addr_308X); @@ -2252,22 +2252,22 @@ long s48_write_image(long resume_proc_262X, FILE * port_263X) *((long *) (s48_ShpS)) = obj_311X; s48_ShpS = ((s48_ShpS) + 4); arg0K0 = next_310X; - goto L4852;} + goto L4853;} else { Hproc9672640_return_value = 0; goto Hproc967264_return;}} else { arg0K0 = next_310X; - goto L4852;}} + goto L4853;}} else { arg0K0 = next_310X; - goto L4852;}} + goto L4853;}} else { arg0K0 = next_310X; - goto L4852;}} + goto L4853;}} else { arg0K0 = next_310X; - goto L4852;}} + goto L4853;}} else { ps_write_string("heap is in an inconsistent state.", (stderr)); Hproc9672640_return_value = 0; @@ -2296,25 +2296,25 @@ long s48_write_image(long resume_proc_262X, FILE * port_263X) Snewspace_endS = (Soldspace_endS); Soldspace_endS = temp_316X; arg0K0 = (Snewspace_beginS); - goto L4085;} - L4085: { + goto L4086;} + L4086: { addr_317X = arg0K0; if ((addr_317X < (s48_ShpS))) { d_318X = *((long *) addr_317X); if ((2 == (3 & d_318X))) { arg1K0 = d_318X; - goto L4106;} + goto L4107;} else { h_319X = *((long *) ((((char *) (-3 + d_318X))) + -4)); *((long *) addr_317X) = h_319X; arg1K0 = h_319X; - goto L4106;}} + goto L4107;}} else { goto abort_collection_return;}} - L4106: { + L4107: { h_320X = arg1K0; arg0K0 = (addr_317X + (4 + (-4 & (3 + ((long)(((unsigned long)h_320X)>>8)))))); - goto L4085;} + goto L4086;} abort_collection_return: switch (abort_collection_return_tag) { case 0: goto abort_collection_return_0; diff --git a/c/scheme48vm.c b/c/scheme48vm.c index bf7c338..9710d3b 100644 --- a/c/scheme48vm.c +++ b/c/scheme48vm.c @@ -103,28 +103,28 @@ static char add_more_channels(long index_5X) y_7X = 8 + (Snumber_of_channelsS); if ((x_6X < y_7X)) { arg0K0 = y_7X; - goto L2366;} + goto L2367;} else { arg0K0 = x_6X; - goto L2366;}} - L2366: { + goto L2367;}} + L2367: { new_count_8X = arg0K0; new_vm_channels_9X = (long*)malloc(sizeof(long) * new_count_8X); if ((NULL == new_vm_channels_9X)) { return 0;} else { arg0K0 = 0; - goto L2378;}} - L2378: { + goto L2379;}} + L2379: { i_10X = arg0K0; if ((i_10X == (Snumber_of_channelsS))) { arg0K0 = (Snumber_of_channelsS); - goto L2393;} + goto L2394;} else { *(new_vm_channels_9X + i_10X) = (*((Svm_channelsS) + i_10X)); arg0K0 = (1 + i_10X); - goto L2378;}} - L2393: { + goto L2379;}} + L2394: { i_11X = arg0K0; if ((i_11X == new_count_8X)) { free((Svm_channelsS)); @@ -134,7 +134,7 @@ static char add_more_channels(long index_5X) else { *(new_vm_channels_9X + i_11X) = 1; arg0K0 = (1 + i_11X); - goto L2393;}} + goto L2394;}} } static void enqueue_channelB(long index_12X, long status_13X) { @@ -179,25 +179,25 @@ static long close_channelB(long channel_19X) if ((5 == x_21X)) { v_22X = ps_abort_fd_op(os_index_20X); enqueue_channelB(os_index_20X, v_22X); - goto L7996;} + goto L7997;} else { - goto L7996;}} - L7996: { + goto L7997;}} + L7997: { v_23X = *((long *) (((char *) (-3 + channel_19X)))); if ((4 == v_23X)) { - goto L8011;} + goto L8012;} else { if ((12 == (*((long *) (((char *) (-3 + channel_19X))))))) { - goto L8011;} + goto L8012;} else { v_24X = ps_close_fd(os_index_20X); arg0K0 = v_24X; - goto L8018;}}} - L8011: { + goto L8019;}}} + L8012: { v_25X = ps_close_fd(os_index_20X); arg0K0 = v_25X; - goto L8018;} - L8018: { + goto L8019;} + L8019: { status_26X = arg0K0; *((Svm_channelsS) + os_index_20X) = 1; addr_27X = ((char *) (-3 + channel_19X)); @@ -237,13 +237,13 @@ static long enter_string(char *string_33X, long key_34X) string_38X = 3 + (((long) (addr_37X + 4))); *((unsigned char *) ((((char *) (-3 + string_38X))) + z_35X)) = 0; arg0K0 = 0; - goto L9526;} - L9526: { + goto L9527;} + L9527: { i_39X = arg0K0; if ((i_39X < z_35X)) { *((unsigned char *) ((((char *) (-3 + string_38X))) + i_39X)) = ((*(string_33X + i_39X))); arg0K0 = (1 + i_39X); - goto L9526;} + goto L9527;} else { return string_38X;}} } @@ -264,8 +264,8 @@ static char HcleanerB2160(long table_40X) long table_41X; { table_41X = s48_trace_value(table_40X); arg0K0 = 0; - goto L9716;} - L9716: { + goto L9717;} + L9717: { i_42X = arg0K0; temp_43X = 1024 == i_42X; if (temp_43X) { @@ -274,8 +274,8 @@ static char HcleanerB2160(long table_40X) foo_44X = *((long *) ((((char *) (-3 + table_41X))) + (((i_42X)<<2)))); arg0K0 = foo_44X; arg0K1 = 1; - goto L9736;}} - L9736: { + goto L9737;}} + L9737: { foo_45X = arg0K0; okay_46X = arg0K1; if ((1 == foo_45X)) { @@ -283,7 +283,7 @@ static char HcleanerB2160(long table_40X) S48_WRITE_BARRIER(table_41X, addr_47X, okay_46X); *((long *) addr_47X) = okay_46X; arg0K0 = (1 + i_42X); - goto L9716;} + goto L9717;} else { v_48X = s48_extantP(foo_45X); if (v_48X) { @@ -292,15 +292,15 @@ static char HcleanerB2160(long table_40X) S48_WRITE_BARRIER(new_foo_49X, addr_50X, okay_46X); *((long *) addr_50X) = okay_46X; arg0K0 = new_foo_49X; - goto L9741;} + goto L9742;} else { arg0K0 = okay_46X; - goto L9741;}}} - L9741: { + goto L9742;}}} + L9742: { v_51X = arg0K0; arg0K0 = (*((long *) ((((char *) (-3 + foo_45X))) + 4))); arg0K1 = v_51X; - goto L9736;} + goto L9737;} } static void push_exception_continuationB(long exception_52X, long instruction_size_53X) { @@ -326,22 +326,22 @@ static void push_exception_continuationB(long exception_52X, long instruction_si Scode_pointerS = (((char *) (-3 + (*((long *) (((char *) (-3 + tem_55X)))))))); arg1K0 = ((SstackS) + 4); arg0K1 = 0; - goto L9949;} - L9949: { + goto L9950;} + L9950: { p_56X = arg1K0; i_57X = arg0K1; if ((2 == (3 & (*((long *) p_56X))))) { if ((22 == (*((long *) p_56X)))) { arg0K0 = (-1 + i_57X); - goto L9890;} + goto L9891;} else { arg0K0 = i_57X; - goto L9890;}} + goto L9891;}} else { arg1K0 = (p_56X + 4); arg0K1 = (1 + i_57X); - goto L9949;}} - L9890: { + goto L9950;}} + L9891: { v_58X = arg0K0; push_continuationB((Scode_pointerS), v_58X); *((long *) (SstackS)) = (((opcode_54X)<<2)); @@ -358,15 +358,15 @@ static long make_registered_channel(long mode_59X, long id_60X, long os_index_61 char temp_63X; { temp_63X = os_index_61X < (Snumber_of_channelsS); if (temp_63X) { - goto L10816;} + goto L10817;} else { x_64X = add_more_channels(os_index_61X); if (x_64X) { - goto L10816;} + goto L10817;} else { *TT0 = 9; return 1;}}} - L10816: { + L10817: { if ((1 == (*((Svm_channelsS) + os_index_61X)))) { addr_65X = ALLOCATE_SPACE(5, 24); *((long *) addr_65X) = 5142; @@ -394,17 +394,17 @@ static long channel_close_error(long status_67X, long index_68X, long id_69X) if ((3 == (3 & id_69X))) { if ((16 == (31 & ((((*((long *) ((((char *) (-3 + id_69X))) + -4))))>>2))))) { ps_write_string((((char *)(((char *) (-3 + id_69X))))), (stderr)); - goto L11462;} + goto L11463;} else { - goto L11456;}} + goto L11457;}} else { - goto L11456;}} - L11462: { + goto L11457;}} + L11463: { PS_WRITE_CHAR(10, (stderr), v_70X) return v_70X;} - L11456: { + L11457: { ps_write_integer((((index_68X)>>2)), (stderr)); - goto L11462;} + goto L11463;} } static void HtopD8861(void) { @@ -455,17 +455,17 @@ static void HtopD8861(void) long length_72X; char * frame_71X; { arg1K0 = (Sexternal_root_stackS); - goto L6255;} - L6255: { + goto L6256;} + L6256: { frame_71X = arg1K0; if ((frame_71X == NULL)) { arg1K0 = (Spermanent_external_rootsS); - goto L6281;} + goto L6282;} else { length_72X = *((long *) frame_71X); arg0K0 = 0; - goto L6263;}} - L6281: { + goto L6264;}} + L6282: { frame_73X = arg1K0; if ((frame_73X == NULL)) { s48_initializing_gc_root(); @@ -499,25 +499,25 @@ static void HtopD8861(void) v_87X = s48_trace_value((Sos_signal_argumentS)); Sos_signal_argumentS = v_87X; arg0K0 = (Sfinalizer_alistS); - goto L5289;} + goto L5290;} else { cell_88X = ((char *) (*((long *) (frame_73X + 4)))); x2_89X = s48_trace_value((*((long *) cell_88X))); *((long *) cell_88X) = x2_89X; arg1K0 = (((char *) (*((long *) frame_73X)))); - goto L6281;}} - L6263: { + goto L6282;}} + L6264: { i_90X = arg0K0; if ((i_90X == length_72X)) { arg1K0 = (((char *) (*((long *) (frame_71X + 4))))); - goto L6255;} + goto L6256;} else { cell_91X = ((char *) (*((long *) (frame_71X + (8 + (((i_90X)<<2))))))); x2_92X = s48_trace_value((*((long *) cell_91X))); *((long *) cell_91X) = x2_92X; arg0K0 = (1 + i_90X); - goto L6263;}} - L5289: { + goto L6264;}} + L5290: { alist_93X = arg0K0; if ((25 == alist_93X)) { env_94X = s48_trace_value((SenvS)); @@ -528,22 +528,22 @@ static void HtopD8861(void) Spending_channels_tailS = v_96X; if ((Sstack_warningPS)) { arg1K0 = (Sstack_beginS); - goto L5883;} + goto L5884;} else { - goto L5916;}} + goto L5917;}} else { pair_97X = *((long *) (((char *) (-3 + alist_93X)))); x_98X = s48_extantP((*((long *) (((char *) (-3 + pair_97X)))))); if (x_98X) { - goto L5314;} + goto L5315;} else { s48_trace_stob_contentsB((*((long *) (((char *) (-3 + pair_97X)))))); - goto L5314;}}} - L5883: { + goto L5315;}}} + L5884: { a_99X = arg1K0; if ((252645135 == (*((long *) a_99X)))) { arg1K0 = (a_99X + 4); - goto L5883;} + goto L5884;} else { unused_100X = (((a_99X - (Sstack_beginS)))>>2); if ((unused_100X < 30)) { @@ -555,103 +555,103 @@ static void HtopD8861(void) { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } Sstack_warningPS = 0; - goto L5916;} + goto L5917;} else { - goto L5916;}}} - L5916: { + goto L5917;}}} + L5917: { arg1K0 = ((SstackS) + 4); arg0K1 = 0; - goto L5981;} - L5314: { + goto L5982;} + L5315: { val_101X = s48_trace_value((*((long *) ((((char *) (-3 + pair_97X))) + 4)))); addr_102X = (((char *) (-3 + pair_97X))) + 4; S48_WRITE_BARRIER(pair_97X, addr_102X, val_101X); *((long *) addr_102X) = val_101X; arg0K0 = (*((long *) ((((char *) (-3 + alist_93X))) + 4))); - goto L5289;} - L5981: { + goto L5290;} + L5982: { p_103X = arg1K0; i_104X = arg0K1; if ((2 == (3 & (*((long *) p_103X))))) { if ((22 == (*((long *) p_103X)))) { arg0K0 = (-1 + i_104X); - goto L5918;} + goto L5919;} else { arg0K0 = i_104X; - goto L5918;}} + goto L5919;}} else { arg1K0 = (p_103X + 4); arg0K1 = (1 + i_104X); - goto L5981;}} - L5918: { + goto L5982;}} + L5919: { arg_count_105X = arg0K0; s48_trace_locationsB(((SstackS) + 4), ((SstackS) + (4 + (((arg_count_105X)<<2))))); p_106X = SenvS; if ((3 == (3 & p_106X))) { if ((p_106X < (((long) (Sstack_beginS))))) { - goto L5934;} + goto L5935;} else { if (((((long) (Sstack_endS))) < p_106X)) { - goto L5934;} + goto L5935;} else { env_107X = SenvS; arg0K0 = env_107X; - goto L6094;}}} + goto L6095;}}} else { - goto L5934;}} - L5934: { + goto L5935;}} + L5935: { v_108X = s48_trace_value((SenvS)); SenvS = v_108X; - goto L5939;} - L6094: { + goto L5940;} + L6095: { env_109X = arg0K0; if ((3 == (3 & env_109X))) { if ((env_109X < (((long) (Sstack_beginS))))) { - goto L5939;} + goto L5940;} else { if (((((long) (Sstack_endS))) < env_109X)) { - goto L5939;} + goto L5940;} else { s48_trace_stob_contentsB(env_109X); arg0K0 = (*((long *) (((char *) (-3 + env_109X))))); - goto L6094;}}} + goto L6095;}}} else { - goto L5939;}} - L5939: { + goto L5940;}} + L5940: { arg0K0 = (ScontS); arg0K1 = 0; - goto L5944;} - L5944: { + goto L5945;} + L5945: { cont_110X = arg0K0; last_env_111X = arg0K1; env_112X = *((long *) ((((char *) (-3 + cont_110X))) + 12)); s48_trace_stob_contentsB(cont_110X); if ((env_112X == last_env_111X)) { - goto L5962;} + goto L5963;} else { arg0K0 = env_112X; - goto L6049;}} - L5962: { + goto L6050;}} + L5963: { if ((cont_110X == (Sbottom_of_stackS))) { return;} else { arg0K0 = (*((long *) (((char *) (-3 + cont_110X))))); arg0K1 = env_112X; - goto L5944;}} - L6049: { + goto L5945;}} + L6050: { env_113X = arg0K0; if ((3 == (3 & env_113X))) { if ((env_113X < (((long) (Sstack_beginS))))) { - goto L5962;} + goto L5963;} else { if (((((long) (Sstack_endS))) < env_113X)) { - goto L5962;} + goto L5963;} else { s48_trace_stob_contentsB(env_113X); arg0K0 = (*((long *) (((char *) (-3 + env_113X))))); - goto L6049;}}} + goto L6050;}}} else { - goto L5962;}} + goto L5963;}} } static long Hlookup2102(long table_114X, long string_115X, long key_116X) { @@ -671,20 +671,20 @@ static long Hlookup2102(long table_114X, long string_115X, long key_116X) { n_117X = -1 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + string_115X))) + -4))))>>8)); arg0K0 = 0; arg0K1 = 0; - goto L13083;} - L13083: { + goto L13084;} + L13084: { i_118X = arg0K0; h_119X = arg0K1; if ((i_118X < n_117X)) { arg0K0 = (1 + i_118X); arg0K1 = (h_119X + (((*((unsigned char *) ((((char *) (-3 + string_115X))) + i_118X)))))); - goto L13083;} + goto L13084;} else { index_120X = 1023 & h_119X; bucket_121X = *((long *) ((((char *) (-3 + table_114X))) + (((index_120X)<<2)))); arg0K0 = bucket_121X; - goto L13051;}} - L13051: { + goto L13052;}} + L13052: { foo_122X = arg0K0; if ((1 == foo_122X)) { addr_123X = ALLOCATE_SPACE(13, 20); @@ -705,12 +705,12 @@ static long Hlookup2102(long table_114X, long string_115X, long key_116X) if (((!memcmp((void *)(((char *) (-3 + s2_126X))), (void *)(((char *) (-3 + string_115X))),len_127X)))) { return foo_122X;} else { - goto L13067;}} + goto L13068;}} else { - goto L13067;}}} - L13067: { + goto L13068;}}} + L13068: { arg0K0 = (*((long *) ((((char *) (-3 + foo_122X))) + 12))); - goto L13051;} + goto L13052;} } static long Hlookup2083(long table_128X, long string_129X, long key_130X) { @@ -730,20 +730,20 @@ static long Hlookup2083(long table_128X, long string_129X, long key_130X) { n_131X = -1 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + string_129X))) + -4))))>>8)); arg0K0 = 0; arg0K1 = 0; - goto L13208;} - L13208: { + goto L13209;} + L13209: { i_132X = arg0K0; h_133X = arg0K1; if ((i_132X < n_131X)) { arg0K0 = (1 + i_132X); arg0K1 = (h_133X + (((*((unsigned char *) ((((char *) (-3 + string_129X))) + i_132X)))))); - goto L13208;} + goto L13209;} else { index_134X = 1023 & h_133X; bucket_135X = *((long *) ((((char *) (-3 + table_128X))) + (((index_134X)<<2)))); arg0K0 = bucket_135X; - goto L13176;}} - L13176: { + goto L13177;}} + L13177: { foo_136X = arg0K0; if ((1 == foo_136X)) { addr_137X = ALLOCATE_SPACE(13, 20); @@ -764,12 +764,12 @@ static long Hlookup2083(long table_128X, long string_129X, long key_130X) if (((!memcmp((void *)(((char *) (-3 + s2_140X))), (void *)(((char *) (-3 + string_129X))),len_141X)))) { return foo_136X;} else { - goto L13192;}} + goto L13193;}} else { - goto L13192;}}} - L13192: { + goto L13193;}}} + L13193: { arg0K0 = (*((long *) ((((char *) (-3 + foo_136X))) + 12))); - goto L13176;} + goto L13177;} } static void HtopD8854(void) { @@ -813,8 +813,8 @@ static void HtopD8854(void) arg0K0 = (Sfinalizer_alistS); arg0K1 = 25; arg0K2 = 25; - goto L7722;} - L7722: { + goto L7723;} + L7723: { alist_145X = arg0K0; okay_146X = arg0K1; goners_147X = arg0K2; @@ -823,10 +823,10 @@ static void HtopD8854(void) l2_148X = Sfinalize_theseS; if ((25 == goners_147X)) { arg0K0 = l2_148X; - goto L7730;} + goto L7731;} else { arg0K0 = goners_147X; - goto L7783;}} + goto L7784;}} else { alist_149X = s48_trace_value(alist_145X); pair_150X = s48_trace_value((*((long *) (((char *) (-3 + alist_149X)))))); @@ -847,7 +847,7 @@ static void HtopD8854(void) arg0K0 = next_152X; arg0K1 = alist_149X; arg0K2 = goners_147X; - goto L7722;} + goto L7723;} else { addr_158X = (((char *) (-3 + alist_149X))) + 4; S48_WRITE_BARRIER(alist_149X, addr_158X, goners_147X); @@ -855,24 +855,24 @@ static void HtopD8854(void) arg0K0 = next_152X; arg0K1 = okay_146X; arg0K2 = alist_149X; - goto L7722;}}} - L7730: { + goto L7723;}}} + L7731: { v_159X = arg0K0; Sfinalize_theseS = v_159X; arg0K0 = 0; - goto L12515;} - L7783: { + goto L12516;} + L7784: { l_160X = arg0K0; if ((25 == (*((long *) ((((char *) (-3 + l_160X))) + 4))))) { addr_161X = (((char *) (-3 + l_160X))) + 4; S48_WRITE_BARRIER(l_160X, addr_161X, l2_148X); *((long *) addr_161X) = l2_148X; arg0K0 = goners_147X; - goto L7730;} + goto L7731;} else { arg0K0 = (*((long *) ((((char *) (-3 + l_160X))) + 4))); - goto L7783;}} - L12515: { + goto L7784;}} + L12516: { i_162X = arg0K0; if ((i_162X == (Snumber_of_channelsS))) { Spending_interruptsS = (4 | (Spending_interruptsS)); @@ -889,58 +889,58 @@ static void HtopD8854(void) else { channel_163X = *((Svm_channelsS) + i_162X); if ((1 == channel_163X)) { - goto L12551;} + goto L12552;} else { header_164X = *((long *) ((((char *) (-3 + channel_163X))) + -4)); if ((3 == (3 & header_164X))) { arg0K0 = header_164X; - goto L12544;} + goto L12545;} else { if ((0 == (*((long *) (((char *) (-3 + channel_163X))))))) { arg0K0 = 1; - goto L12544;} + goto L12545;} else { id_165X = *((long *) ((((char *) (-3 + channel_163X))) + 4)); if ((0 == (3 & id_165X))) { arg0K0 = id_165X; - goto L12227;} + goto L12228;} else { if ((3 == (3 & (*((long *) ((((char *) (-3 + id_165X))) + -4)))))) { arg0K0 = (*((long *) ((((char *) (-3 + id_165X))) + -4))); - goto L12227;} + goto L12228;} else { arg0K0 = id_165X; - goto L12227;}}}}}}} - L12551: { + goto L12228;}}}}}}} + L12552: { arg0K0 = (1 + i_162X); - goto L12515;} - L12544: { + goto L12516;} + L12545: { new_166X = arg0K0; *((Svm_channelsS) + i_162X) = new_166X; - goto L12551;} - L12227: { + goto L12552;} + L12228: { id_167X = arg0K0; status_168X = close_channelB(channel_163X); if ((status_168X == NO_ERRORS)) { - goto L12242;} + goto L12243;} else { channel_close_error(status_168X, (*((long *) ((((char *) (-3 + channel_163X))) + 8))), id_167X); - goto L12242;}} - L12242: { + goto L12243;}} + L12243: { ps_write_string("Channel closed: ", (stderr)); if ((0 == (3 & id_167X))) { ps_write_integer((((id_167X)>>2)), (stderr)); - goto L12260;} + goto L12261;} else { ps_write_string((((char *)(((char *) (-3 + id_167X))))), (stderr)); - goto L12260;}} - L12260: { + goto L12261;}} + L12261: { ps_write_string(" ", (stderr)); ps_write_integer(((((*((long *) ((((char *) (-3 + channel_163X))) + 8))))>>2)), (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } arg0K0 = 1; - goto L12544;} + goto L12545;} } static long collect_saving_temps(long value0_169X, long value1_170X, long *TT0) { @@ -1016,10 +1016,10 @@ void s48_register_gc_rootB(char * loc_addr_181X) { frame_182X = (char *)malloc(8); if ((frame_182X == NULL)) { ps_error("out of memory registering a global root", 0); - goto L3175;} + goto L3176;} else { - goto L3175;}} - L3175: { + goto L3176;}} + L3176: { *((long *) frame_182X) = (((long) (Spermanent_external_rootsS))); *((long *) (frame_182X + 4)) = (((long) loc_addr_181X)); Spermanent_external_rootsS = frame_182X; @@ -1087,15 +1087,15 @@ void s48_mark_traced_channels_closedB(void) long channel_192X; long i_191X; { arg0K0 = 0; - goto L6332;} - L6332: { + goto L6333;} + L6333: { i_191X = arg0K0; if ((i_191X == (Snumber_of_channelsS))) { return;} else { channel_192X = *((Svm_channelsS) + i_191X); if ((1 == channel_192X)) { - goto L6392;} + goto L6393;} else { header_193X = *((long *) ((((char *) (-3 + channel_192X))) + -4)); if ((3 == (3 & header_193X))) { @@ -1103,16 +1103,16 @@ void s48_mark_traced_channels_closedB(void) descriptor_194X = *((long *) ((((char *) (-3 + channel_192X))) + 4)); if ((0 == (3 & descriptor_194X))) { ps_write_integer(((((*((long *) ((((char *) (-3 + channel_192X))) + 4))))>>2)), (stderr)); - goto L6378;} + goto L6379;} else { ps_write_string((((char *)(((char *) (-3 + (*((long *) ((((char *) (-3 + channel_192X))) + 4)))))))), (stderr)); - goto L6378;}} + goto L6379;}} else { - goto L6392;}}}} - L6392: { + goto L6393;}}}} + L6393: { arg0K0 = (1 + i_191X); - goto L6332;} - L6378: { + goto L6333;} + L6379: { { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } addr_195X = ((char *) (-3 + header_193X)); @@ -1121,7 +1121,7 @@ void s48_mark_traced_channels_closedB(void) addr_196X = (((char *) (-3 + header_193X))) + 8; S48_WRITE_BARRIER(header_193X, addr_196X, -4); *((long *) addr_196X) = -4; - goto L6392;} + goto L6393;} } long s48_set_channel_os_index(long channel_197X, long os_index_198X) { @@ -1134,26 +1134,26 @@ long s48_set_channel_os_index(long channel_197X, long os_index_198X) char temp_199X; { temp_199X = os_index_198X < (Snumber_of_channelsS); if (temp_199X) { - goto L7901;} + goto L7902;} else { x_200X = add_more_channels(os_index_198X); if (x_200X) { - goto L7901;} + goto L7902;} else { return 36;}}} - L7901: { + L7902: { if ((1 == (*((Svm_channelsS) + os_index_198X)))) { old_index_201X = (((*((long *) ((((char *) (-3 + channel_197X))) + 8))))>>2); x_202X = *((long *) ((((char *) (-3 + channel_197X))) + 16)); if ((5 == x_202X)) { v_203X = ps_abort_fd_op(old_index_201X); enqueue_channelB(old_index_201X, v_203X); - goto L7887;} + goto L7888;} else { - goto L7887;}} + goto L7888;}} else { return 44;}} - L7887: { + L7888: { *((Svm_channelsS) + old_index_201X) = 1; *((Svm_channelsS) + os_index_198X) = channel_197X; val_204X = ((os_index_198X)<<2); @@ -1183,25 +1183,25 @@ long s48_cleaned_imported_bindings(void) { table_206X = s48_trace_value((Simported_bindingsS)); table_207X = s48_trace_value(table_206X); arg0K0 = 0; - goto L8578;} - L8578: { + goto L8579;} + L8579: { i_208X = arg0K0; if ((1024 == i_208X)) { arg0K0 = 0; - goto L9667;} + goto L9668;} else { foo_209X = *((long *) ((((char *) (-3 + table_207X))) + (((i_208X)<<2)))); arg0K0 = foo_209X; arg0K1 = 1; - goto L8598;}} - L9667: { + goto L8599;}} + L9668: { i_210X = arg0K0; if ((1024 == i_210X)) { return table_206X;} else { arg0K0 = (*((long *) ((((char *) (-3 + table_206X))) + (((i_210X)<<2))))); - goto L9675;}} - L8598: { + goto L9676;}} + L8599: { foo_211X = arg0K0; okay_212X = arg0K1; if ((1 == foo_211X)) { @@ -1209,7 +1209,7 @@ long s48_cleaned_imported_bindings(void) S48_WRITE_BARRIER(table_207X, addr_213X, okay_212X); *((long *) addr_213X) = okay_212X; arg0K0 = (1 + i_208X); - goto L8578;} + goto L8579;} else { v_214X = s48_extantP(foo_211X); if (v_214X) { @@ -1218,26 +1218,26 @@ long s48_cleaned_imported_bindings(void) S48_WRITE_BARRIER(new_foo_215X, addr_216X, okay_212X); *((long *) addr_216X) = okay_212X; arg0K0 = new_foo_215X; - goto L8603;} + goto L8604;} else { arg0K0 = okay_212X; - goto L8603;}}} - L9675: { + goto L8604;}}} + L9676: { entry_217X = arg0K0; if ((1 == entry_217X)) { arg0K0 = (1 + i_210X); - goto L9667;} + goto L9668;} else { addr_218X = (((char *) (-3 + entry_217X))) + 8; S48_WRITE_BARRIER(entry_217X, addr_218X, 529); *((long *) addr_218X) = 529; arg0K0 = (*((long *) ((((char *) (-3 + entry_217X))) + 12))); - goto L9675;}} - L8603: { + goto L9676;}} + L8604: { v_219X = arg0K0; arg0K0 = (*((long *) ((((char *) (-3 + foo_211X))) + 12))); arg0K1 = v_219X; - goto L8598;} + goto L8599;} } long s48_copy_symbol_table(void) { @@ -1252,10 +1252,10 @@ void s48_setup_external_exception(long why_221X, long nargs_222X) { push_exception_continuationB(why_221X, 1); if ((10 < nargs_222X)) { ps_error("too many arguments from external exception", 0); - goto L11018;} + goto L11019;} else { - goto L11018;}} - L11018: { + goto L11019;}} + L11019: { Sexternal_exception_nargsS = nargs_222X; Sexternal_exceptionPS = 1; return;} @@ -1291,20 +1291,20 @@ char s48_warn_about_undefined_imported_bindings(void) { out_225X = stderr; table_226X = Simported_bindingsS; arg0K0 = 0; - goto L11558;} - L11558: { + goto L11559;} + L11559: { i_227X = arg0K0; temp_228X = 1024 == i_227X; if (temp_228X) { return temp_228X;} else { arg0K0 = (*((long *) ((((char *) (-3 + table_226X))) + (((i_227X)<<2))))); - goto L11566;}} - L11566: { + goto L11567;}} + L11567: { entry_229X = arg0K0; if ((1 == entry_229X)) { arg0K0 = (1 + i_227X); - goto L11558;} + goto L11559;} else { if ((17 == (255 & (*((long *) ((((char *) (-3 + entry_229X))) + 8)))))) { name_230X = *((long *) (((char *) (-3 + entry_229X)))); @@ -1312,23 +1312,23 @@ char s48_warn_about_undefined_imported_bindings(void) if ((3 == (3 & name_230X))) { if ((16 == (31 & ((((*((long *) ((((char *) (-3 + name_230X))) + -4))))>>2))))) { ps_write_string((((char *)(((char *) (-3 + name_230X))))), out_225X); - goto L11546;} + goto L11547;} else { - goto L11544;}} + goto L11545;}} else { - goto L11544;}} + goto L11545;}} else { - goto L11569;}}} - L11546: { + goto L11570;}}} + L11547: { { long ignoreXX; PS_WRITE_CHAR(10, out_225X, ignoreXX) } - goto L11569;} - L11544: { + goto L11570;} + L11545: { ps_write_string("", out_225X); - goto L11546;} - L11569: { + goto L11547;} + L11570: { arg0K0 = (*((long *) ((((char *) (-3 + entry_229X))) + 12))); - goto L11566;} + goto L11567;} } void s48_define_exported_binding(char *name_231X, long value_232X) { @@ -1355,7 +1355,7 @@ void s48_define_exported_binding(char *name_231X, long value_232X) arg2K0 = 1; arg0K1 = 0; arg0K2 = value_232X; - goto L14338;} + goto L14339;} else { temp0_235X = collect_saving_temps(value_232X, 1, &temp1_236X); v_237X = AVAILABLEp(space_233X); @@ -1363,26 +1363,26 @@ void s48_define_exported_binding(char *name_231X, long value_232X) arg2K0 = 1; arg0K1 = 0; arg0K2 = temp0_235X; - goto L14338;} + goto L14339;} else { arg2K0 = 0; arg0K1 = 0; arg0K2 = temp0_235X; - goto L14338;}}} - L14338: { + goto L14339;}}} + L14339: { okayP_238X = arg2K0; key_239X = arg0K1; temp_240X = arg0K2; if (okayP_238X) { arg0K0 = key_239X; arg0K1 = temp_240X; - goto L14319;} + goto L14320;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = key_239X; arg0K1 = temp_240X; - goto L14319;}} - L14319: { + goto L14320;}} + L14320: { key_241X = arg0K0; value_242X = arg0K1; name_243X = enter_string(name_231X, key_241X); @@ -1409,39 +1409,39 @@ long s48_add_channel(long mode_246X, long id_247X, long os_index_248X) if (v_249X) { arg2K0 = 1; arg0K1 = 0; - goto L14727;} + goto L14728;} else { collect_saving_temps(1, 1, &temp1_250X); v_251X = AVAILABLEp(6); if (v_251X) { arg2K0 = 1; arg0K1 = 0; - goto L14727;} + goto L14728;} else { arg2K0 = 0; arg0K1 = 0; - goto L14727;}}} - L14727: { + goto L14728;}}} + L14728: { okayP_252X = arg2K0; key_253X = arg0K1; if (okayP_252X) { arg0K0 = key_253X; - goto L14710;} + goto L14711;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = key_253X; - goto L14710;}} - L14710: { + goto L14711;}} + L14711: { v_254X = arg0K0; channel_255X = make_registered_channel((((mode_246X)>>2)), id_247X, os_index_248X, v_254X, &status_256X); if ((3 == (3 & channel_255X))) { if ((5 == (31 & ((((*((long *) ((((char *) (-3 + channel_255X))) + -4))))>>2))))) { return channel_255X;} else { - goto L14721;}} + goto L14722;}} else { - goto L14721;}} - L14721: { + goto L14722;}} + L14722: { return (((status_256X)<<2));} } long s48_get_imported_binding(char *name_257X) @@ -1462,29 +1462,29 @@ long s48_get_imported_binding(char *name_257X) if (v_259X) { arg2K0 = 1; arg0K1 = 0; - goto L15416;} + goto L15417;} else { collect_saving_temps(1, 1, &temp1_260X); v_261X = AVAILABLEp(space_258X); if (v_261X) { arg2K0 = 1; arg0K1 = 0; - goto L15416;} + goto L15417;} else { arg2K0 = 0; arg0K1 = 0; - goto L15416;}}} - L15416: { + goto L15417;}}} + L15417: { okayP_262X = arg2K0; key_263X = arg0K1; if (okayP_262X) { arg0K0 = key_263X; - goto L15403;} + goto L15404;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = key_263X; - goto L15403;}} - L15403: { + goto L15404;}} + L15404: { key_264X = arg0K0; name_265X = enter_string(name_257X, key_264X); return Hlookup2102((Sexported_bindingsS), name_265X, key_264X);} @@ -1497,16 +1497,16 @@ long s48_allocate_stob(long type_266X, long size_267X) char v_268X; { v_268X = AVAILABLEp(size_267X); if (v_268X) { - goto L15711;} + goto L15712;} else { collect_saving_temps(1, 1, &temp1_269X); v_270X = AVAILABLEp(size_267X); if (v_270X) { - goto L15711;} + goto L15712;} else { ps_error("Scheme48 heap overflow", 0); - goto L15711;}}} - L15711: { + goto L15712;}}} + L15712: { addr_271X = ALLOCATE_SPACE(type_266X, (4 + size_267X)); *((long *) addr_271X) = (2 + (((((((size_267X)<<6)) + type_266X))<<2))); return (3 + (((long) (addr_271X + 4))));} @@ -1593,25 +1593,25 @@ void s48_initialize_vm(char * stack_begin_272X, long stack_size_273X) if ((symbol_table_274X == 1)) { v_275X = AVAILABLEp(1025); if (v_275X) { - goto L15442;} + goto L15443;} else { collect_saving_temps(1, 1, &temp1_276X); v_277X = AVAILABLEp(1025); if (v_277X) { - goto L15442;} + goto L15443;} else { ps_error("Scheme48 heap overflow", 0); - goto L15442;}}} + goto L15443;}}} else { Sthe_symbol_tableS = symbol_table_274X; - goto L15834;}} - L15442: { + goto L15835;}} + L15443: { addr_278X = ALLOCATE_SPACE(2, 4100); *((long *) addr_278X) = 1048586; table_279X = 3 + (((long) (addr_278X + 4))); arg0K0 = 0; - goto L15517;} - L15834: { + goto L15518;} + L15835: { exported_bindings_280X = s48_initial_exported_bindings(); imported_bindings_281X = s48_initial_imported_bindings(); v_282X = AVAILABLEp(2050); @@ -1619,7 +1619,7 @@ void s48_initialize_vm(char * stack_begin_272X, long stack_size_273X) arg2K0 = 1; arg0K1 = imported_bindings_281X; arg0K2 = exported_bindings_280X; - goto L14420;} + goto L14421;} else { temp0_283X = collect_saving_temps(imported_bindings_281X, exported_bindings_280X, &temp1_284X); v_285X = AVAILABLEp(2050); @@ -1627,13 +1627,13 @@ void s48_initialize_vm(char * stack_begin_272X, long stack_size_273X) arg2K0 = 1; arg0K1 = temp0_283X; arg0K2 = temp1_284X; - goto L14420;} + goto L14421;} else { arg2K0 = 0; arg0K1 = temp0_283X; arg0K2 = temp1_284X; - goto L14420;}}} - L15517: { + goto L14421;}}} + L15518: { i_286X = arg0K0; if ((1024 == i_286X)) { Sthe_symbol_tableS = table_279X; @@ -1644,38 +1644,38 @@ void s48_initialize_vm(char * stack_begin_272X, long stack_size_273X) if ((maybe_289X == 1)) { ps_error("insufficient heap space to build symbol table", 0); arg0K0 = maybe_289X; - goto L15471;} + goto L15472;} else { arg0K0 = maybe_289X; - goto L15471;}} + goto L15472;}} else { arg0K0 = maybe_287X; - goto L15471;}} + goto L15472;}} else { addr_290X = (((char *) (-3 + table_279X))) + (((i_286X)<<2)); S48_WRITE_BARRIER(table_279X, addr_290X, 1); *((long *) addr_290X) = 1; arg0K0 = (1 + i_286X); - goto L15517;}} - L14420: { + goto L15518;}} + L14421: { okayP_291X = arg2K0; temp0_292X = arg0K1; temp1_293X = arg0K2; if (okayP_291X) { arg0K0 = temp0_292X; arg0K1 = temp1_293X; - goto L14381;} + goto L14382;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = temp0_292X; arg0K1 = temp1_293X; - goto L14381;}} - L15471: { + goto L14382;}} + L15472: { symbols_294X = arg0K0; n_295X = (((3 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + symbols_294X))) + -4))))>>8))))>>2); arg0K0 = 0; - goto L15538;} - L14381: { + goto L15539;} + L14382: { imported_bindings_296X = arg0K0; exported_bindings_297X = arg0K1; if ((1 == imported_bindings_296X)) { @@ -1683,14 +1683,14 @@ void s48_initialize_vm(char * stack_begin_272X, long stack_size_273X) *((long *) addr_298X) = 1048586; table_299X = 3 + (((long) (addr_298X + 4))); arg0K0 = 0; - goto L14482;} + goto L14483;} else { arg0K0 = imported_bindings_296X; - goto L14396;}} - L15538: { + goto L14397;}} + L15539: { i_300X = arg0K0; if ((i_300X == n_295X)) { - goto L15834;} + goto L15835;} else { table_301X = Sthe_symbol_tableS; foo_302X = *((long *) ((((char *) (-3 + symbols_294X))) + (((i_300X)<<2)))); @@ -1698,19 +1698,19 @@ void s48_initialize_vm(char * stack_begin_272X, long stack_size_273X) n_304X = -1 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + string_303X))) + -4))))>>8)); arg0K0 = 0; arg0K1 = 0; - goto L13005;}} - L14482: { + goto L13006;}} + L14483: { i_305X = arg0K0; if ((1024 == i_305X)) { arg0K0 = table_299X; - goto L14396;} + goto L14397;} else { addr_306X = (((char *) (-3 + table_299X))) + (((i_305X)<<2)); S48_WRITE_BARRIER(table_299X, addr_306X, 1); *((long *) addr_306X) = 1; arg0K0 = (1 + i_305X); - goto L14482;}} - L14396: { + goto L14483;}} + L14397: { v_307X = arg0K0; Simported_bindingsS = v_307X; if ((1 == exported_bindings_297X)) { @@ -1718,17 +1718,17 @@ void s48_initialize_vm(char * stack_begin_272X, long stack_size_273X) *((long *) addr_308X) = 1048586; table_309X = 3 + (((long) (addr_308X + 4))); arg0K0 = 0; - goto L14459;} + goto L14460;} else { arg0K0 = exported_bindings_297X; - goto L14409;}} - L13005: { + goto L14410;}} + L13006: { i_310X = arg0K0; h_311X = arg0K1; if ((i_310X < n_304X)) { arg0K0 = (1 + i_310X); arg0K1 = (h_311X + (((*((unsigned char *) ((((char *) (-3 + string_303X))) + i_310X)))))); - goto L13005;} + goto L13006;} else { index_312X = 1023 & h_311X; val_313X = *((long *) ((((char *) (-3 + table_301X))) + (((index_312X)<<2)))); @@ -1739,19 +1739,19 @@ void s48_initialize_vm(char * stack_begin_272X, long stack_size_273X) S48_WRITE_BARRIER(table_301X, addr_315X, foo_302X); *((long *) addr_315X) = foo_302X; arg0K0 = (1 + i_300X); - goto L15538;}} - L14459: { + goto L15539;}} + L14460: { i_316X = arg0K0; if ((1024 == i_316X)) { arg0K0 = table_309X; - goto L14409;} + goto L14410;} else { addr_317X = (((char *) (-3 + table_309X))) + (((i_316X)<<2)); S48_WRITE_BARRIER(table_309X, addr_317X, 1); *((long *) addr_317X) = 1; arg0K0 = (1 + i_316X); - goto L14459;}} - L14409: { + goto L14460;}} + L14410: { v_318X = arg0K0; Sexported_bindingsS = v_318X; if ((stack_size_273X < 8131)) { @@ -1760,16 +1760,16 @@ void s48_initialize_vm(char * stack_begin_272X, long stack_size_273X) ps_error("out of memory, unable to continue", 0); arg1K0 = stack_319X; arg0K1 = 8131; - goto L14928;} + goto L14929;} else { arg1K0 = stack_319X; arg0K1 = 8131; - goto L14928;}} + goto L14929;}} else { arg1K0 = stack_begin_272X; arg0K1 = stack_size_273X; - goto L14928;}} - L14928: { + goto L14929;}} + L14929: { start_320X = arg1K0; size_321X = arg0K1; Sstack_beginS = start_320X; @@ -1779,26 +1779,26 @@ void s48_initialize_vm(char * stack_begin_272X, long stack_size_273X) ScontS = 1; SenvS = 17; arg1K0 = start_320X; - goto L14960;} - L14960: { + goto L14961;} + L14961: { a_322X = arg1K0; if ((a_322X == (Sstack_endS))) { v_323X = AVAILABLEp(5); if (v_323X) { - goto L14977;} + goto L14978;} else { collect_saving_temps(1, 1, &temp1_324X); v_325X = AVAILABLEp(5); if (v_325X) { - goto L14977;} + goto L14978;} else { ps_error("Scheme48 heap overflow", 0); - goto L14977;}}} + goto L14978;}}} else { *((long *) a_322X) = 252645135; arg1K0 = (a_322X + 4); - goto L14960;}} - L14977: { + goto L14961;}} + L14978: { addr_326X = ALLOCATE_SPACE(17, 6); *((long *) addr_326X) = 582; addr_327X = ALLOCATE_SPACE(11, 12); @@ -1821,16 +1821,16 @@ void s48_initialize_vm(char * stack_begin_272X, long stack_size_273X) Sbottom_of_stackS = (ScontS); v_332X = AVAILABLEp(5); if (v_332X) { - goto L15156;} + goto L15157;} else { collect_saving_temps(1, 1, &temp1_333X); v_334X = AVAILABLEp(5); if (v_334X) { - goto L15156;} + goto L15157;} else { ps_error("Scheme48 heap overflow", 0); - goto L15156;}}} - L15156: { + goto L15157;}}} + L15157: { addr_335X = ALLOCATE_SPACE(17, 6); *((long *) addr_335X) = 582; addr_336X = ALLOCATE_SPACE(11, 12); @@ -2845,29 +2845,29 @@ long s48_restart(long proc_345X, long nargs_346X) if (v_370X) { arg2K0 = 1; arg0K1 = proc_345X; - goto L19375;} + goto L19376;} else { temp0_371X = collect_saving_temps(proc_345X, 1, &temp1_372X); v_373X = AVAILABLEp(2); if (v_373X) { arg2K0 = 1; arg0K1 = temp0_371X; - goto L19375;} + goto L19376;} else { arg2K0 = 0; arg0K1 = temp0_371X; - goto L19375;}}} - L19375: { + goto L19376;}}} + L19376: { okayP_374X = arg2K0; temp_375X = arg0K1; if (okayP_374X) { arg0K0 = temp_375X; - goto L19346;} + goto L19347;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = temp_375X; - goto L19346;}} - L19346: { + goto L19347;}} + L19347: { proc_376X = arg0K0; addr_377X = ALLOCATE_SPACE(17, 6); *((long *) addr_377X) = 582; @@ -2877,15 +2877,15 @@ long s48_restart(long proc_345X, long nargs_346X) Scode_pointerS = (((char *) (-3 + code_378X))); SvalS = proc_376X; arg1K0 = (Scode_pointerS); - goto L18438;} - L18438: { + goto L18439;} + L18439: { code_pointer_379X = arg1K0; switch ((*((unsigned char *) code_pointer_379X))) { case 0 : case 145 : { push_exception_continuationB(15, 1); arg0K0 = 0; - goto L16665;} + goto L16666;} break; case 1 : { count_380X = ((((*((unsigned char *) ((Scode_pointerS) + 1))))<<8)) + (*((unsigned char *) ((Scode_pointerS) + 2))); @@ -2896,73 +2896,73 @@ long s48_restart(long proc_345X, long nargs_346X) SenvS = (3 + (((long) ((SstackS) + 8)))); Scode_pointerS = ((Scode_pointerS) + 3); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 2 : { SvalS = (*((long *) ((((char *) (-3 + (StemplateS)))) + ((((((((*((unsigned char *) ((Scode_pointerS) + 1))))<<8)) + (*((unsigned char *) ((Scode_pointerS) + 2)))))<<2))))); Scode_pointerS = ((Scode_pointerS) + 3); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 3 : { SvalS = (*((long *) ((((char *) (-3 + (StemplateS)))) + ((((*((unsigned char *) ((Scode_pointerS) + 1))))<<2))))); Scode_pointerS = ((Scode_pointerS) + 3); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 4 : { back_381X = *((unsigned char *) ((Scode_pointerS) + 1)); env_382X = SenvS; arg0K0 = env_382X; arg0K1 = back_381X; - goto L23824;} + goto L23833;} break; case 5 : { SvalS = (*((long *) ((((char *) (-3 + (SenvS)))) + ((((*((unsigned char *) ((Scode_pointerS) + 1))))<<2))))); if ((529 == (SvalS))) { push_exception_continuationB(0, 2); arg0K0 = 0; - goto L16665;} + goto L16666;} else { Scode_pointerS = ((Scode_pointerS) + 2); arg1K0 = (Scode_pointerS); - goto L18438;}} + goto L18439;}} break; case 6 : { SvalS = (*((long *) ((((char *) (-3 + (*((long *) (((char *) (-3 + (SenvS))))))))) + ((((*((unsigned char *) ((Scode_pointerS) + 1))))<<2))))); if ((529 == (SvalS))) { push_exception_continuationB(0, 2); arg0K0 = 0; - goto L16665;} + goto L16666;} else { Scode_pointerS = ((Scode_pointerS) + 2); arg1K0 = (Scode_pointerS); - goto L18438;}} + goto L18439;}} break; case 7 : { SvalS = (*((long *) ((((char *) (-3 + (*((long *) (((char *) (-3 + (*((long *) (((char *) (-3 + (SenvS)))))))))))))) + ((((*((unsigned char *) ((Scode_pointerS) + 1))))<<2))))); if ((529 == (SvalS))) { push_exception_continuationB(0, 2); arg0K0 = 0; - goto L16665;} + goto L16666;} else { Scode_pointerS = ((Scode_pointerS) + 2); arg1K0 = (Scode_pointerS); - goto L18438;}} + goto L18439;}} break; case 8 : { back_383X = ((((*((unsigned char *) ((Scode_pointerS) + 1))))<<8)) + (*((unsigned char *) ((Scode_pointerS) + 2))); env_384X = SenvS; arg0K0 = env_384X; arg0K1 = back_383X; - goto L20247;} + goto L20248;} break; case 9 : { back_385X = ((((*((unsigned char *) ((Scode_pointerS) + 1))))<<8)) + (*((unsigned char *) ((Scode_pointerS) + 2))); env_386X = SenvS; arg0K0 = env_386X; arg0K1 = back_385X; - goto L20185;} + goto L20186;} break; case 10 : { location_387X = *((long *) ((((char *) (-3 + (StemplateS)))) + ((((((((*((unsigned char *) ((Scode_pointerS) + 1))))<<8)) + (*((unsigned char *) ((Scode_pointerS) + 2)))))<<2)))); @@ -2972,11 +2972,11 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = location_387X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} + goto L16666;} else { Scode_pointerS = ((Scode_pointerS) + 3); arg1K0 = (Scode_pointerS); - goto L18438;}} + goto L18439;}} break; case 11 : { location_388X = *((long *) ((((char *) (-3 + (StemplateS)))) + ((((((((*((unsigned char *) ((Scode_pointerS) + 1))))<<8)) + (*((unsigned char *) ((Scode_pointerS) + 2)))))<<2)))); @@ -2987,7 +2987,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { val_389X = SvalS; addr_390X = (((char *) (-3 + location_388X))) + 4; @@ -2996,7 +2996,7 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = 13; Scode_pointerS = ((Scode_pointerS) + 3); arg1K0 = (Scode_pointerS); - goto L18438;}} + goto L18439;}} break; case 12 : { v_391X = *((unsigned char *) ((Scode_pointerS) + 3)); @@ -3005,55 +3005,55 @@ long s48_restart(long proc_345X, long nargs_346X) if ((3 == (3 & p_392X))) { if ((p_392X < (((long) (Sstack_beginS))))) { arg0K0 = 0; - goto L20964;} + goto L20965;} else { if (((((long) (Sstack_endS))) < p_392X)) { arg0K0 = 0; - goto L20964;} + goto L20965;} else { arg0K0 = ((Sstack_endS) - (Sstack_beginS)); - goto L20964;}}} + goto L20965;}}} else { arg0K0 = 0; - goto L20964;}} + goto L20965;}} else { arg0K0 = (SvalS); - goto L20971;}} + goto L20972;}} break; case 13 : { total_count_393X = *((unsigned char *) ((Scode_pointerS) + 2)); space_394X = 1 + total_count_393X; v_395X = AVAILABLEp(space_394X); if (v_395X) { - goto L20766;} + goto L20767;} else { collect_saving_temps(1, 1, &temp1_396X); v_397X = AVAILABLEp(space_394X); if (v_397X) { - goto L20766;} + goto L20767;} else { ps_error("Scheme48 heap overflow", 0); - goto L20766;}}} + goto L20767;}}} break; case 14 : { *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 15 : { SvalS = (*((long *) ((((char *) (-3 + (SenvS)))) + ((((*((unsigned char *) ((Scode_pointerS) + 1))))<<2))))); if ((529 == (SvalS))) { push_exception_continuationB(0, 3); arg0K0 = 0; - goto L16665;} + goto L16666;} else { *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); Scode_pointerS = ((Scode_pointerS) + 3); arg1K0 = (Scode_pointerS); - goto L18438;}} + goto L18439;}} break; case 16 : { *((long *) (SstackS)) = (SvalS); @@ -3062,42 +3062,42 @@ long s48_restart(long proc_345X, long nargs_346X) if ((529 == (SvalS))) { push_exception_continuationB(0, 3); arg0K0 = 0; - goto L16665;} + goto L16666;} else { Scode_pointerS = ((Scode_pointerS) + 3); arg1K0 = (Scode_pointerS); - goto L18438;}} + goto L18439;}} break; case 17 : { SstackS = ((SstackS) + 4); SvalS = (*((long *) (SstackS))); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 18 : { SvalS = (*((long *) ((SstackS) + (4 + ((((*((unsigned char *) ((Scode_pointerS) + 1))))<<2)))))); Scode_pointerS = ((Scode_pointerS) + 2); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 19 : { *((long *) ((SstackS) + (4 + ((((*((unsigned char *) ((Scode_pointerS) + 1))))<<2))))) = (SvalS); Scode_pointerS = ((Scode_pointerS) + 2); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 20 : { push_continuationB(((Scode_pointerS) + (((((*((unsigned char *) ((Scode_pointerS) + 1))))<<8)) + (*((unsigned char *) ((Scode_pointerS) + 2))))), (*((unsigned char *) ((Scode_pointerS) + 3)))); Scode_pointerS = ((Scode_pointerS) + 4); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 21 : { push_continuationB(((Scode_pointerS) + (((((*((unsigned char *) ((Scode_pointerS) + 1))))<<8)) + (*((unsigned char *) ((Scode_pointerS) + 2))))), (((((*((unsigned char *) ((Scode_pointerS) + 3))))<<8)) + (*((unsigned char *) ((Scode_pointerS) + 4))))); Scode_pointerS = ((Scode_pointerS) + 5); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 22 : { space_398X = 1 + (((((Sstack_endS) - (SstackS)))>>2)); @@ -3105,18 +3105,18 @@ long s48_restart(long proc_345X, long nargs_346X) if (v_399X) { arg2K0 = 1; arg0K1 = 0; - goto L20692;} + goto L20693;} else { collect_saving_temps(1, 1, &temp1_400X); v_401X = AVAILABLEp(space_398X); if (v_401X) { arg2K0 = 1; arg0K1 = 0; - goto L20692;} + goto L20693;} else { arg2K0 = 0; arg0K1 = 0; - goto L20692;}}} + goto L20693;}}} break; case 23 : { cont_402X = *((long *) (((char *) (-3 + (Sbottom_of_stackS))))); @@ -3128,15 +3128,15 @@ long s48_restart(long proc_345X, long nargs_346X) copy_continuation_from_heapB_return_tag = 0; goto copy_continuation_from_heapB; copy_continuation_from_heapB_return_0: - goto L19847;} + goto L19848;} else { - goto L19882;}} + goto L19883;}} else { - goto L19882;}} + goto L19883;}} else { - goto L19848;}} + goto L19849;}} else { - goto L19848;}} + goto L19849;}} break; case 24 : { stack_arg_count_403X = *((unsigned char *) ((Scode_pointerS) + 1)); @@ -3155,35 +3155,35 @@ long s48_restart(long proc_345X, long nargs_346X) if (v_408X) { arg2K0 = 1; arg0K1 = 0; - goto L19208;} + goto L19209;} else { collect_saving_temps(1, 1, &temp1_409X); v_410X = AVAILABLEp(space_407X); if (v_410X) { arg2K0 = 1; arg0K1 = 0; - goto L19208;} + goto L19209;} else { arg2K0 = 0; arg0K1 = 0; - goto L19208;}}} + goto L19209;}}} else { - goto L19120;}} + goto L19121;}} else { arg0K0 = stack_arg_count_403X; - goto L16066;}} + goto L16067;}} else { arg0K0 = 3; arg0K1 = stack_arg_count_403X; arg0K2 = 25; arg0K3 = 0; - goto L17161;}} + goto L17162;}} else { arg0K0 = 3; arg0K1 = stack_arg_count_403X; arg0K2 = 25; arg0K3 = 0; - goto L17161;}} + goto L17162;}} break; case 25 : { stack_arg_count_411X = ((((*((unsigned char *) ((Scode_pointerS) + 1))))<<8)) + (*((unsigned char *) ((Scode_pointerS) + 2))); @@ -3191,19 +3191,19 @@ long s48_restart(long proc_345X, long nargs_346X) if ((3 == (3 & obj_412X))) { if ((3 == (31 & ((((*((long *) ((((char *) (-3 + obj_412X))) + -4))))>>2))))) { arg0K0 = stack_arg_count_411X; - goto L16066;} + goto L16067;} else { arg0K0 = 3; arg0K1 = stack_arg_count_411X; arg0K2 = 25; arg0K3 = 0; - goto L17161;}} + goto L17162;}} else { arg0K0 = 3; arg0K1 = stack_arg_count_411X; arg0K2 = 25; arg0K3 = 0; - goto L17161;}} + goto L17162;}} break; case 26 : { nargs_413X = *((unsigned char *) ((Scode_pointerS) + 1)); @@ -3211,7 +3211,7 @@ long s48_restart(long proc_345X, long nargs_346X) stob_415X = ScontS; arg1K0 = ((((char *) (-3 + stob_415X))) + -8); arg1K1 = (top_of_args_414X + (((nargs_413X)<<2))); - goto L17628;} + goto L17629;} break; case 27 : { SstackS = ((SstackS) + 4); @@ -3226,7 +3226,7 @@ long s48_restart(long proc_345X, long nargs_346X) arg0K0 = (((((*((unsigned char *) ((Scode_pointerS) + 1))))<<8)) + (*((unsigned char *) ((Scode_pointerS) + 2)))); arg0K1 = list_args_416X; arg0K2 = length_418X; - goto L17666;} + goto L17667;} else { *((long *) (SstackS)) = list_args_416X; SstackS = ((SstackS) + -4); @@ -3242,7 +3242,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = args_419X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} break; case 28 : { SstackS = ((SstackS) + 4); @@ -3256,16 +3256,16 @@ long s48_restart(long proc_345X, long nargs_346X) SstackS = ((SstackS) + 4); arg0K0 = (*((long *) (SstackS))); arg0K1 = (-2 + stack_nargs_420X); - goto L11273;} + goto L11274;} else { if ((25 == (*((long *) ((((char *) (-3 + rest_list_422X))) + 4))))) { arg0K0 = (*((long *) (((char *) (-3 + rest_list_422X))))); arg0K1 = (-1 + stack_nargs_420X); - goto L11273;} + goto L11274;} else { arg0K0 = (*((long *) ((((char *) (-3 + (*((long *) ((((char *) (-3 + rest_list_422X))) + 4)))))) + 4))); arg0K1 = rest_list_422X; - goto L11314;}}} + goto L11315;}}} break; case 29 : { SstackS = ((SstackS) + 4); @@ -3276,11 +3276,11 @@ long s48_restart(long proc_345X, long nargs_346X) copy_continuation_from_heapB_return_tag = 1; goto copy_continuation_from_heapB; copy_continuation_from_heapB_return_1: - goto L17571;} + goto L17572;} else { - goto L17578;}} + goto L17579;}} else { - goto L17578;}} + goto L17579;}} break; case 30 : { SstackS = ((SstackS) + 4); @@ -3292,32 +3292,32 @@ long s48_restart(long proc_345X, long nargs_346X) if ((3 == (3 & obj_425X))) { if ((3 == (31 & ((((*((long *) ((((char *) (-3 + obj_425X))) + -4))))>>2))))) { arg0K0 = 1; - goto L16066;} + goto L16067;} else { arg0K0 = 3; arg0K1 = 1; arg0K2 = 25; arg0K3 = 0; - goto L17161;}} + goto L17162;}} else { arg0K0 = 3; arg0K1 = 1; arg0K2 = 25; arg0K3 = 0; - goto L17161;}} + goto L17162;}} break; case 31 : { pop_continuationB_return_tag = 0; goto pop_continuationB; pop_continuationB_return_0: arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 32 : { arg0K0 = (((((*((unsigned char *) ((Scode_pointerS) + 1))))<<8)) + (*((unsigned char *) ((Scode_pointerS) + 2)))); arg0K1 = 25; arg0K2 = 0; - goto L20427;} + goto L20428;} break; case 33 : { SstackS = ((SstackS) + 4); @@ -3328,19 +3328,19 @@ long s48_restart(long proc_345X, long nargs_346X) arg0K0 = stack_nargs_427X; arg0K1 = (*((long *) (SstackS))); arg0K2 = ((((p_426X)>>2)) - stack_nargs_427X); - goto L20427;} + goto L20428;} break; case 34 : { Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 35 : { tem_428X = *((long *) ((((char *) (-3 + (StemplateS)))) + ((((((((*((unsigned char *) ((Scode_pointerS) + 1))))<<8)) + (*((unsigned char *) ((Scode_pointerS) + 2)))))<<2)))); StemplateS = tem_428X; Scode_pointerS = (((char *) (-3 + (*((long *) (((char *) (-3 + tem_428X)))))))); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 36 : { code_429X = *((long *) (((char *) (-3 + (*((long *) ((((char *) (-3 + (StemplateS)))) + ((((((((*((unsigned char *) ((Scode_pointerS) + 1))))<<8)) + (*((unsigned char *) ((Scode_pointerS) + 2)))))<<2))))))))); @@ -3351,20 +3351,20 @@ long s48_restart(long proc_345X, long nargs_346X) if (v_431X) { arg2K0 = 1; arg0K1 = 0; - goto L18944;} + goto L18945;} else { collect_saving_temps(1, 1, &temp1_432X); v_433X = AVAILABLEp(space_430X); if (v_433X) { arg2K0 = 1; arg0K1 = 0; - goto L18944;} + goto L18945;} else { arg2K0 = 0; arg0K1 = 0; - goto L18944;}}} + goto L18945;}}} else { - goto L18817;}} + goto L18818;}} else { v_434X = *((unsigned char *) ((((char *) (-3 + code_429X))) + 1)); if ((66 == v_434X)) { @@ -3372,44 +3372,44 @@ long s48_restart(long proc_345X, long nargs_346X) index_435X = -2 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + code_429X))) + -4))))>>8)); space_436X = ((((*((unsigned char *) ((((char *) (-3 + code_429X))) + index_435X))))<<8)) + (*((unsigned char *) ((((char *) (-3 + code_429X))) + (1 + index_435X)))); if ((space_436X < (64 + (((((SstackS) - (Sstack_limitS)))>>2))))) { - goto L18817;} + goto L18818;} else { space_437X = 1 + (((((Sstack_endS) - (SstackS)))>>2)); v_438X = AVAILABLEp(space_437X); if (v_438X) { arg2K0 = 1; arg0K1 = 0; - goto L19000;} + goto L19001;} else { collect_saving_temps(1, 1, &temp1_439X); v_440X = AVAILABLEp(space_437X); if (v_440X) { arg2K0 = 1; arg0K1 = 0; - goto L19000;} + goto L19001;} else { arg2K0 = 0; arg0K1 = 0; - goto L19000;}}}} + goto L19001;}}}} else { - goto L18862;}} + goto L18863;}} else { - goto L18862;}}} + goto L18863;}}} break; case 37 : { if ((1 == (SvalS))) { Scode_pointerS = ((Scode_pointerS) + (((((*((unsigned char *) ((Scode_pointerS) + 1))))<<8)) + (*((unsigned char *) ((Scode_pointerS) + 2))))); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { Scode_pointerS = ((Scode_pointerS) + 3); arg1K0 = (Scode_pointerS); - goto L18438;}} + goto L18439;}} break; case 38 : { Scode_pointerS = ((Scode_pointerS) + (((((*((unsigned char *) ((Scode_pointerS) + 1))))<<8)) + (*((unsigned char *) ((Scode_pointerS) + 2))))); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 39 : { if ((0 == (3 & (SvalS)))) { @@ -3417,20 +3417,20 @@ long s48_restart(long proc_345X, long nargs_346X) max_442X = *((unsigned char *) ((Scode_pointerS) + 1)); val_443X = ((p_441X)>>2); if ((val_443X < 0)) { - goto L18718;} + goto L18719;} else { if ((val_443X < max_442X)) { index_444X = 1 + (((val_443X)<<1)); arg0K0 = (((((*((unsigned char *) ((Scode_pointerS) + (1 + index_444X)))))<<8)) + (*((unsigned char *) ((Scode_pointerS) + (2 + index_444X))))); - goto L18720;} + goto L18721;} else { - goto L18718;}}} + goto L18719;}}} else { push_exception_continuationB(5, 0); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;}} + goto L16666;}} break; case 40 : { stack_nargs_445X = (((*((long *) ((SstackS) + 4))))>>2); @@ -3440,7 +3440,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = arg0_446X; SstackS = ((SstackS) + -4); SvalS = (*((long *) (((char *) (-3 + rest_list_447X))))); - goto L19750;} + goto L19751;} else { arg1_448X = *((long *) ((SstackS) + (4 + (((stack_nargs_445X)<<2))))); arg0_449X = *((long *) ((SstackS) + (8 + (((stack_nargs_445X)<<2))))); @@ -3449,7 +3449,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = arg0_449X; SstackS = ((SstackS) + -4); SvalS = arg1_448X; - goto L19750;}} + goto L19751;}} break; case 41 : { stack_nargs_450X = (((*((long *) ((SstackS) + 4))))>>2); @@ -3457,56 +3457,56 @@ long s48_restart(long proc_345X, long nargs_346X) rest_list_451X = *((long *) ((SstackS) + 8)); if ((25 == (*((long *) ((((char *) (-3 + rest_list_451X))) + 4))))) { arg0K0 = 1; - goto L18616;} + goto L18617;} else { *((long *) ((SstackS) + 8)) = (*((long *) ((((char *) (-3 + rest_list_451X))) + 4))); *((long *) ((SstackS) + 12)) = (SvalS); arg0K0 = -2; - goto L18616;}} + goto L18617;}} else { if ((stack_nargs_450X == 1)) { if ((25 == (*((long *) ((SstackS) + 8))))) { arg0K0 = 1; - goto L18616;} + goto L18617;} else { *((long *) ((SstackS) + 4)) = 0; *((long *) ((SstackS) + 12)) = (SvalS); arg0K0 = -2; - goto L18616;}} + goto L18617;}} else { *((long *) ((SstackS) + (8 + (((stack_nargs_450X)<<2))))) = (SvalS); arg0K0 = -2; - goto L18616;}}} + goto L18617;}}} break; case 42 : { if ((1 == (SvalS))) { Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { x_452X = (((*((long *) ((SstackS) + 4))))>>2); if ((x_452X == 0)) { rest_list_453X = *((long *) ((SstackS) + 8)); if ((25 == (*((long *) ((((char *) (-3 + rest_list_453X))) + 4))))) { arg0K0 = 1; - goto L19641;} + goto L19642;} else { *((long *) ((SstackS) + 8)) = (*((long *) ((((char *) (-3 + rest_list_453X))) + 4))); *((long *) ((SstackS) + 12)) = (*((long *) (((char *) (-3 + rest_list_453X))))); arg0K0 = -2; - goto L19641;}} + goto L19642;}} else { if ((x_452X == 1)) { if ((25 == (*((long *) ((SstackS) + 8))))) { arg0K0 = 1; - goto L19641;} + goto L19642;} else { *((long *) ((SstackS) + 4)) = 0; arg0K0 = -2; - goto L19641;}} + goto L19642;}} else { arg0K0 = -2; - goto L19641;}}}} + goto L19642;}}}} break; case 43 : { SstackS = ((SstackS) + 4); @@ -3514,77 +3514,77 @@ long s48_restart(long proc_345X, long nargs_346X) x_455X = SvalS; if ((arg2_454X == x_455X)) { arg0K0 = 5; - goto L38026;} + goto L38035;} else { arg0K0 = 1; - goto L38026;}} + goto L38035;}} break; case 44 : { x_456X = SvalS; if ((0 == (3 & x_456X))) { arg0K0 = 5; - goto L38038;} + goto L38047;} else { if ((3 == (3 & x_456X))) { if ((19 == (31 & ((((*((long *) ((((char *) (-3 + x_456X))) + -4))))>>2))))) { arg0K0 = 5; - goto L38038;} + goto L38047;} else { - goto L10622;}} + goto L10623;}} else { - goto L10622;}}} + goto L10623;}}} break; case 45 : { n_457X = SvalS; if ((0 == (3 & n_457X))) { - goto L28391;} + goto L28400;} else { if ((3 == (3 & n_457X))) { if ((19 == (31 & ((((*((long *) ((((char *) (-3 + n_457X))) + -4))))>>2))))) { - goto L28391;} + goto L28400;} else { - goto L28392;}} + goto L28401;}} else { - goto L28392;}}} + goto L28401;}}} break; case 46 : { n_458X = SvalS; if ((0 == (3 & n_458X))) { - goto L28548;} + goto L28557;} else { if ((3 == (3 & n_458X))) { if ((19 == (31 & ((((*((long *) ((((char *) (-3 + n_458X))) + -4))))>>2))))) { - goto L28548;} + goto L28557;} else { - goto L28523;}} + goto L28532;}} else { - goto L28523;}}} + goto L28532;}}} break; case 47 : { n_459X = SvalS; if ((0 == (3 & n_459X))) { - goto L28747;} + goto L28756;} else { if ((3 == (3 & n_459X))) { if ((19 == (31 & ((((*((long *) ((((char *) (-3 + n_459X))) + -4))))>>2))))) { - goto L28747;} + goto L28756;} else { - goto L28722;}} + goto L28731;}} else { - goto L28722;}}} + goto L28731;}}} break; case 48 : { n_460X = SvalS; if ((0 == (3 & n_460X))) { - goto L28946;} + goto L28955;} else { if ((3 == (3 & n_460X))) { if ((19 == (31 & ((((*((long *) ((((char *) (-3 + n_460X))) + -4))))>>2))))) { - goto L28946;} + goto L28955;} else { - goto L28921;}} + goto L28930;}} else { - goto L28921;}}} + goto L28930;}}} break; case 49 : { x_461X = SvalS; @@ -3592,13 +3592,13 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = 5; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = x_461X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;}} + goto L16666;}} break; case 50 : { x_462X = SvalS; @@ -3606,7 +3606,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_462X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} + goto L16666;} break; case 51 : { x_463X = SvalS; @@ -3614,7 +3614,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_463X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} + goto L16666;} break; case 52 : { SstackS = ((SstackS) + 4); @@ -3629,7 +3629,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = y_465X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { if ((z_466X < -536870912)) { push_exception_continuationB(5, 1); @@ -3638,12 +3638,12 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = y_465X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { SvalS = (((z_466X)<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;}}} + goto L18439;}}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = x_464X; @@ -3651,7 +3651,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = y_465X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} break; case 53 : { SstackS = ((SstackS) + 4); @@ -3662,10 +3662,10 @@ long s48_restart(long proc_345X, long nargs_346X) b_470X = ((x_468X)>>2); if ((a_469X < 0)) { arg0K0 = (0 - a_469X); - goto L6775;} + goto L6776;} else { arg0K0 = a_469X; - goto L6775;}} + goto L6776;}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_467X; @@ -3673,7 +3673,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_468X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} break; case 54 : { SstackS = ((SstackS) + 4); @@ -3688,7 +3688,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = y_472X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { if ((z_473X < -536870912)) { push_exception_continuationB(5, 1); @@ -3697,12 +3697,12 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = y_472X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { SvalS = (((z_473X)<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;}}} + goto L18439;}}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = x_471X; @@ -3710,7 +3710,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = y_472X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} break; case 55 : { SstackS = ((SstackS) + 4); @@ -3724,16 +3724,16 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_475X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { a_476X = ((arg2_474X)>>2); b_477X = ((x_475X)>>2); if ((a_476X < 0)) { arg0K0 = (0 - a_476X); - goto L7056;} + goto L7057;} else { arg0K0 = a_476X; - goto L7056;}}} + goto L7057;}}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_474X; @@ -3741,7 +3741,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_475X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} break; case 56 : { SstackS = ((SstackS) + 4); @@ -3750,10 +3750,10 @@ long s48_restart(long proc_345X, long nargs_346X) if ((0 == (3 & (arg2_478X | x_479X)))) { if ((arg2_478X == x_479X)) { arg0K0 = 5; - goto L31744;} + goto L31753;} else { arg0K0 = 1; - goto L31744;}} + goto L31753;}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_478X; @@ -3761,7 +3761,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_479X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} break; case 57 : { SstackS = ((SstackS) + 4); @@ -3770,10 +3770,10 @@ long s48_restart(long proc_345X, long nargs_346X) if ((0 == (3 & (arg2_480X | x_481X)))) { if ((arg2_480X < x_481X)) { arg0K0 = 5; - goto L31822;} + goto L31831;} else { arg0K0 = 1; - goto L31822;}} + goto L31831;}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_480X; @@ -3781,7 +3781,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_481X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} break; case 58 : { SstackS = ((SstackS) + 4); @@ -3790,10 +3790,10 @@ long s48_restart(long proc_345X, long nargs_346X) if ((0 == (3 & (arg2_482X | x_483X)))) { if ((x_483X < arg2_482X)) { arg0K0 = 5; - goto L31900;} + goto L31909;} else { arg0K0 = 1; - goto L31900;}} + goto L31909;}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_482X; @@ -3801,7 +3801,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_483X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} break; case 59 : { SstackS = ((SstackS) + 4); @@ -3810,10 +3810,10 @@ long s48_restart(long proc_345X, long nargs_346X) if ((0 == (3 & (arg2_484X | x_485X)))) { if ((x_485X < arg2_484X)) { arg0K0 = 1; - goto L31978;} + goto L31987;} else { arg0K0 = 5; - goto L31978;}} + goto L31987;}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_484X; @@ -3821,7 +3821,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_485X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} break; case 60 : { SstackS = ((SstackS) + 4); @@ -3830,10 +3830,10 @@ long s48_restart(long proc_345X, long nargs_346X) if ((0 == (3 & (arg2_486X | x_487X)))) { if ((arg2_486X < x_487X)) { arg0K0 = 1; - goto L32056;} + goto L32065;} else { arg0K0 = 5; - goto L32056;}} + goto L32065;}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_486X; @@ -3841,7 +3841,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_487X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} break; case 61 : { SstackS = ((SstackS) + 4); @@ -3855,16 +3855,16 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_489X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { a_490X = ((arg2_488X)>>2); b_491X = ((x_489X)>>2); if ((a_490X < 0)) { arg0K0 = (0 - a_490X); - goto L7233;} + goto L7234;} else { arg0K0 = a_490X; - goto L7233;}}} + goto L7234;}}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_488X; @@ -3872,7 +3872,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_489X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} break; case 62 : { SstackS = ((SstackS) + 4); @@ -3886,15 +3886,15 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = y_493X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { a_494X = ((x_492X)>>2); if ((a_494X < 0)) { arg0K0 = (0 - a_494X); - goto L25338;} + goto L25347;} else { arg0K0 = a_494X; - goto L25338;}}} + goto L25347;}}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = x_492X; @@ -3902,7 +3902,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = y_493X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} break; case 63 : { x_495X = SvalS; @@ -3910,13 +3910,13 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = x_495X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = x_495X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;}} + goto L16666;}} break; case 64 : { x_496X = SvalS; @@ -3924,13 +3924,13 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = x_496X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = x_496X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;}} + goto L16666;}} break; case 65 : { x_497X = SvalS; @@ -3938,13 +3938,13 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = 4; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = x_497X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;}} + goto L16666;}} break; case 66 : { x_498X = SvalS; @@ -3952,13 +3952,13 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = x_498X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = x_498X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;}} + goto L16666;}} break; case 67 : { x_499X = SvalS; @@ -3966,13 +3966,13 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = 0; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = x_499X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;}} + goto L16666;}} break; case 68 : { x_500X = SvalS; @@ -3980,7 +3980,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_500X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} + goto L16666;} break; case 69 : { x_501X = SvalS; @@ -3988,7 +3988,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_501X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} + goto L16666;} break; case 70 : { x_502X = SvalS; @@ -3996,7 +3996,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_502X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} + goto L16666;} break; case 71 : { x_503X = SvalS; @@ -4004,7 +4004,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_503X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} + goto L16666;} break; case 72 : { x_504X = SvalS; @@ -4012,7 +4012,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_504X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} + goto L16666;} break; case 73 : { x_505X = SvalS; @@ -4020,7 +4020,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_505X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} + goto L16666;} break; case 74 : { x_506X = SvalS; @@ -4028,7 +4028,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_506X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} + goto L16666;} break; case 75 : { x_507X = SvalS; @@ -4036,20 +4036,20 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_507X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} + goto L16666;} break; case 76 : { x_508X = SvalS; if ((0 == (3 & x_508X))) { if ((x_508X < 0)) { - goto L38295;} + goto L38304;} else { SvalS = 0; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;}} + goto L18439;}} else { - goto L38295;}} + goto L38304;}} break; case 77 : { n_509X = SvalS; @@ -4057,16 +4057,16 @@ long s48_restart(long proc_345X, long nargs_346X) n_510X = ((n_509X)>>2); if ((n_510X < 0)) { arg0K0 = (0 - n_510X); - goto L25624;} + goto L25633;} else { arg0K0 = n_510X; - goto L25624;}} + goto L25633;}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = n_509X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;}} + goto L16666;}} break; case 78 : { SstackS = ((SstackS) + 4); @@ -4078,7 +4078,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_512X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} break; case 79 : { SstackS = ((SstackS) + 4); @@ -4090,7 +4090,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_514X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} break; case 80 : { SstackS = ((SstackS) + 4); @@ -4102,7 +4102,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_516X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} break; case 81 : { x_517X = SvalS; @@ -4110,13 +4110,13 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = (~ (3 | x_517X)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = x_517X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;}} + goto L16666;}} break; case 82 : { SstackS = ((SstackS) + 4); @@ -4126,7 +4126,7 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = (arg2_518X & x_519X); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_518X; @@ -4134,7 +4134,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_519X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} break; case 83 : { SstackS = ((SstackS) + 4); @@ -4144,7 +4144,7 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = (arg2_520X | x_521X); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_520X; @@ -4152,7 +4152,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_521X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} break; case 84 : { SstackS = ((SstackS) + 4); @@ -4162,7 +4162,7 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = (arg2_522X ^ x_523X); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_522X; @@ -4170,7 +4170,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_523X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} break; case 85 : { SstackS = ((SstackS) + 4); @@ -4184,7 +4184,7 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = (((x_528X)<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { PS_SHIFT_LEFT(value_526X, count_527X, x_529X) result_530X = (((((x_529X)<<2)))>>2); @@ -4192,7 +4192,7 @@ long s48_restart(long proc_345X, long nargs_346X) if ((value_526X == x_531X)) { if ((value_526X < 0)) { if ((result_530X < 0)) { - goto L25903;} + goto L25912;} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = x_524X; @@ -4200,7 +4200,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = y_525X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} else { if ((result_530X < 0)) { push_exception_continuationB(5, 1); @@ -4209,9 +4209,9 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = y_525X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { - goto L25903;}}} + goto L25912;}}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = x_524X; @@ -4219,7 +4219,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = y_525X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}}} + goto L16666;}}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = x_524X; @@ -4227,16 +4227,16 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = y_525X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} break; case 86 : { x_532X = SvalS; if ((9 == (255 & x_532X))) { arg0K0 = 5; - goto L38383;} + goto L38392;} else { arg0K0 = 1; - goto L38383;}} + goto L38392;}} break; case 87 : { SstackS = ((SstackS) + 4); @@ -4246,14 +4246,14 @@ long s48_restart(long proc_345X, long nargs_346X) x_534X = SvalS; if ((arg2_533X == x_534X)) { arg0K0 = 5; - goto L28166;} + goto L28175;} else { arg0K0 = 1; - goto L28166;}} + goto L28175;}} else { - goto L28139;}} + goto L28148;}} else { - goto L28139;}} + goto L28148;}} break; case 88 : { SstackS = ((SstackS) + 4); @@ -4263,56 +4263,56 @@ long s48_restart(long proc_345X, long nargs_346X) x_536X = SvalS; if ((arg2_535X < x_536X)) { arg0K0 = 5; - goto L28076;} + goto L28085;} else { arg0K0 = 1; - goto L28076;}} + goto L28085;}} else { - goto L28049;}} + goto L28058;}} else { - goto L28049;}} + goto L28058;}} break; case 89 : { if ((9 == (255 & (SvalS)))) { SvalS = (((((((((SvalS))>>8)))))<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;}} + goto L16666;}} break; case 90 : { if ((0 == (3 & (SvalS)))) { x_537X = (((SvalS))>>2); if ((255 < x_537X)) { - goto L32748;} + goto L32757;} else { if ((x_537X < 0)) { - goto L32748;} + goto L32757;} else { SvalS = (9 + (((((x_537X)))<<8))); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;}}} + goto L18439;}}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;}} + goto L16666;}} break; case 91 : { x_538X = SvalS; if ((21 == x_538X)) { arg0K0 = 5; - goto L38412;} + goto L38421;} else { arg0K0 = 1; - goto L38412;}} + goto L38421;}} break; case 92 : { x_539X = SvalS; @@ -4320,13 +4320,13 @@ long s48_restart(long proc_345X, long nargs_346X) if ((3 == (3 & x_539X))) { if (((31 & ((((*((long *) ((((char *) (-3 + x_539X))) + -4))))>>2))) == type_540X)) { arg0K0 = 5; - goto L38426;} + goto L38435;} else { arg0K0 = 1; - goto L38426;}} + goto L38435;}} else { arg0K0 = 1; - goto L38426;}} + goto L38435;}} break; case 93 : { stob_541X = SvalS; @@ -4336,26 +4336,26 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = (-4 & (3 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + stob_541X))) + -4))))>>8)))); Scode_pointerS = ((Scode_pointerS) + 2); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { - goto L21229;}} + goto L21230;}} else { - goto L21229;}} + goto L21230;}} break; case 94 : { len_543X = *((unsigned char *) ((Scode_pointerS) + 1)); space_544X = 4 + (((len_543X)<<2)); v_545X = AVAILABLEp(space_544X); if (v_545X) { - goto L21301;} + goto L21302;} else { collect_saving_temps(1, 1, &temp1_546X); v_547X = AVAILABLEp(space_544X); if (v_547X) { - goto L21301;} + goto L21302;} else { ps_error("Scheme48 heap overflow", 0); - goto L21301;}}} + goto L21302;}}} break; case 95 : { SstackS = ((SstackS) + 4); @@ -4363,15 +4363,15 @@ long s48_restart(long proc_345X, long nargs_346X) space_549X = 4 + (((len_548X)<<2)); v_550X = AVAILABLEp(space_549X); if (v_550X) { - goto L21483;} + goto L21484;} else { collect_saving_temps(1, 1, &temp1_551X); v_552X = AVAILABLEp(space_549X); if (v_552X) { - goto L21483;} + goto L21484;} else { ps_error("Scheme48 heap overflow", 0); - goto L21483;}}} + goto L21484;}}} break; case 96 : { stob_553X = SvalS; @@ -4382,11 +4382,11 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = (*((long *) ((((char *) (-3 + stob_553X))) + (((offset_554X)<<2))))); Scode_pointerS = ((Scode_pointerS) + 3); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { - goto L21693;}} + goto L21694;}} else { - goto L21693;}} + goto L21694;}} break; case 97 : { SstackS = ((SstackS) + 4); @@ -4404,15 +4404,15 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = 13; Scode_pointerS = ((Scode_pointerS) + 3); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { - goto L21796;}} + goto L21797;}} else { - goto L21796;}} + goto L21797;}} else { - goto L21796;}} + goto L21797;}} else { - goto L21796;}} + goto L21797;}} break; case 98 : { SstackS = ((SstackS) + 4); @@ -4423,27 +4423,27 @@ long s48_restart(long proc_345X, long nargs_346X) len_564X = ((len_561X)>>2); size_565X = 1 + len_564X; if ((len_564X < 0)) { - goto L21981;} + goto L21982;} else { if ((4194305 < size_565X)) { - goto L21981;} + goto L21982;} else { v_566X = AVAILABLEp(size_565X); if (v_566X) { arg2K0 = 1; arg0K1 = init_562X; - goto L21999;} + goto L22000;} else { temp0_567X = collect_saving_temps(init_562X, 1, &temp1_568X); v_569X = AVAILABLEp(size_565X); if (v_569X) { arg2K0 = 1; arg0K1 = temp0_567X; - goto L21999;} + goto L22000;} else { arg2K0 = 0; arg0K1 = temp0_567X; - goto L21999;}}}}} + goto L22000;}}}}} else { push_exception_continuationB(5, 2); *((long *) (SstackS)) = (((type_563X)<<2)); @@ -4453,7 +4453,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = init_562X; SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16665;}} + goto L16666;}} break; case 99 : { SstackS = ((SstackS) + 4); @@ -4466,21 +4466,21 @@ long s48_restart(long proc_345X, long nargs_346X) len_573X = (((3 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + stob_570X))) + -4))))>>8))))>>2); index_574X = ((index_571X)>>2); if ((index_574X < 0)) { - goto L22277;} + goto L22278;} else { if ((index_574X < len_573X)) { SvalS = (*((long *) ((((char *) (-3 + stob_570X))) + (-4 & index_571X)))); Scode_pointerS = ((Scode_pointerS) + 2); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { - goto L22277;}}} + goto L22278;}}} else { - goto L22254;}} + goto L22255;}} else { - goto L22254;}} + goto L22255;}} else { - goto L22254;}} + goto L22255;}} break; case 100 : { SstackS = ((SstackS) + 4); @@ -4497,7 +4497,7 @@ long s48_restart(long proc_345X, long nargs_346X) len_579X = (((3 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + stob_576X))) + -4))))>>8))))>>2); index_580X = ((arg2_575X)>>2); if ((index_580X < 0)) { - goto L22517;} + goto L22518;} else { if ((index_580X < len_579X)) { addr_581X = (((char *) (-3 + stob_576X))) + (-4 & arg2_575X); @@ -4506,19 +4506,19 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = 13; Scode_pointerS = ((Scode_pointerS) + 2); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { - goto L22517;}}} + goto L22518;}}} else { - goto L22492;}} + goto L22493;}} else { - goto L22492;}} + goto L22493;}} else { - goto L22492;}} + goto L22493;}} else { - goto L22492;}} + goto L22493;}} else { - goto L22492;}} + goto L22493;}} break; case 101 : { SstackS = ((SstackS) + 4); @@ -4528,19 +4528,19 @@ long s48_restart(long proc_345X, long nargs_346X) init_584X = (((SvalS))>>2); size_585X = 1 + ((((3 + len_583X))>>2)); if ((len_583X < 0)) { - goto L26074;} + goto L26083;} else { if ((4194305 < size_585X)) { - goto L26074;} + goto L26083;} else { v_586X = AVAILABLEp(size_585X); if (v_586X) { - goto L26166;} + goto L26175;} else { collect_saving_temps(1, 1, &temp1_587X); v_588X = AVAILABLEp(size_585X); if (v_588X) { - goto L26166;} + goto L26175;} else { push_exception_continuationB(8, 1); *((long *) (SstackS)) = (((len_583X)<<2)); @@ -4548,7 +4548,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (((init_584X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}}}}} + goto L16666;}}}}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_582X; @@ -4556,7 +4556,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} break; case 102 : { obj_589X = SvalS; @@ -4565,11 +4565,11 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = (((((long)(((unsigned long)(*((long *) ((((char *) (-3 + (SvalS)))) + -4))))>>8)))<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { - goto L36239;}} + goto L36248;}} else { - goto L36239;}} + goto L36248;}} break; case 103 : { SstackS = ((SstackS) + 4); @@ -4580,21 +4580,21 @@ long s48_restart(long proc_345X, long nargs_346X) index_591X = (((SvalS))>>2); len_592X = (long)(((unsigned long)(*((long *) ((((char *) (-3 + arg2_590X))) + -4))))>>8); if ((index_591X < 0)) { - goto L32854;} + goto L32863;} else { if ((index_591X < len_592X)) { SvalS = ((((*((unsigned char *) ((((char *) (-3 + arg2_590X))) + index_591X))))<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { - goto L32854;}}} + goto L32863;}}} else { - goto L35818;}} + goto L35827;}} else { - goto L35818;}} + goto L35827;}} else { - goto L35818;}} + goto L35827;}} break; case 104 : { SstackS = ((SstackS) + 4); @@ -4610,26 +4610,26 @@ long s48_restart(long proc_345X, long nargs_346X) if ((0 == (128 & (*((long *) ((((char *) (-3 + arg3_594X))) + -4)))))) { len_597X = (long)(((unsigned long)(*((long *) ((((char *) (-3 + arg3_594X))) + -4))))>>8); if ((index_595X < 0)) { - goto L29802;} + goto L29811;} else { if ((index_595X < len_597X)) { *((unsigned char *) ((((char *) (-3 + arg3_594X))) + index_595X)) = Kchar_596X; SvalS = 13; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { - goto L29802;}}} + goto L29811;}}} else { - goto L29781;}} + goto L29790;}} else { - goto L29781;}} + goto L29790;}} else { - goto L34230;}} + goto L34239;}} else { - goto L34230;}} + goto L34239;}} else { - goto L34230;}} + goto L34239;}} break; case 105 : { SstackS = ((SstackS) + 4); @@ -4640,19 +4640,19 @@ long s48_restart(long proc_345X, long nargs_346X) init_600X = ((((SvalS))>>8)); size_601X = 1 + ((((4 + len_599X))>>2)); if ((len_599X < 0)) { - goto L26308;} + goto L26317;} else { if ((4194305 < size_601X)) { - goto L26308;} + goto L26317;} else { v_602X = AVAILABLEp(size_601X); if (v_602X) { - goto L26400;} + goto L26409;} else { collect_saving_temps(1, 1, &temp1_603X); v_604X = AVAILABLEp(size_601X); if (v_604X) { - goto L26400;} + goto L26409;} else { push_exception_continuationB(8, 1); *((long *) (SstackS)) = (((len_599X)<<2)); @@ -4660,11 +4660,11 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (9 + ((((init_600X))<<8))); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}}}}} + goto L16666;}}}}} else { - goto L32935;}} + goto L32944;}} else { - goto L32935;}} + goto L32944;}} break; case 106 : { obj_605X = SvalS; @@ -4673,11 +4673,11 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = (-4 + (((((long)(((unsigned long)(*((long *) ((((char *) (-3 + (SvalS)))) + -4))))>>8)))<<2))); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { - goto L36289;}} + goto L36298;}} else { - goto L36289;}} + goto L36298;}} break; case 107 : { SstackS = ((SstackS) + 4); @@ -4688,21 +4688,21 @@ long s48_restart(long proc_345X, long nargs_346X) index_607X = (((SvalS))>>2); len_608X = -1 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + arg2_606X))) + -4))))>>8)); if ((index_607X < 0)) { - goto L32998;} + goto L33007;} else { if ((index_607X < len_608X)) { SvalS = (9 + ((((((*((unsigned char *) ((((char *) (-3 + arg2_606X))) + index_607X))))))<<8))); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { - goto L32998;}}} + goto L33007;}}} else { - goto L35914;}} + goto L35923;}} else { - goto L35914;}} + goto L35923;}} else { - goto L35914;}} + goto L35923;}} break; case 108 : { SstackS = ((SstackS) + 4); @@ -4719,41 +4719,41 @@ long s48_restart(long proc_345X, long nargs_346X) if ((0 == (128 & (*((long *) ((((char *) (-3 + arg3_610X))) + -4)))))) { len_613X = -1 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + arg3_610X))) + -4))))>>8)); if ((index_611X < 0)) { - goto L29957;} + goto L29966;} else { if ((index_611X < len_613X)) { *((unsigned char *) ((((char *) (-3 + arg3_610X))) + index_611X)) = (Kchar_612X); SvalS = 13; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { - goto L29957;}}} + goto L29966;}}} else { - goto L29936;}} + goto L29945;}} else { - goto L29936;}} + goto L29945;}} else { - goto L34356;}} + goto L34365;}} else { - goto L34356;}} + goto L34365;}} else { - goto L34356;}} + goto L34365;}} else { - goto L34356;}} + goto L34365;}} break; case 109 : { v_614X = AVAILABLEp(3); if (v_614X) { - goto L24478;} + goto L24487;} else { collect_saving_temps(1, 1, &temp1_615X); v_616X = AVAILABLEp(3); if (v_616X) { - goto L24478;} + goto L24487;} else { ps_error("Scheme48 heap overflow", 0); - goto L24478;}}} + goto L24487;}}} break; case 110 : { obj_617X = SvalS; @@ -4764,17 +4764,17 @@ long s48_restart(long proc_345X, long nargs_346X) if ((17 == (255 & descriptor_619X))) { if ((529 == (*((long *) ((((char *) (-3 + x_618X))) + 4))))) { arg0K0 = 5; - goto L33976;} + goto L33985;} else { arg0K0 = 1; - goto L33976;}} + goto L33985;}} else { arg0K0 = 5; - goto L33976;}} + goto L33985;}} else { - goto L33957;}} + goto L33966;}} else { - goto L33957;}} + goto L33966;}} break; case 111 : { SstackS = ((SstackS) + 4); @@ -4783,112 +4783,112 @@ long s48_restart(long proc_345X, long nargs_346X) if ((4 == (31 & ((((*((long *) ((((char *) (-3 + arg2_620X))) + -4))))>>2))))) { x_621X = SvalS; if ((1 == x_621X)) { - goto L29544;} + goto L29553;} else { if ((5 == x_621X)) { - goto L29544;} + goto L29553;} else { - goto L29551;}}} + goto L29560;}}} else { - goto L29551;}} + goto L29560;}} else { - goto L29551;}} + goto L29560;}} break; case 112 : { x_622X = SvalS; if ((3 == (3 & x_622X))) { if ((0 == (128 & (*((long *) ((((char *) (-3 + x_622X))) + -4)))))) { arg0K0 = 1; - goto L38498;} + goto L38507;} else { arg0K0 = 5; - goto L38498;}} + goto L38507;}} else { arg0K0 = 5; - goto L38498;}} + goto L38507;}} break; case 113 : { x_623X = SvalS; if ((3 == (3 & x_623X))) { if ((0 == (128 & (*((long *) ((((char *) (-3 + x_623X))) + -4)))))) { *((long *) ((((char *) (-3 + x_623X))) + -4)) = (128 | (*((long *) ((((char *) (-3 + x_623X))) + -4)))); - goto L33080;} + goto L33089;} else { - goto L33080;}} + goto L33089;}} else { - goto L33080;}} + goto L33089;}} break; case 114 : { v_624X = AVAILABLEp(72); if (v_624X) { arg2K0 = 1; arg0K1 = 0; - goto L33131;} + goto L33140;} else { collect_saving_temps(1, 1, &temp1_625X); v_626X = AVAILABLEp(72); if (v_626X) { arg2K0 = 1; arg0K1 = 0; - goto L33131;} + goto L33140;} else { arg2K0 = 0; arg0K1 = 0; - goto L33131;}}} + goto L33140;}}} break; case 115 : { v_627X = AVAILABLEp(66); if (v_627X) { arg2K0 = 1; arg0K1 = 0; - goto L34474;} + goto L34483;} else { collect_saving_temps(1, 1, &temp1_628X); v_629X = AVAILABLEp(66); if (v_629X) { arg2K0 = 1; arg0K1 = 0; - goto L34474;} + goto L34483;} else { arg2K0 = 0; arg0K1 = 0; - goto L34474;}}} + goto L34483;}}} break; case 116 : { v_630X = AVAILABLEp(66); if (v_630X) { arg2K0 = 1; arg0K1 = 0; - goto L37343;} + goto L37352;} else { collect_saving_temps(1, 1, &temp1_631X); v_632X = AVAILABLEp(66); if (v_632X) { arg2K0 = 1; arg0K1 = 0; - goto L37343;} + goto L37352;} else { arg2K0 = 0; arg0K1 = 0; - goto L37343;}}} + goto L37352;}}} break; case 117 : { v_633X = AVAILABLEp(66); if (v_633X) { arg2K0 = 1; arg0K1 = 0; - goto L37603;} + goto L37612;} else { collect_saving_temps(1, 1, &temp1_634X); v_635X = AVAILABLEp(66); if (v_635X) { arg2K0 = 1; arg0K1 = 0; - goto L37603;} + goto L37612;} else { arg2K0 = 0; arg0K1 = 0; - goto L37603;}}} + goto L37612;}}} break; case 118 : { obj_636X = SvalS; @@ -4902,7 +4902,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) addr_639X) = 1; n_640X = ps_abort_fd_op(((((*((long *) ((((char *) (-3 + channel_637X))) + 8))))>>2))); arg0K0 = (((n_640X)<<2)); - goto L33202;} + goto L33211;} else { if ((channel_637X == head_638X)) { channel_641X = Spending_channels_headS; @@ -4913,43 +4913,43 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) addr_643X) = 1; if ((1 == next_642X)) { Spending_channels_tailS = 1; - goto L8173;} + goto L8174;} else { - goto L8173;}} + goto L8174;}} else { arg0K0 = (*((long *) ((((char *) (-3 + head_638X))) + 12))); arg0K1 = head_638X; - goto L8179;}}} + goto L8180;}}} else { - goto L33185;}} + goto L33194;}} else { - goto L33185;}} + goto L33194;}} break; case 119 : { space_644X = 3 * (Snumber_of_channelsS); v_645X = AVAILABLEp(space_644X); if (v_645X) { - goto L14777;} + goto L14778;} else { collect_saving_temps(1, 1, &temp1_646X); v_647X = AVAILABLEp(space_644X); if (v_647X) { - goto L14777;} + goto L14778;} else { ps_error("Scheme48 heap overflow", 0); - goto L14777;}}} + goto L14778;}}} break; case 120 : { SvalS = 529; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 121 : { SvalS = 13; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 122 : { x_648X = SvalS; @@ -4957,44 +4957,44 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_648X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} + goto L16666;} break; case 123 : { SvalS = 1; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 124 : { SvalS = 21; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 125 : { v_649X = AVAILABLEp(66); if (v_649X) { arg2K0 = 1; arg0K1 = 0; - goto L34575;} + goto L34584;} else { collect_saving_temps(1, 1, &temp1_650X); v_651X = AVAILABLEp(66); if (v_651X) { arg2K0 = 1; arg0K1 = 0; - goto L34575;} + goto L34584;} else { arg2K0 = 0; arg0K1 = 0; - goto L34575;}}} + goto L34584;}}} break; case 126 : { SvalS = 13; collect_saving_temps(0, 0, &v_652X); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 127 : { obj_653X = SvalS; @@ -5004,24 +5004,24 @@ long s48_restart(long proc_345X, long nargs_346X) n_655X = -1 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + x_654X))) + -4))))>>8)); arg0K0 = 0; arg0K1 = 0; - goto L35407;} + goto L35416;} else { - goto L35384;}} + goto L35393;}} else { - goto L35384;}} + goto L35393;}} break; case 128 : { v_656X = AVAILABLEp(6); if (v_656X) { - goto L38564;} + goto L38573;} else { collect_saving_temps(1, 1, &temp1_657X); v_658X = AVAILABLEp(6); if (v_658X) { - goto L38564;} + goto L38573;} else { ps_error("Scheme48 heap overflow", 0); - goto L38564;}}} + goto L38573;}}} break; case 129 : { SstackS = ((SstackS) + 4); @@ -5033,34 +5033,34 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = (-4 & other_661X); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { if ((0 == key_660X)) { x_662X = s48_available(); SvalS = (((x_662X)<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { if ((1 == key_660X)) { bytes_663X = s48_heap_size(); SvalS = (-4 & (3 + bytes_663X)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { if ((2 == key_660X)) { SvalS = (((((Sstack_endS) - (Sstack_beginS)))<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { if ((3 == key_660X)) { x_664X = s48_gc_count(); SvalS = (((x_664X)<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { if ((4 == key_660X)) { push_exception_continuationB(15, 1); @@ -5069,7 +5069,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = other_661X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { push_exception_continuationB(18, 1); *((long *) (SstackS)) = (((key_660X)<<2)); @@ -5077,7 +5077,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = other_661X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}}}}}}} + goto L16666;}}}}}}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_659X; @@ -5085,69 +5085,69 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} break; case 130 : { if ((0 == (3 & (SvalS)))) { type_665X = (((SvalS))>>2); arg2K0 = 1; - goto L33293;} + goto L33302;} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;}} + goto L16666;}} break; case 131 : { x_666X = SvalS; arg2K0 = 1; arg0K1 = x_666X; - goto L38614;} + goto L38623;} break; case 132 : { SvalS = (Scurrent_threadS); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 133 : { Scurrent_threadS = (SvalS); SvalS = 13; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 134 : { SvalS = (Ssession_dataS); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 135 : { Ssession_dataS = (SvalS); SvalS = 13; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 136 : { obj_667X = SvalS; if ((3 == (3 & obj_667X))) { if ((2 == (31 & ((((*((long *) ((((char *) (-3 + obj_667X))) + -4))))>>2))))) { if ((((((3 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + (SvalS)))) + -4))))>>8))))>>2)) < 160)) { - goto L20570;} + goto L20571;} else { temp_668X = Sexception_handlersS; Sexception_handlersS = (SvalS); SvalS = temp_668X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;}} + goto L18439;}} else { - goto L20570;}} + goto L20571;}} else { - goto L20570;}} + goto L20571;}} break; case 137 : { SstackS = ((SstackS) + 4); @@ -5160,25 +5160,25 @@ long s48_restart(long proc_345X, long nargs_346X) StemplateS = template_670X; Scode_pointerS = ((((char *) (-3 + (*((long *) (((char *) (-3 + template_670X)))))))) + ((((((((((p_669X)>>2)) + (((p_671X)>>2))))<<2)))>>2))); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} break; case 138 : { obj_672X = SvalS; if ((3 == (3 & obj_672X))) { if ((2 == (31 & ((((*((long *) ((((char *) (-3 + obj_672X))) + -4))))>>2))))) { if ((((((3 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + (SvalS)))) + -4))))>>8))))>>2)) < 5)) { - goto L19494;} + goto L19495;} else { temp_673X = Sinterrupt_handlersS; Sinterrupt_handlersS = (SvalS); SvalS = temp_673X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;}} + goto L18439;}} else { - goto L19494;}} + goto L19495;}} else { - goto L19494;}} + goto L19495;}} break; case 139 : { old_674X = Senabled_interruptsS; @@ -5188,12 +5188,12 @@ long s48_restart(long proc_345X, long nargs_346X) s48_Spending_interruptPS = 0; if ((s48_Spending_eventsPS)) { s48_Spending_interruptPS = 1; - goto L38655;} + goto L38664;} else { - goto L38655;}} + goto L38664;}} else { s48_Spending_interruptPS = 1; - goto L38655;}} + goto L38664;}} break; case 140 : { SstackS = ((SstackS) + 4); @@ -5203,12 +5203,12 @@ long s48_restart(long proc_345X, long nargs_346X) s48_Spending_interruptPS = 0; if ((s48_Spending_eventsPS)) { s48_Spending_interruptPS = 1; - goto L18452;} + goto L18453;} else { - goto L18452;}} + goto L18453;}} else { s48_Spending_interruptPS = 1; - goto L18452;}} + goto L18453;}} break; case 141 : { if ((0 == (3 & (SvalS)))) { @@ -5218,18 +5218,18 @@ long s48_restart(long proc_345X, long nargs_346X) s48_Spending_interruptPS = 0; if ((s48_Spending_eventsPS)) { s48_Spending_interruptPS = 1; - goto L37163;} + goto L37172;} else { - goto L37163;}} + goto L37172;}} else { s48_Spending_interruptPS = 1; - goto L37163;}} + goto L37172;}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;}} + goto L16666;}} break; case 142 : { SstackS = ((SstackS) + 4); @@ -5237,14 +5237,14 @@ long s48_restart(long proc_345X, long nargs_346X) if ((0 == (3 & arg2_678X))) { x_679X = SvalS; if ((1 == x_679X)) { - goto L34103;} + goto L34112;} else { if ((5 == x_679X)) { - goto L34103;} + goto L34112;} else { - goto L34108;}}} + goto L34117;}}} else { - goto L34108;}} + goto L34117;}} break; case 143 : { SstackS = ((SstackS) + 4); @@ -5253,33 +5253,35 @@ long s48_restart(long proc_345X, long nargs_346X) p_681X = *((long *) (SstackS)); SstackS = ((SstackS) + 4); rest_list_682X = *((long *) (SstackS)); - if ((12 < nargs_680X)) { - push_exception_continuationB(20, (1 + (*((long *) ((SstackS) + (-4 & p_681X)))))); + if ((14 < nargs_680X)) { + push_exception_continuationB(20, 1); + *((long *) (SstackS)) = (*((long *) ((SstackS) + (-4 & p_681X)))); + SstackS = ((SstackS) + -4); *((long *) (SstackS)) = nargs_680X; SstackS = ((SstackS) + -4); - arg0K0 = 1; - goto L16665;} + arg0K0 = 2; + goto L16666;} else { arg0K0 = rest_list_682X; - goto L22787;}} + goto L22790;}} break; case 144 : { v_683X = AVAILABLEp(5); if (v_683X) { arg2K0 = 1; arg0K1 = 0; - goto L33402;} + goto L33411;} else { collect_saving_temps(1, 1, &temp1_684X); v_685X = AVAILABLEp(5); if (v_685X) { arg2K0 = 1; arg0K1 = 0; - goto L33402;} + goto L33411;} else { arg2K0 = 0; arg0K1 = 0; - goto L33402;}}} + goto L33411;}}} break; case 146 : { SstackS = ((SstackS) + 4); @@ -5288,16 +5290,16 @@ long s48_restart(long proc_345X, long nargs_346X) if ((16 == (31 & ((((*((long *) ((((char *) (-3 + arg2_686X))) + -4))))>>2))))) { x_687X = SvalS; if ((1 == x_687X)) { - goto L23905;} + goto L23914;} else { if ((5 == x_687X)) { - goto L23905;} + goto L23914;} else { - goto L23910;}}} + goto L23919;}}} else { - goto L23910;}} + goto L23919;}} else { - goto L23910;}} + goto L23919;}} break; case 147 : { SstackS = ((SstackS) + 4); @@ -5310,21 +5312,21 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = (((x_691X)<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { if ((0 == option_689X)) { seconds_692X = s48_run_time(&mseconds_693X); arg0K0 = option_689X; arg0K1 = seconds_692X; arg0K2 = mseconds_693X; - goto L35318;} + goto L35327;} else { if ((1 == option_689X)) { seconds_694X = s48_real_time(&mseconds_695X); arg0K0 = option_689X; arg0K1 = seconds_694X; arg0K2 = mseconds_695X; - goto L35318;} + goto L35327;} else { push_exception_continuationB(18, 1); *((long *) (SstackS)) = (((option_689X)<<2)); @@ -5332,7 +5334,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = other_690X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}}}} + goto L16666;}}}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_688X; @@ -5340,7 +5342,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} break; case 148 : { SstackS = ((SstackS) + 4); @@ -5353,7 +5355,7 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = (s48_Sextension_valueS); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { if ((1 == status_699X)) { push_exception_continuationB(23, 1); @@ -5362,7 +5364,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = value_698X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { push_exception_continuationB(24, 1); *((long *) (SstackS)) = (((key_697X)<<2)); @@ -5370,7 +5372,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = value_698X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}}} + goto L16666;}}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_696X; @@ -5378,7 +5380,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} break; case 149 : { SstackS = ((SstackS) + 4); @@ -5389,12 +5391,12 @@ long s48_restart(long proc_345X, long nargs_346X) s48_Spending_interruptPS = 0; if ((s48_Spending_eventsPS)) { s48_Spending_interruptPS = 1; - goto L38715;} + goto L38724;} else { - goto L38715;}} + goto L38724;}} else { s48_Spending_interruptPS = 1; - goto L38715;}} + goto L38724;}} break; case 150 : { SstackS = ((SstackS) + 4); @@ -5409,35 +5411,35 @@ long s48_restart(long proc_345X, long nargs_346X) if ((len_705X == ((long)(((unsigned long)(*((long *) ((((char *) (-3 + x_704X))) + -4))))>>8)))) { if (((!memcmp((void *)(((char *) (-3 + x_704X))), (void *)(((char *) (-3 + arg2_702X))),len_705X)))) { arg0K0 = 5; - goto L27842;} + goto L27851;} else { arg0K0 = 1; - goto L27842;}} + goto L27851;}} else { arg0K0 = 1; - goto L27842;}} + goto L27851;}} else { - goto L27809;}} + goto L27818;}} else { - goto L27809;}} + goto L27818;}} else { - goto L27809;}} + goto L27818;}} else { - goto L27809;}} + goto L27818;}} break; case 151 : { space_706X = 1 + ((((4 + ((((SvalS))>>2))))>>2)); v_707X = AVAILABLEp(space_706X); if (v_707X) { - goto L33611;} + goto L33620;} else { collect_saving_temps(1, 1, &temp1_708X); v_709X = AVAILABLEp(space_706X); if (v_709X) { - goto L33611;} + goto L33620;} else { ps_error("Scheme48 heap overflow", 0); - goto L33611;}}} + goto L33620;}}} break; case 152 : { SstackS = ((SstackS) + 4); @@ -5446,7 +5448,7 @@ long s48_restart(long proc_345X, long nargs_346X) arg0K0 = list_711X; arg0K1 = list_711X; arg2K2 = 1; - goto L29199;} + goto L29208;} break; case 153 : { SstackS = ((SstackS) + 4); @@ -5460,21 +5462,21 @@ long s48_restart(long proc_345X, long nargs_346X) if ((arg2_712X == (*((long *) (((char *) (-3 + arg3_713X))))))) { len_715X = (((3 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + arg3_713X))) + -4))))>>8))))>>2); if ((index_714X < 0)) { - goto L27515;} + goto L27524;} else { if ((index_714X < len_715X)) { SvalS = (*((long *) ((((char *) (-3 + arg3_713X))) + (((index_714X)<<2))))); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { - goto L27515;}}} + goto L27524;}}} else { - goto L27535;}} + goto L27544;}} else { - goto L27535;}} + goto L27544;}} else { - goto L27535;}} + goto L27544;}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg3_713X; @@ -5484,7 +5486,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16665;}} + goto L16666;}} break; case 154 : { SstackS = ((SstackS) + 4); @@ -5503,7 +5505,7 @@ long s48_restart(long proc_345X, long nargs_346X) if ((0 == (128 & (*((long *) ((((char *) (-3 + arg4_718X))) + -4)))))) { len_721X = (((3 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + arg4_718X))) + -4))))>>8))))>>2); if ((index_719X < 0)) { - goto L30704;} + goto L30713;} else { if ((index_719X < len_721X)) { addr_722X = (((char *) (-3 + arg4_718X))) + (((index_719X)<<2)); @@ -5512,19 +5514,19 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = 13; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { - goto L30704;}}} + goto L30713;}}} else { - goto L30726;}} + goto L30735;}} else { - goto L30726;}} + goto L30735;}} else { - goto L30726;}} + goto L30735;}} else { - goto L30726;}} + goto L30735;}} else { - goto L30726;}} + goto L30735;}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg4_718X; @@ -5536,7 +5538,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 4; - goto L16665;}} + goto L16666;}} break; case 155 : { SstackS = ((SstackS) + 4); @@ -5553,11 +5555,11 @@ long s48_restart(long proc_345X, long nargs_346X) count_729X = (((SvalS))>>2); if ((3 == (3 & arg5_726X))) { if ((16 == (31 & ((((*((long *) ((((char *) (-3 + arg5_726X))) + -4))))>>2))))) { - goto L30955;} + goto L30964;} else { - goto L30950;}} + goto L30959;}} else { - goto L30950;}} + goto L30959;}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg5_726X; @@ -5571,13 +5573,13 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 5; - goto L16665;}} + goto L16666;}} break; case 156 : { v_730X = *((unsigned char *) ((Scode_pointerS) + 1)); if ((0 == v_730X)) { arg0K0 = (SvalS); - goto L23037;} + goto L23046;} else { merged_arg0K0 = 0; get_current_port_return_tag = 0; @@ -5585,13 +5587,13 @@ long s48_restart(long proc_345X, long nargs_346X) get_current_port_return_0: v_731X = get_current_port0_return_value; arg0K0 = v_731X; - goto L23037;}} + goto L23046;}} break; case 157 : { v_732X = *((unsigned char *) ((Scode_pointerS) + 1)); if ((0 == v_732X)) { arg0K0 = (SvalS); - goto L23257;} + goto L23266;} else { merged_arg0K0 = 0; get_current_port_return_tag = 1; @@ -5599,7 +5601,7 @@ long s48_restart(long proc_345X, long nargs_346X) get_current_port_return_1: v_733X = get_current_port0_return_value; arg0K0 = v_733X; - goto L23257;}} + goto L23266;}} break; case 158 : { v_734X = *((unsigned char *) ((Scode_pointerS) + 1)); @@ -5608,7 +5610,7 @@ long s48_restart(long proc_345X, long nargs_346X) SstackS = ((SstackS) + 4); arg0K0 = (*((long *) (SstackS))); arg0K1 = v_735X; - goto L23470;} + goto L23479;} else { merged_arg0K0 = 4; get_current_port_return_tag = 2; @@ -5617,27 +5619,27 @@ long s48_restart(long proc_345X, long nargs_346X) v_736X = get_current_port0_return_value; arg0K0 = (SvalS); arg0K1 = v_736X; - goto L23470;}} + goto L23479;}} break; case 159 : { x_737X = SvalS; out_738X = stderr; arg0K0 = x_737X; - goto L29452;} + goto L29461;} break; }} - L16665: { + L16666: { nargs_739X = arg0K0; opcode_740X = (((*((long *) ((SstackS) + (8 + (((nargs_739X)<<2)))))))>>2); obj_741X = Sexception_handlersS; if ((3 == (3 & obj_741X))) { if ((2 == (31 & ((((*((long *) ((((char *) (-3 + obj_741X))) + -4))))>>2))))) { - goto L16724;} + goto L16725;} else { - goto L16797;}} + goto L16798;}} else { - goto L16797;}} - L23824: { + goto L16798;}} + L23833: { env_742X = arg0K0; i_743X = arg0K1; if ((0 == i_743X)) { @@ -5645,16 +5647,16 @@ long s48_restart(long proc_345X, long nargs_346X) if ((529 == (SvalS))) { push_exception_continuationB(0, 3); arg0K0 = 0; - goto L16665;} + goto L16666;} else { Scode_pointerS = ((Scode_pointerS) + 3); arg1K0 = (Scode_pointerS); - goto L18438;}} + goto L18439;}} else { arg0K0 = (*((long *) (((char *) (-3 + env_742X))))); arg0K1 = (-1 + i_743X); - goto L23824;}} - L20247: { + goto L23833;}} + L20248: { env_744X = arg0K0; i_745X = arg0K1; if ((0 == i_745X)) { @@ -5662,16 +5664,16 @@ long s48_restart(long proc_345X, long nargs_346X) if ((529 == (SvalS))) { push_exception_continuationB(0, 5); arg0K0 = 0; - goto L16665;} + goto L16666;} else { Scode_pointerS = ((Scode_pointerS) + 5); arg1K0 = (Scode_pointerS); - goto L18438;}} + goto L18439;}} else { arg0K0 = (*((long *) (((char *) (-3 + env_744X))))); arg0K1 = (-1 + i_745X); - goto L20247;}} - L20185: { + goto L20248;}} + L20186: { env_746X = arg0K0; i_747X = arg0K1; if ((0 == i_747X)) { @@ -5683,48 +5685,48 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = 13; Scode_pointerS = ((Scode_pointerS) + 5); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { arg0K0 = (*((long *) (((char *) (-3 + env_746X))))); arg0K1 = (-1 + i_747X); - goto L20185;}} - L20964: { + goto L20186;}} + L20965: { space_751X = arg0K0; v_752X = AVAILABLEp(space_751X); if (v_752X) { arg2K0 = 1; arg0K1 = 0; - goto L21038;} + goto L21039;} else { collect_saving_temps(1, 1, &temp1_753X); v_754X = AVAILABLEp(space_751X); if (v_754X) { arg2K0 = 1; arg0K1 = 0; - goto L21038;} + goto L21039;} else { arg2K0 = 0; arg0K1 = 0; - goto L21038;}}} - L20971: { + goto L21039;}}} + L20972: { env_755X = arg0K0; v_756X = AVAILABLEp(3); if (v_756X) { arg2K0 = 1; arg0K1 = env_755X; - goto L20996;} + goto L20997;} else { temp0_757X = collect_saving_temps(env_755X, 1, &temp1_758X); v_759X = AVAILABLEp(3); if (v_759X) { arg2K0 = 1; arg0K1 = temp0_757X; - goto L20996;} + goto L20997;} else { arg2K0 = 0; arg0K1 = temp0_757X; - goto L20996;}}} - L20766: { + goto L20997;}}} + L20767: { len_760X = ((total_count_393X)<<2); addr_761X = ALLOCATE_SPACE(2, (4 + len_760X)); *((long *) addr_761X) = (10 + (((len_760X)<<8))); @@ -5732,53 +5734,53 @@ long s48_restart(long proc_345X, long nargs_346X) v_763X = *((unsigned char *) ((Scode_pointerS) + 1)); if ((0 == v_763X)) { arg0K0 = 0; - goto L20780;} + goto L20781;} else { value_764X = SvalS; addr_765X = ((char *) (-3 + new_env_762X)); S48_WRITE_BARRIER(new_env_762X, addr_765X, value_764X); *((long *) addr_765X) = value_764X; arg0K0 = 1; - goto L20780;}} - L20692: { + goto L20781;}} + L20693: { okayP_766X = arg2K0; key_767X = arg0K1; if (okayP_766X) { arg0K0 = key_767X; - goto L20680;} + goto L20681;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = key_767X; - goto L20680;}} - L19847: { + goto L20681;}} + L19848: { Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L19882: { + goto L18439;} + L19883: { SstackS = ((((char *) (-3 + (Sbottom_of_stackS)))) + -8); *((long *) (((char *) (-3 + (Sbottom_of_stackS))))) = cont_402X; ScontS = (Sbottom_of_stackS); - goto L19847;} - L19848: { + goto L19848;} + L19849: { if ((1 == cont_402X)) { if ((0 == (3 & (SvalS)))) { s48_Scallback_return_stack_blockS = 1; return ((((SvalS))>>2));} else { - goto L19863;}} + goto L19864;}} else { - goto L19863;}} - L19208: { + goto L19864;}} + L19209: { okayP_768X = arg2K0; key_769X = arg0K1; if (okayP_768X) { arg0K0 = key_769X; - goto L19163;} + goto L19164;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = key_769X; - goto L19163;}} - L19120: { + goto L19164;}} + L19121: { if ((s48_Spending_interruptPS)) { if ((s48_Spending_eventsPS)) { s48_Spending_eventsPS = 0; @@ -5788,21 +5790,21 @@ long s48_restart(long proc_345X, long nargs_346X) v_770X = check_events0_return_value; if (v_770X) { arg0K0 = stack_arg_count_403X; - goto L16894;} + goto L16895;} else { - goto L19124;}} + goto L19125;}} else { arg0K0 = stack_arg_count_403X; - goto L16894;}} + goto L16895;}} else { - goto L19124;}} - L16066: { + goto L19125;}} + L16067: { stack_arg_count_771X = arg0K0; code_772X = *((long *) (((char *) (-3 + (*((long *) (((char *) (-3 + (SvalS)))))))))); arg0K0 = (*((unsigned char *) ((((char *) (-3 + code_772X))) + 1))); arg0K1 = 64; - goto L16080;} - L17161: { + goto L16081;} + L17162: { exception_773X = arg0K0; stack_arg_count_774X = arg0K1; list_args_775X = arg0K2; @@ -5833,35 +5835,35 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = args_780X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} - L17628: { + goto L16666;}} + L17629: { loc_781X = arg1K0; arg_782X = arg1K1; if ((top_of_args_414X < arg_782X)) { *((long *) loc_781X) = (*((long *) arg_782X)); arg1K0 = (loc_781X + -4); arg1K1 = (arg_782X + -4); - goto L17628;} + goto L17629;} else { SstackS = loc_781X; obj_783X = SvalS; if ((3 == (3 & obj_783X))) { if ((3 == (31 & ((((*((long *) ((((char *) (-3 + obj_783X))) + -4))))>>2))))) { arg0K0 = nargs_413X; - goto L16066;} + goto L16067;} else { arg0K0 = 3; arg0K1 = nargs_413X; arg0K2 = 25; arg0K3 = 0; - goto L17161;}} + goto L17162;}} else { arg0K0 = 3; arg0K1 = nargs_413X; arg0K2 = 25; arg0K3 = 0; - goto L17161;}}} - L17666: { + goto L17162;}}} + L17667: { stack_arg_count_784X = arg0K0; list_args_785X = arg0K1; list_arg_count_786X = arg0K2; @@ -5870,19 +5872,19 @@ long s48_restart(long proc_345X, long nargs_346X) if ((3 == (3 & obj_787X))) { if ((3 == (31 & ((((*((long *) ((((char *) (-3 + obj_787X))) + -4))))>>2))))) { arg0K0 = stack_arg_count_784X; - goto L16066;} + goto L16067;} else { arg0K0 = 3; arg0K1 = stack_arg_count_784X; arg0K2 = 25; arg0K3 = 0; - goto L17161;}} + goto L17162;}} else { arg0K0 = 3; arg0K1 = stack_arg_count_784X; arg0K2 = 25; arg0K3 = 0; - goto L17161;}} + goto L17162;}} else { obj_788X = SvalS; if ((3 == (3 & obj_788X))) { @@ -5891,20 +5893,20 @@ long s48_restart(long proc_345X, long nargs_346X) total_arg_count_790X = stack_arg_count_784X + list_arg_count_786X; arg0K0 = (*((unsigned char *) ((((char *) (-3 + code_789X))) + 1))); arg0K1 = 64; - goto L16357;} + goto L16358;} else { arg0K0 = 3; arg0K1 = stack_arg_count_784X; arg0K2 = list_args_785X; arg0K3 = list_arg_count_786X; - goto L17161;}} + goto L17162;}} else { arg0K0 = 3; arg0K1 = stack_arg_count_784X; arg0K2 = list_args_785X; arg0K3 = list_arg_count_786X; - goto L17161;}}} - L11273: { + goto L17162;}}} + L11274: { list_args_791X = arg0K0; stack_nargs_792X = arg0K1; merged_arg0K0 = list_args_791X; @@ -5918,7 +5920,7 @@ long s48_restart(long proc_345X, long nargs_346X) arg0K0 = stack_nargs_792X; arg0K1 = list_args_791X; arg0K2 = list_arg_count_794X; - goto L17666;} + goto L17667;} else { *((long *) (SstackS)) = list_args_791X; SstackS = ((SstackS) + -4); @@ -5935,8 +5937,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = args_795X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} - L11314: { + goto L16666;}} + L11315: { list_796X = arg0K0; follower_797X = arg0K1; if ((25 == list_796X)) { @@ -5946,35 +5948,35 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) addr_799X) = list_args_798X; arg0K0 = rest_list_422X; arg0K1 = (-1 + stack_nargs_420X); - goto L11273;} + goto L11274;} else { arg0K0 = (*((long *) ((((char *) (-3 + list_796X))) + 4))); arg0K1 = (*((long *) ((((char *) (-3 + follower_797X))) + 4))); - goto L11314;}} - L17571: { + goto L11315;}} + L17572: { obj_800X = SvalS; if ((3 == (3 & obj_800X))) { if ((3 == (31 & ((((*((long *) ((((char *) (-3 + obj_800X))) + -4))))>>2))))) { arg0K0 = 0; - goto L16066;} + goto L16067;} else { arg0K0 = 3; arg0K1 = 0; arg0K2 = 25; arg0K3 = 0; - goto L17161;}} + goto L17162;}} else { arg0K0 = 3; arg0K1 = 0; arg0K2 = 25; arg0K3 = 0; - goto L17161;}} - L17578: { + goto L17162;}} + L17579: { SstackS = ((((char *) (-3 + (Sbottom_of_stackS)))) + -8); *((long *) (((char *) (-3 + (Sbottom_of_stackS))))) = cont_423X; ScontS = (Sbottom_of_stackS); - goto L17571;} - L20427: { + goto L17572;} + L20428: { stack_nargs_801X = arg0K0; list_args_802X = arg0K1; list_arg_count_803X = arg0K2; @@ -5985,25 +5987,25 @@ long s48_restart(long proc_345X, long nargs_346X) goto pop_continuationB; pop_continuationB_return_1: arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { if (((ScontS) == (Sbottom_of_stackS))) { arg0K0 = (*((long *) (((char *) (-3 + (Sbottom_of_stackS)))))); - goto L20438;} + goto L20439;} else { arg0K0 = (ScontS); - goto L20438;}}} - L18944: { + goto L20439;}}} + L18945: { okayP_804X = arg2K0; key_805X = arg0K1; if (okayP_804X) { arg0K0 = key_805X; - goto L18932;} + goto L18933;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = key_805X; - goto L18932;}} - L18817: { + goto L18933;}} + L18818: { tem_806X = *((long *) ((((char *) (-3 + (StemplateS)))) + ((((((((*((unsigned char *) ((Scode_pointerS) + 1))))<<8)) + (*((unsigned char *) ((Scode_pointerS) + 2)))))<<2)))); StemplateS = tem_806X; Scode_pointerS = ((((char *) (-3 + (*((long *) (((char *) (-3 + tem_806X)))))))) + 2); @@ -6015,288 +6017,288 @@ long s48_restart(long proc_345X, long nargs_346X) check_events_return_1: v_807X = check_events0_return_value; if (v_807X) { - goto L18826;} + goto L18827;} else { - goto L18829;}} + goto L18830;}} else { - goto L18826;}} + goto L18827;}} else { - goto L18829;}} - L19000: { + goto L18830;}} + L19001: { okayP_808X = arg2K0; key_809X = arg0K1; if (okayP_808X) { arg0K0 = key_809X; - goto L18987;} + goto L18988;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = key_809X; - goto L18987;}} - L18862: { + goto L18988;}} + L18863: { push_exception_continuationB(5, 4); *((long *) (SstackS)) = (*((long *) ((((char *) (-3 + (StemplateS)))) + ((((((((*((unsigned char *) ((Scode_pointerS) + 1))))<<8)) + (*((unsigned char *) ((Scode_pointerS) + 2)))))<<2))))); SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} - L18718: { + goto L16666;} + L18719: { arg0K0 = (2 + (((max_442X)<<1))); - goto L18720;} - L18720: { + goto L18721;} + L18721: { offset_810X = arg0K0; Scode_pointerS = ((Scode_pointerS) + offset_810X); arg1K0 = (Scode_pointerS); - goto L18438;} - L19750: { + goto L18439;} + L19751: { Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L18616: { + goto L18439;} + L18617: { delta_811X = arg0K0; Scode_pointerS = ((Scode_pointerS) + delta_811X); arg1K0 = (Scode_pointerS); - goto L18438;} - L19641: { + goto L18439;} + L19642: { delta_812X = arg0K0; Scode_pointerS = ((Scode_pointerS) + delta_812X); arg1K0 = (Scode_pointerS); - goto L18438;} - L38026: { + goto L18439;} + L38035: { val_813X = arg0K0; SvalS = val_813X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L38038: { + goto L18439;} + L38047: { val_814X = arg0K0; SvalS = val_814X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L10622: { + goto L18439;} + L10623: { if ((3 == (3 & x_456X))) { if ((7 == (31 & ((((*((long *) ((((char *) (-3 + x_456X))) + -4))))>>2))))) { arg0K0 = 5; - goto L38038;} + goto L38047;} else { - goto L10628;}} + goto L10629;}} else { - goto L10628;}} - L28391: { + goto L10629;}} + L28400: { SvalS = 5; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L28392: { + goto L18439;} + L28401: { if ((3 == (3 & n_457X))) { if ((10 == (31 & ((((*((long *) ((((char *) (-3 + n_457X))) + -4))))>>2))))) { push_exception_continuationB(5, 1); *((long *) (SstackS)) = n_457X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} + goto L16666;} else { - goto L28396;}} + goto L28405;}} else { - goto L28396;}} - L28548: { + goto L28405;}} + L28557: { SvalS = 5; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L28523: { + goto L18439;} + L28532: { if ((3 == (3 & n_458X))) { if ((7 == (31 & ((((*((long *) ((((char *) (-3 + n_458X))) + -4))))>>2))))) { - goto L28548;} + goto L28557;} else { - goto L28537;}} + goto L28546;}} else { - goto L28537;}} - L28747: { + goto L28546;}} + L28756: { SvalS = 5; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L28722: { + goto L18439;} + L28731: { if ((3 == (3 & n_459X))) { if ((7 == (31 & ((((*((long *) ((((char *) (-3 + n_459X))) + -4))))>>2))))) { - goto L28747;} + goto L28756;} else { - goto L28736;}} + goto L28745;}} else { - goto L28736;}} - L28946: { + goto L28745;}} + L28955: { SvalS = 5; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L28921: { + goto L18439;} + L28930: { if ((3 == (3 & n_460X))) { if ((7 == (31 & ((((*((long *) ((((char *) (-3 + n_460X))) + -4))))>>2))))) { - goto L28946;} + goto L28955;} else { - goto L28935;}} + goto L28944;}} else { - goto L28935;}} - L6775: { + goto L28944;}} + L6776: { a_815X = arg0K0; if ((b_470X < 0)) { arg0K0 = (0 - b_470X); - goto L6779;} + goto L6780;} else { arg0K0 = b_470X; - goto L6779;}} - L7056: { + goto L6780;}} + L7057: { a_816X = arg0K0; if ((b_477X < 0)) { arg0K0 = (0 - b_477X); - goto L7060;} + goto L7061;} else { arg0K0 = b_477X; - goto L7060;}} - L31744: { + goto L7061;}} + L31753: { val_817X = arg0K0; SvalS = val_817X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L31822: { + goto L18439;} + L31831: { val_818X = arg0K0; SvalS = val_818X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L31900: { + goto L18439;} + L31909: { val_819X = arg0K0; SvalS = val_819X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L31978: { + goto L18439;} + L31987: { val_820X = arg0K0; SvalS = val_820X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L32056: { + goto L18439;} + L32065: { val_821X = arg0K0; SvalS = val_821X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L7233: { + goto L18439;} + L7234: { a_822X = arg0K0; if ((b_491X < 0)) { arg0K0 = (0 - b_491X); - goto L7237;} + goto L7238;} else { arg0K0 = b_491X; - goto L7237;}} - L25338: { + goto L7238;}} + L25347: { a_823X = arg0K0; n_824X = ((y_493X)>>2); if ((n_824X < 0)) { arg0K0 = (0 - n_824X); - goto L25340;} + goto L25349;} else { arg0K0 = n_824X; - goto L25340;}} - L38295: { + goto L25349;}} + L38304: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = x_508X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} - L25624: { + goto L16666;} + L25633: { r_825X = arg0K0; if ((536870911 < r_825X)) { push_exception_continuationB(5, 1); *((long *) (SstackS)) = n_509X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} + goto L16666;} else { SvalS = (((r_825X)<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;}} - L25903: { + goto L18439;}} + L25912: { SvalS = (((result_530X)<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L38383: { + goto L18439;} + L38392: { val_826X = arg0K0; SvalS = val_826X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L28166: { + goto L18439;} + L28175: { val_827X = arg0K0; SvalS = val_827X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L28139: { + goto L18439;} + L28148: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_533X; SstackS = ((SstackS) + -4); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L28076: { + goto L16666;} + L28085: { val_828X = arg0K0; SvalS = val_828X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L28049: { + goto L18439;} + L28058: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_535X; SstackS = ((SstackS) + -4); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L32748: { + goto L16666;} + L32757: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = (((x_537X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} - L38412: { + goto L16666;} + L38421: { val_829X = arg0K0; SvalS = val_829X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L38426: { + goto L18439;} + L38435: { value_830X = arg0K0; SvalS = value_830X; Scode_pointerS = ((Scode_pointerS) + 2); arg1K0 = (Scode_pointerS); - goto L18438;} - L21229: { + goto L18439;} + L21230: { push_exception_continuationB(5, 2); *((long *) (SstackS)) = stob_541X; SstackS = ((SstackS) + -4); *((long *) (SstackS)) = (((type_542X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L21301: { + goto L16666;} + L21302: { type_831X = *((unsigned char *) ((Scode_pointerS) + 2)); len_832X = ((len_543X)<<2); addr_833X = ALLOCATE_SPACE(type_831X, (4 + len_832X)); *((long *) addr_833X) = (2 + (((((((len_832X)<<6)) + type_831X))<<2))); new_834X = 3 + (((long) (addr_833X + 4))); if ((len_543X < 1)) { - goto L21336;} + goto L21337;} else { *((long *) ((((char *) (-3 + new_834X))) + (-4 + (((len_543X)<<2))))) = (SvalS); arg0K0 = (-2 + len_543X); - goto L21320;}} - L21483: { + goto L21321;}} + L21484: { type_835X = *((unsigned char *) ((Scode_pointerS) + 1)); len_836X = ((len_548X)<<2); addr_837X = ALLOCATE_SPACE(type_835X, (4 + len_836X)); @@ -6307,8 +6309,8 @@ long s48_restart(long proc_345X, long nargs_346X) SstackS = ((SstackS) + 4); rest_list_840X = *((long *) (SstackS)); arg0K0 = (-1 + stack_nargs_839X); - goto L21505;} - L21693: { + goto L21506;} + L21694: { push_exception_continuationB(5, 3); *((long *) (SstackS)) = stob_553X; SstackS = ((SstackS) + -4); @@ -6317,8 +6319,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (((offset_554X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16665;} - L21796: { + goto L16666;} + L21797: { push_exception_continuationB(5, 3); *((long *) (SstackS)) = stob_556X; SstackS = ((SstackS) + -4); @@ -6329,8 +6331,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = value_557X; SstackS = ((SstackS) + -4); arg0K0 = 4; - goto L16665;} - L21981: { + goto L16666;} + L21982: { push_exception_continuationB(5, 2); *((long *) (SstackS)) = (((type_563X)<<2)); SstackS = ((SstackS) + -4); @@ -6339,8 +6341,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = init_562X; SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16665;} - L21999: { + goto L16666;} + L22000: { okayP_841X = arg2K0; init_842X = arg0K1; if (okayP_841X) { @@ -6349,7 +6351,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) addr_844X) = (2 + (((((((len_843X)<<6)) + type_563X))<<2))); value_845X = 3 + (((long) (addr_844X + 4))); arg0K0 = (-1 + len_564X); - goto L22028;} + goto L22029;} else { push_exception_continuationB(8, 2); *((long *) (SstackS)) = (((type_563X)<<2)); @@ -6359,8 +6361,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = init_842X; SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16665;}} - L22277: { + goto L16666;}} + L22278: { push_exception_continuationB(7, 2); *((long *) (SstackS)) = stob_570X; SstackS = ((SstackS) + -4); @@ -6369,8 +6371,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = index_571X; SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16665;} - L22254: { + goto L16666;} + L22255: { push_exception_continuationB(5, 2); *((long *) (SstackS)) = stob_570X; SstackS = ((SstackS) + -4); @@ -6379,8 +6381,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = index_571X; SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16665;} - L22517: { + goto L16666;} + L22518: { push_exception_continuationB(7, 2); *((long *) (SstackS)) = stob_576X; SstackS = ((SstackS) + -4); @@ -6391,8 +6393,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = value_577X; SstackS = ((SstackS) + -4); arg0K0 = 4; - goto L16665;} - L22492: { + goto L16666;} + L22493: { push_exception_continuationB(5, 2); *((long *) (SstackS)) = stob_576X; SstackS = ((SstackS) + -4); @@ -6403,44 +6405,44 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = value_577X; SstackS = ((SstackS) + -4); arg0K0 = 4; - goto L16665;} - L26074: { + goto L16666;} + L26083: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = (((len_583X)<<2)); SstackS = ((SstackS) + -4); *((long *) (SstackS)) = (((init_584X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L26166: { + goto L16666;} + L26175: { addr_846X = ALLOCATE_SPACE(17, (4 + len_583X)); *((long *) addr_846X) = (70 + (((len_583X)<<8))); vector_847X = 3 + (((long) (addr_846X + 4))); arg0K0 = (-1 + len_583X); - goto L26115;} - L36239: { + goto L26124;} + L36248: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} - L32854: { + goto L16666;} + L32863: { push_exception_continuationB(7, 1); *((long *) (SstackS)) = arg2_590X; SstackS = ((SstackS) + -4); *((long *) (SstackS)) = (((index_591X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L35818: { + goto L16666;} + L35827: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_590X; SstackS = ((SstackS) + -4); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L29802: { + goto L16666;} + L29811: { push_exception_continuationB(7, 1); *((long *) (SstackS)) = arg3_594X; SstackS = ((SstackS) + -4); @@ -6449,8 +6451,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (((Kchar_596X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16665;} - L29781: { + goto L16666;} + L29790: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg3_594X; SstackS = ((SstackS) + -4); @@ -6459,8 +6461,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (((Kchar_596X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16665;} - L34230: { + goto L16666;} + L34239: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg3_594X; SstackS = ((SstackS) + -4); @@ -6469,54 +6471,54 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16665;} - L26308: { + goto L16666;} + L26317: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = (((len_599X)<<2)); SstackS = ((SstackS) + -4); *((long *) (SstackS)) = (9 + ((((init_600X))<<8))); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L26400: { + goto L16666;} + L26409: { len_848X = 1 + len_599X; addr_849X = ALLOCATE_SPACE(16, (4 + len_848X)); *((long *) addr_849X) = (66 + (((len_848X)<<8))); string_850X = 3 + (((long) (addr_849X + 4))); *((unsigned char *) ((((char *) (-3 + string_850X))) + len_599X)) = 0; arg0K0 = (-1 + len_599X); - goto L26349;} - L32935: { + goto L26358;} + L32944: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_598X; SstackS = ((SstackS) + -4); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L36289: { + goto L16666;} + L36298: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} - L32998: { + goto L16666;} + L33007: { push_exception_continuationB(7, 1); *((long *) (SstackS)) = arg2_606X; SstackS = ((SstackS) + -4); *((long *) (SstackS)) = (((index_607X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L35914: { + goto L16666;} + L35923: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_606X; SstackS = ((SstackS) + -4); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L29957: { + goto L16666;} + L29966: { push_exception_continuationB(7, 1); *((long *) (SstackS)) = arg3_610X; SstackS = ((SstackS) + -4); @@ -6525,8 +6527,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (9 + ((((Kchar_612X))<<8))); SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16665;} - L29936: { + goto L16666;} + L29945: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg3_610X; SstackS = ((SstackS) + -4); @@ -6535,8 +6537,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (9 + ((((Kchar_612X))<<8))); SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16665;} - L34356: { + goto L16666;} + L34365: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg3_610X; SstackS = ((SstackS) + -4); @@ -6545,8 +6547,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16665;} - L24478: { + goto L16666;} + L24487: { obj_851X = SvalS; if ((3 == (3 & obj_851X))) { if ((16 == (31 & ((((*((long *) ((((char *) (-3 + obj_851X))) + -4))))>>2))))) { @@ -6555,106 +6557,106 @@ long s48_restart(long proc_345X, long nargs_346X) n_854X = -1 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + string_853X))) + -4))))>>8)); arg0K0 = 0; arg0K1 = 0; - goto L13333;} + goto L13334;} else { - goto L24488;}} + goto L24497;}} else { - goto L24488;}} - L33976: { + goto L24497;}} + L33985: { val_855X = arg0K0; SvalS = val_855X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L33957: { + goto L18439;} + L33966: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} - L29544: { + goto L16666;} + L29553: { if ((1 == (SvalS))) { addr_856X = (((char *) (-3 + arg2_620X))) + 4; S48_WRITE_BARRIER(arg2_620X, addr_856X, 273); *((long *) addr_856X) = 273; - goto L29550;} + goto L29559;} else { if ((17 == (255 & (*((long *) ((((char *) (-3 + arg2_620X))) + 4)))))) { addr_857X = (((char *) (-3 + arg2_620X))) + 4; S48_WRITE_BARRIER(arg2_620X, addr_857X, 529); *((long *) addr_857X) = 529; - goto L29550;} + goto L29559;} else { - goto L29550;}}} - L29551: { + goto L29559;}}} + L29560: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_620X; SstackS = ((SstackS) + -4); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L38498: { + goto L16666;} + L38507: { val_858X = arg0K0; SvalS = val_858X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L33080: { + goto L18439;} + L33089: { SvalS = x_623X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L33131: { + goto L18439;} + L33140: { okayP_859X = arg2K0; key_860X = arg0K1; if (okayP_859X) { arg0K0 = key_860X; - goto L33097;} + goto L33106;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = key_860X; - goto L33097;}} - L34474: { + goto L33106;}} + L34483: { okayP_861X = arg2K0; key_862X = arg0K1; if (okayP_861X) { arg0K0 = key_862X; - goto L34456;} + goto L34465;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = key_862X; - goto L34456;}} - L37343: { + goto L34465;}} + L37352: { okayP_863X = arg2K0; key_864X = arg0K1; if (okayP_863X) { arg0K0 = key_864X; - goto L37273;} + goto L37282;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = key_864X; - goto L37273;}} - L37603: { + goto L37282;}} + L37612: { okayP_865X = arg2K0; key_866X = arg0K1; if (okayP_865X) { arg0K0 = key_866X; - goto L37545;} + goto L37554;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = key_866X; - goto L37545;}} - L33202: { + goto L37554;}} + L33211: { val_867X = arg0K0; SvalS = val_867X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L8173: { + goto L18439;} + L8174: { arg0K0 = (*((long *) ((((char *) (-3 + channel_637X))) + 16))); - goto L33202;} - L8179: { + goto L33211;} + L8180: { ch_868X = arg0K0; prev_869X = arg0K1; if ((1 == ch_868X)) { @@ -6663,58 +6665,58 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) addr_870X) = 1; n_871X = ps_abort_fd_op(((((*((long *) ((((char *) (-3 + channel_637X))) + 8))))>>2))); arg0K0 = (((n_871X)<<2)); - goto L33202;} + goto L33211;} else { if ((ch_868X == channel_637X)) { y_872X = Spending_channels_tailS; if ((ch_868X == y_872X)) { Spending_channels_tailS = prev_869X; - goto L8203;} + goto L8204;} else { - goto L8203;}} + goto L8204;}} else { arg0K0 = (*((long *) ((((char *) (-3 + ch_868X))) + 12))); arg0K1 = ch_868X; - goto L8179;}}} - L33185: { + goto L8180;}}} + L33194: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} - L14777: { + goto L16666;} + L14778: { arg0K0 = (-1 + (Snumber_of_channelsS)); arg0K1 = 25; - goto L14784;} - L34575: { + goto L14785;} + L34584: { okayP_873X = arg2K0; key_874X = arg0K1; if (okayP_873X) { arg0K0 = key_874X; - goto L34529;} + goto L34538;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = key_874X; - goto L34529;}} - L35407: { + goto L34538;}} + L35416: { i_875X = arg0K0; h_876X = arg0K1; if ((i_875X < n_655X)) { arg0K0 = (1 + i_875X); arg0K1 = (h_876X + (((*((unsigned char *) ((((char *) (-3 + x_654X))) + i_875X)))))); - goto L35407;} + goto L35416;} else { SvalS = (((h_876X)<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;}} - L35384: { + goto L18439;}} + L35393: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} - L38564: { + goto L16666;} + L38573: { SstackS = ((SstackS) + 4); stob_877X = *((long *) (SstackS)); proc_878X = SvalS; @@ -6736,33 +6738,33 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = 13; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { - goto L30563;}} + goto L30572;}} else { - goto L30563;}} + goto L30572;}} else { - goto L30563;}} - L33293: { + goto L30572;}} + L33302: { firstP_884X = arg2K0; vector_885X = s48_find_all(type_665X); if ((1 == vector_885X)) { if (firstP_884X) { collect_saving_temps(0, 0, &v_886X); arg2K0 = 0; - goto L33293;} + goto L33302;} else { push_exception_continuationB(8, 1); *((long *) (SstackS)) = (((type_665X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;}} + goto L16666;}} else { SvalS = vector_885X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;}} - L38614: { + goto L18439;}} + L38623: { firstP_887X = arg2K0; type_888X = arg0K1; vector_889X = s48_find_all_records(type_888X); @@ -6771,36 +6773,36 @@ long s48_restart(long proc_345X, long nargs_346X) value_890X = collect_saving_temps(type_888X, 0, &v_891X); arg2K0 = 0; arg0K1 = value_890X; - goto L38614;} + goto L38623;} else { push_exception_continuationB(8, 1); *((long *) (SstackS)) = type_888X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;}} + goto L16666;}} else { SvalS = vector_889X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;}} - L20570: { + goto L18439;}} + L20571: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} - L19494: { + goto L16666;} + L19495: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} - L38655: { + goto L16666;} + L38664: { SvalS = (((old_674X)<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L18452: { + goto L18439;} + L18453: { SstackS = ((SstackS) + 4); pc_892X = *((long *) (SstackS)); SstackS = ((SstackS) + 4); @@ -6810,29 +6812,29 @@ long s48_restart(long proc_345X, long nargs_346X) SstackS = ((SstackS) + 4); SvalS = (*((long *) (SstackS))); arg1K0 = (Scode_pointerS); - goto L18438;} - L37163: { + goto L18439;} + L37172: { x_894X = s48_schedule_alarm_interrupt((((p_677X)>>2))); SvalS = (((x_894X)<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L34103: { + goto L18439;} + L34112: { if ((1 == (SvalS))) { arg2K0 = 0; - goto L34107;} + goto L34116;} else { arg2K0 = 1; - goto L34107;}} - L34108: { + goto L34116;}} + L34117: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_678X; SstackS = ((SstackS) + -4); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L22787: { + goto L16666;} + L22790: { rest_list_895X = arg0K0; if ((25 == rest_list_895X)) { proc_896X = *((long *) ((SstackS) + (((nargs_680X)<<2)))); @@ -6849,53 +6851,53 @@ long s48_restart(long proc_345X, long nargs_346X) if ((Sexternal_exceptionPS)) { Sexternal_exceptionPS = 0; arg0K0 = (Sexternal_exception_nargsS); - goto L16665;} + goto L16666;} else { SvalS = result_899X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;}} + goto L18439;}} else { - goto L22847;}} + goto L22850;}} else { - goto L22847;}} + goto L22850;}} else { - goto L22847;}} + goto L22850;}} else { - goto L22847;}} + goto L22850;}} else { - goto L22847;}} + goto L22850;}} else { *((long *) (SstackS)) = (*((long *) (((char *) (-3 + rest_list_895X))))); SstackS = ((SstackS) + -4); arg0K0 = (*((long *) ((((char *) (-3 + rest_list_895X))) + 4))); - goto L22787;}} - L33402: { + goto L22790;}} + L33411: { okayP_900X = arg2K0; key_901X = arg0K1; if (okayP_900X) { arg0K0 = key_901X; - goto L33368;} + goto L33377;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = key_901X; - goto L33368;}} - L23905: { + goto L33377;}} + L23914: { if ((1 == (SvalS))) { arg0K0 = (Sexported_bindingsS); - goto L23938;} + goto L23947;} else { arg0K0 = (Simported_bindingsS); - goto L23938;}} - L23910: { + goto L23947;}} + L23919: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_686X; SstackS = ((SstackS) + -4); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L35318: { + goto L16666;} + L35327: { option_902X = arg0K0; seconds_903X = arg0K1; mseconds_904X = arg0K2; @@ -6908,41 +6910,41 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (((mseconds_904X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16665;} + goto L16666;} else { SvalS = (((((1000 * seconds_903X) + mseconds_904X))<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;}} - L38715: { + goto L18439;}} + L38724: { s48_Scallback_return_stack_blockS = arg2_700X; return x_701X;} - L27842: { + L27851: { val_905X = arg0K0; SvalS = val_905X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L27809: { + goto L18439;} + L27818: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_702X; SstackS = ((SstackS) + -4); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L33611: { + goto L16666;} + L33620: { SstackS = ((SstackS) + 4); arg2_906X = *((long *) (SstackS)); if ((0 == (3 & (SvalS)))) { n_907X = (((SvalS))>>2); if ((3 == (3 & arg2_906X))) { if ((0 == (31 & ((((*((long *) ((((char *) (-3 + arg2_906X))) + -4))))>>2))))) { - goto L27369;} + goto L27378;} else { - goto L27321;}} + goto L27330;}} else { - goto L27321;}} + goto L27330;}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_906X; @@ -6950,8 +6952,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} - L29199: { + goto L16666;}} + L29208: { list_908X = arg0K0; slow_909X = arg0K1; move_slowP_910X = arg2K2; @@ -6959,7 +6961,7 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = 1; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { if ((3 == (3 & list_908X))) { if ((0 == (31 & ((((*((long *) ((((char *) (-3 + list_908X))) + -4))))>>2))))) { @@ -6970,7 +6972,7 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = head_911X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { list_912X = *((long *) ((((char *) (-3 + list_908X))) + 4)); if ((list_912X == slow_909X)) { @@ -6980,18 +6982,18 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = list_711X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { if (move_slowP_910X) { arg0K0 = list_912X; arg0K1 = (*((long *) ((((char *) (-3 + slow_909X))) + 4))); arg2K2 = 0; - goto L29199;} + goto L29208;} else { arg0K0 = list_912X; arg0K1 = slow_909X; arg2K2 = 1; - goto L29199;}}}} + goto L29208;}}}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = thing_710X; @@ -6999,7 +7001,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = list_711X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = thing_710X; @@ -7007,7 +7009,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = list_711X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = thing_710X; @@ -7015,7 +7017,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = list_711X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = thing_710X; @@ -7023,8 +7025,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = list_711X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}}} - L27515: { + goto L16666;}}} + L27524: { push_exception_continuationB(7, 1); *((long *) (SstackS)) = arg3_713X; SstackS = ((SstackS) + -4); @@ -7033,8 +7035,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (((index_714X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16665;} - L27535: { + goto L16666;} + L27544: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg3_713X; SstackS = ((SstackS) + -4); @@ -7043,8 +7045,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (((index_714X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16665;} - L30704: { + goto L16666;} + L30713: { push_exception_continuationB(7, 1); *((long *) (SstackS)) = arg4_718X; SstackS = ((SstackS) + -4); @@ -7055,8 +7057,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = value_720X; SstackS = ((SstackS) + -4); arg0K0 = 4; - goto L16665;} - L30726: { + goto L16666;} + L30735: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg4_718X; SstackS = ((SstackS) + -4); @@ -7067,29 +7069,29 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = value_720X; SstackS = ((SstackS) + -4); arg0K0 = 4; - goto L16665;} - L30955: { + goto L16666;} + L30964: { if ((3 == (3 & arg5_726X))) { if ((16 == (31 & ((((*((long *) ((((char *) (-3 + arg5_726X))) + -4))))>>2))))) { - goto L30968;} + goto L30977;} else { - goto L30963;}} + goto L30972;}} else { - goto L30963;}} - L30950: { + goto L30972;}} + L30959: { if ((3 == (3 & arg5_726X))) { if ((17 == (31 & ((((*((long *) ((((char *) (-3 + arg5_726X))) + -4))))>>2))))) { - goto L30955;} + goto L30964;} else { - goto L31022;}} + goto L31031;}} else { - goto L31022;}} - L23037: { + goto L31031;}} + L23046: { port_913X = arg0K0; if ((3 == (3 & port_913X))) { if ((6 == (31 & ((((*((long *) ((((char *) (-3 + port_913X))) + -4))))>>2))))) { if ((0 == (4 & ((((*((long *) ((((char *) (-3 + port_913X))) + 4))))>>2))))) { - goto L23097;} + goto L23106;} else { p_914X = *((long *) ((((char *) (-3 + port_913X))) + 24)); p_915X = *((long *) ((((char *) (-3 + port_913X))) + 28)); @@ -7097,10 +7099,10 @@ long s48_restart(long proc_345X, long nargs_346X) i_917X = ((p_914X)>>2); x_918X = *((long *) ((((char *) (-3 + port_913X))) + 12)); if ((5 == x_918X)) { - goto L23077;} + goto L23086;} else { if ((i_917X == (((p_915X)>>2)))) { - goto L23077;} + goto L23086;} else { val_919X = 4 + (((i_917X)<<2)); addr_920X = (((char *) (-3 + port_913X))) + 24; @@ -7109,17 +7111,17 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = (9 + ((((((*((unsigned char *) ((((char *) (-3 + b_916X))) + i_917X))))))<<8))); Scode_pointerS = ((Scode_pointerS) + 2); arg1K0 = (Scode_pointerS); - goto L18438;}}}} + goto L18439;}}}} else { - goto L23097;}} + goto L23106;}} else { - goto L23097;}} - L23257: { + goto L23106;}} + L23266: { port_921X = arg0K0; if ((3 == (3 & port_921X))) { if ((6 == (31 & ((((*((long *) ((((char *) (-3 + port_921X))) + -4))))>>2))))) { if ((0 == (4 & ((((*((long *) ((((char *) (-3 + port_921X))) + 4))))>>2))))) { - goto L23317;} + goto L23326;} else { p_922X = *((long *) ((((char *) (-3 + port_921X))) + 24)); p_923X = *((long *) ((((char *) (-3 + port_921X))) + 28)); @@ -7127,37 +7129,37 @@ long s48_restart(long proc_345X, long nargs_346X) i_925X = ((p_922X)>>2); x_926X = *((long *) ((((char *) (-3 + port_921X))) + 12)); if ((5 == x_926X)) { - goto L23297;} + goto L23306;} else { if ((i_925X == (((p_923X)>>2)))) { - goto L23297;} + goto L23306;} else { SvalS = (9 + ((((((*((unsigned char *) ((((char *) (-3 + b_924X))) + i_925X))))))<<8))); Scode_pointerS = ((Scode_pointerS) + 2); arg1K0 = (Scode_pointerS); - goto L18438;}}}} + goto L18439;}}}} else { - goto L23317;}} + goto L23326;}} else { - goto L23317;}} - L23470: { + goto L23326;}} + L23479: { Kchar_927X = arg0K0; port_928X = arg0K1; if ((9 == (255 & Kchar_927X))) { if ((3 == (3 & port_928X))) { if ((6 == (31 & ((((*((long *) ((((char *) (-3 + port_928X))) + -4))))>>2))))) { if ((0 == (8 & ((((*((long *) ((((char *) (-3 + port_928X))) + 4))))>>2))))) { - goto L23531;} + goto L23540;} else { p_929X = *((long *) ((((char *) (-3 + port_928X))) + 24)); b_930X = *((long *) ((((char *) (-3 + port_928X))) + 20)); i_931X = ((p_929X)>>2); x_932X = *((long *) ((((char *) (-3 + port_928X))) + 12)); if ((5 == x_932X)) { - goto L23513;} + goto L23522;} else { if ((i_931X == ((long)(((unsigned long)(*((long *) ((((char *) (-3 + b_930X))) + -4))))>>8)))) { - goto L23513;} + goto L23522;} else { val_933X = 4 + (((i_931X)<<2)); addr_934X = (((char *) (-3 + port_928X))) + 24; @@ -7167,27 +7169,27 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = 13; Scode_pointerS = ((Scode_pointerS) + 2); arg1K0 = (Scode_pointerS); - goto L18438;}}}} + goto L18439;}}}} else { - goto L23531;}} + goto L23540;}} else { - goto L23531;}} + goto L23540;}} else { - goto L23531;}} - L29452: { + goto L23540;}} + L29461: { stuff_935X = arg0K0; if ((3 == (3 & stuff_935X))) { if ((0 == (31 & ((((*((long *) ((((char *) (-3 + stuff_935X))) + -4))))>>2))))) { thing_936X = *((long *) (((char *) (-3 + stuff_935X)))); if ((0 == (3 & thing_936X))) { ps_write_integer((((thing_936X)>>2)), out_738X); - goto L29458;} + goto L29467;} else { if ((9 == (255 & thing_936X))) { ps_write_string("#\\", out_738X); { long ignoreXX; PS_WRITE_CHAR(((((thing_936X)>>8))), out_738X, ignoreXX) } - goto L29458;} + goto L29467;} else { if ((3 == (3 & thing_936X))) { if ((8 == (31 & ((((*((long *) ((((char *) (-3 + thing_936X))) + -4))))>>2))))) { @@ -7203,74 +7205,74 @@ long s48_restart(long proc_345X, long nargs_346X) ps_write_string((((char *)(((char *) (-3 + (*((long *) (((char *) (-3 + (*((long *) ((((char *) (-3 + (*((long *) (((char *) (-3 + thing_936X)))))))) + 8))))))))))))), out_738X); { long ignoreXX; PS_WRITE_CHAR(125, out_738X, ignoreXX) } - goto L29458;} + goto L29467;} else { - goto L11650;}} + goto L11651;}} else { - goto L11650;}} + goto L11651;}} else { - goto L11650;}} + goto L11651;}} else { - goto L11650;}} + goto L11651;}} else { - goto L11650;}} + goto L11651;}} else { - goto L11650;}} + goto L11651;}} else { - goto L11650;}} + goto L11651;}} else { - goto L11650;}}}} + goto L11651;}}}} else { - goto L29443;}} + goto L29452;}} else { - goto L29443;}} - L16724: { + goto L29452;}} + L16725: { SvalS = (*((long *) ((((char *) (-3 + (Sexception_handlersS)))) + (((opcode_740X)<<2))))); obj_939X = SvalS; if ((3 == (3 & obj_939X))) { if ((3 == (31 & ((((*((long *) ((((char *) (-3 + obj_939X))) + -4))))>>2))))) { - goto L16741;} + goto L16742;} else { - goto L16811;}} + goto L16812;}} else { - goto L16811;}} - L16797: { + goto L16812;}} + L16798: { merged_arg3K0 = "exception-handlers is not a vector"; loseD0_return_tag = 0; goto loseD0; loseD0_return_0: - goto L16724;} - L21038: { + goto L16725;} + L21039: { okayP_940X = arg2K0; key_941X = arg0K1; if (okayP_940X) { arg0K0 = key_941X; - goto L20966;} + goto L20967;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = key_941X; - goto L20966;}} - L20996: { + goto L20967;}} + L20997: { okayP_942X = arg2K0; temp_943X = arg0K1; if (okayP_942X) { arg0K0 = temp_943X; - goto L20977;} + goto L20978;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = temp_943X; - goto L20977;}} - L20780: { + goto L20978;}} + L20781: { start_i_944X = arg0K0; arg0K0 = start_i_944X; arg0K1 = 2; arg0K2 = (SenvS); - goto L20788;} - L20680: { + goto L20789;} + L20681: { key_945X = arg0K0; if ((1 == (ScontS))) { arg0K0 = 1; - goto L20684;} + goto L20685;} else { merged_arg0K0 = key_945X; merged_arg0K1 = 2; @@ -7279,8 +7281,8 @@ long s48_restart(long proc_345X, long nargs_346X) really_preserve_continuation_return_0: v_946X = really_preserve_continuation0_return_value; arg0K0 = v_946X; - goto L20684;}} - L19863: { + goto L20685;}} + L19864: { SstackS = ((((char *) (-3 + (Sbottom_of_stackS)))) + -8); *((long *) (((char *) (-3 + (Sbottom_of_stackS))))) = 1; ScontS = (Sbottom_of_stackS); @@ -7290,8 +7292,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = cont_402X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L19163: { + goto L16666;} + L19164: { v_947X = arg0K0; merged_arg0K0 = v_947X; copy_stack_into_heap_return_tag = 0; @@ -7299,10 +7301,10 @@ long s48_restart(long proc_345X, long nargs_346X) copy_stack_into_heap_return_0: if (((SstackS) < (Sstack_limitS))) { ps_error("Couldn't get default procedure space (how can this happen?)", 0); - goto L19120;} + goto L19121;} else { - goto L19120;}} - L16894: { + goto L19121;}} + L16895: { stack_arg_count_948X = arg0K0; *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); @@ -7319,11 +7321,11 @@ long s48_restart(long proc_345X, long nargs_346X) n_950X = (Spending_interruptsS) & (Senabled_interruptsS); arg0K0 = 0; arg0K1 = 1; - goto L16999;} - L19124: { + goto L17000;} + L19125: { arg1K0 = (Scode_pointerS); - goto L18438;} - L16080: { + goto L18439;} + L16081: { protocol_951X = arg0K0; stack_space_952X = arg0K1; if ((68 == protocol_951X)) { @@ -7334,11 +7336,11 @@ long s48_restart(long proc_345X, long nargs_346X) arg0K1 = stack_arg_count_771X; arg0K2 = 25; arg0K3 = 0; - goto L17161;} + goto L17162;} else { arg0K0 = skip_953X; arg0K1 = stack_arg_count_771X; - goto L16084;}} + goto L16085;}} else { skip_954X = *((unsigned char *) ((((char *) (-3 + code_772X))) + 5)); if ((0 == skip_954X)) { @@ -7346,10 +7348,10 @@ long s48_restart(long proc_345X, long nargs_346X) arg0K1 = stack_arg_count_771X; arg0K2 = 25; arg0K3 = 0; - goto L17161;} + goto L17162;} else { arg0K0 = skip_954X; - goto L16107;}}} + goto L16108;}}} else { if ((67 == protocol_951X)) { if ((stack_arg_count_771X < (*((unsigned char *) ((((char *) (-3 + code_772X))) + 2))))) { @@ -7357,10 +7359,10 @@ long s48_restart(long proc_345X, long nargs_346X) arg0K1 = stack_arg_count_771X; arg0K2 = 25; arg0K3 = 0; - goto L17161;} + goto L17162;} else { arg0K0 = 3; - goto L16107;}} + goto L16108;}} else { if ((65 == protocol_951X)) { wants_stack_args_955X = ((((*((unsigned char *) ((((char *) (-3 + code_772X))) + 2))))<<8)) + (*((unsigned char *) ((((char *) (-3 + code_772X))) + 3))); @@ -7369,7 +7371,7 @@ long s48_restart(long proc_345X, long nargs_346X) arg0K1 = stack_arg_count_771X; arg0K2 = 25; arg0K3 = 0; - goto L17161;} + goto L17162;} else { merged_arg0K0 = wants_stack_args_955X; merged_arg0K1 = stack_arg_count_771X; @@ -7380,46 +7382,46 @@ long s48_restart(long proc_345X, long nargs_346X) rest_list_setup_return_0: arg0K0 = 4; arg0K1 = (1 + wants_stack_args_955X); - goto L16084;}} + goto L16085;}} else { if ((63 < protocol_951X)) { if ((64 == protocol_951X)) { if (((((((*((unsigned char *) ((((char *) (-3 + code_772X))) + 2))))<<8)) + (*((unsigned char *) ((((char *) (-3 + code_772X))) + 3)))) == stack_arg_count_771X)) { arg0K0 = 4; arg0K1 = stack_arg_count_771X; - goto L16084;} + goto L16085;} else { arg0K0 = 4; arg0K1 = stack_arg_count_771X; arg0K2 = 25; arg0K3 = 0; - goto L17161;}} + goto L17162;}} else { if ((66 == protocol_951X)) { length_956X = (long)(((unsigned long)(*((long *) ((((char *) (-3 + code_772X))) + -4))))>>8); index_957X = -2 + length_956X; arg0K0 = (*((unsigned char *) ((((char *) (-3 + code_772X))) + (-3 + length_956X)))); arg0K1 = (((((*((unsigned char *) ((((char *) (-3 + code_772X))) + index_957X))))<<8)) + (*((unsigned char *) ((((char *) (-3 + code_772X))) + (1 + index_957X))))); - goto L16080;} + goto L16081;} else { ps_error("unknown protocol", 1, protocol_951X); arg0K0 = 4; arg0K1 = stack_arg_count_771X; arg0K2 = 25; arg0K3 = 0; - goto L17161;}}} + goto L17162;}}} else { if ((protocol_951X == stack_arg_count_771X)) { arg0K0 = 2; arg0K1 = stack_arg_count_771X; - goto L16084;} + goto L16085;} else { arg0K0 = 4; arg0K1 = stack_arg_count_771X; arg0K2 = 25; arg0K3 = 0; - goto L17161;}}}}}} - L16357: { + goto L17162;}}}}}} + L16358: { protocol_958X = arg0K0; stack_space_959X = arg0K1; if ((68 == protocol_958X)) { @@ -7430,7 +7432,7 @@ long s48_restart(long proc_345X, long nargs_346X) arg0K1 = stack_arg_count_784X; arg0K2 = list_args_785X; arg0K3 = list_arg_count_786X; - goto L17161;} + goto L17162;} else { merged_arg0K0 = list_args_785X; merged_arg0K1 = list_arg_count_786X; @@ -7439,7 +7441,7 @@ long s48_restart(long proc_345X, long nargs_346X) push_list_return_0: arg0K0 = skip_960X; arg0K1 = total_arg_count_790X; - goto L16361;}} + goto L16362;}} else { skip_961X = *((unsigned char *) ((((char *) (-3 + code_789X))) + 5)); if ((0 == skip_961X)) { @@ -7447,10 +7449,10 @@ long s48_restart(long proc_345X, long nargs_346X) arg0K1 = stack_arg_count_784X; arg0K2 = list_args_785X; arg0K3 = list_arg_count_786X; - goto L17161;} + goto L17162;} else { arg0K0 = skip_961X; - goto L16386;}}} + goto L16387;}}} else { if ((67 == protocol_958X)) { if ((total_arg_count_790X < (*((unsigned char *) ((((char *) (-3 + code_789X))) + 2))))) { @@ -7458,10 +7460,10 @@ long s48_restart(long proc_345X, long nargs_346X) arg0K1 = stack_arg_count_784X; arg0K2 = list_args_785X; arg0K3 = list_arg_count_786X; - goto L17161;} + goto L17162;} else { arg0K0 = 3; - goto L16386;}} + goto L16387;}} else { if ((63 < protocol_958X)) { if ((65 == protocol_958X)) { @@ -7471,7 +7473,7 @@ long s48_restart(long proc_345X, long nargs_346X) arg0K1 = stack_arg_count_784X; arg0K2 = list_args_785X; arg0K3 = list_arg_count_786X; - goto L17161;} + goto L17162;} else { merged_arg0K0 = wants_stack_args_962X; merged_arg0K1 = stack_arg_count_784X; @@ -7482,7 +7484,7 @@ long s48_restart(long proc_345X, long nargs_346X) rest_list_setup_return_1: arg0K0 = 4; arg0K1 = (1 + wants_stack_args_962X); - goto L16361;}} + goto L16362;}} else { if ((64 == protocol_958X)) { if (((((((*((unsigned char *) ((((char *) (-3 + code_789X))) + 2))))<<8)) + (*((unsigned char *) ((((char *) (-3 + code_789X))) + 3)))) == total_arg_count_790X)) { @@ -7493,27 +7495,27 @@ long s48_restart(long proc_345X, long nargs_346X) push_list_return_1: arg0K0 = 4; arg0K1 = total_arg_count_790X; - goto L16361;} + goto L16362;} else { arg0K0 = 4; arg0K1 = stack_arg_count_784X; arg0K2 = list_args_785X; arg0K3 = list_arg_count_786X; - goto L17161;}} + goto L17162;}} else { if ((66 == protocol_958X)) { length_963X = (long)(((unsigned long)(*((long *) ((((char *) (-3 + code_789X))) + -4))))>>8); index_964X = -2 + length_963X; arg0K0 = (*((unsigned char *) ((((char *) (-3 + code_789X))) + (-3 + length_963X)))); arg0K1 = (((((*((unsigned char *) ((((char *) (-3 + code_789X))) + index_964X))))<<8)) + (*((unsigned char *) ((((char *) (-3 + code_789X))) + (1 + index_964X))))); - goto L16357;} + goto L16358;} else { ps_error("unknown protocol", 1, protocol_958X); arg0K0 = 4; arg0K1 = stack_arg_count_784X; arg0K2 = list_args_785X; arg0K3 = list_arg_count_786X; - goto L17161;}}}} + goto L17162;}}}} else { if ((protocol_958X == total_arg_count_790X)) { merged_arg0K0 = list_args_785X; @@ -7523,14 +7525,14 @@ long s48_restart(long proc_345X, long nargs_346X) push_list_return_2: arg0K0 = 2; arg0K1 = total_arg_count_790X; - goto L16361;} + goto L16362;} else { arg0K0 = 4; arg0K1 = stack_arg_count_784X; arg0K2 = list_args_785X; arg0K3 = list_arg_count_786X; - goto L17161;}}}}} - L20438: { + goto L17162;}}}}} + L20439: { cont_965X = arg0K0; if ((3 == (3 & cont_965X))) { if ((9 == (31 & ((((*((long *) ((((char *) (-3 + cont_965X))) + -4))))>>2))))) { @@ -7540,16 +7542,16 @@ long s48_restart(long proc_345X, long nargs_346X) goto pop_continuationB; pop_continuationB_return_2: arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { if ((30 == next_op_966X)) { next_967X = *((long *) (((char *) (-3 + (ScontS))))); if (((ScontS) == (Sbottom_of_stackS))) { *((long *) (((char *) (-3 + (ScontS))))) = (*((long *) (((char *) (-3 + next_967X))))); - goto L19282;} + goto L19283;} else { ScontS = next_967X; - goto L19282;}} + goto L19283;}} else { merged_arg0K0 = list_args_802X; merged_arg0K1 = stack_nargs_801X; @@ -7563,12 +7565,12 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = args_968X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}}} + goto L16666;}}} else { - goto L20444;}} + goto L20445;}} else { - goto L20444;}} - L18932: { + goto L20445;}} + L18933: { v_969X = arg0K0; merged_arg0K0 = v_969X; copy_stack_into_heap_return_tag = 1; @@ -7576,65 +7578,65 @@ long s48_restart(long proc_345X, long nargs_346X) copy_stack_into_heap_return_1: if (((SstackS) < (Sstack_limitS))) { ps_error("Couldn't get default procedure space (how can this happen?)", 0); - goto L18817;} + goto L18818;} else { - goto L18817;}} - L18826: { + goto L18818;}} + L18827: { arg0K0 = (*((unsigned char *) ((Scode_pointerS) + 3))); - goto L16894;} - L18829: { + goto L16895;} + L18830: { arg1K0 = (Scode_pointerS); - goto L18438;} - L18987: { + goto L18439;} + L18988: { v_970X = arg0K0; merged_arg0K0 = v_970X; copy_stack_into_heap_return_tag = 2; goto copy_stack_into_heap; copy_stack_into_heap_return_2: if ((space_436X < (64 + (((((SstackS) - (Sstack_limitS)))>>2))))) { - goto L18817;} + goto L18818;} else { ps_error("VM's stack is too small (how can this happen?)", 0); - goto L18817;}} - L10628: { + goto L18818;}} + L10629: { if ((3 == (3 & x_456X))) { if ((18 == (31 & ((((*((long *) ((((char *) (-3 + x_456X))) + -4))))>>2))))) { arg0K0 = 5; - goto L38038;} + goto L38047;} else { - goto L10634;}} + goto L10635;}} else { - goto L10634;}} - L28396: { + goto L10635;}} + L28405: { SvalS = 1; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L28537: { + goto L18439;} + L28546: { if ((3 == (3 & n_458X))) { if ((18 == (31 & ((((*((long *) ((((char *) (-3 + n_458X))) + -4))))>>2))))) { - goto L28548;} + goto L28557;} else { - goto L28549;}} + goto L28558;}} else { - goto L28549;}} - L28736: { + goto L28558;}} + L28745: { if ((3 == (3 & n_459X))) { if ((18 == (31 & ((((*((long *) ((((char *) (-3 + n_459X))) + -4))))>>2))))) { - goto L28747;} + goto L28756;} else { - goto L28748;}} + goto L28757;}} else { - goto L28748;}} - L28935: { + goto L28757;}} + L28944: { if ((3 == (3 & n_460X))) { if ((18 == (31 & ((((*((long *) ((((char *) (-3 + n_460X))) + -4))))>>2))))) { - goto L28946;} + goto L28955;} else { - goto L28947;}} + goto L28956;}} else { - goto L28947;}} - L6779: { + goto L28956;}} + L6780: { b_971X = arg0K0; lo_a_972X = 65535 & a_815X; lo_b_973X = 65535 & b_971X; @@ -7653,26 +7655,26 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_468X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { - goto L6821;}} + goto L6822;}} else { - goto L6821;}} - L7060: { + goto L6822;}} + L7061: { b_981X = arg0K0; c_982X = a_816X / b_981X; x_983X = 0 == (a_816X % b_981X); if (x_983X) { if ((a_476X < 0)) { if ((b_477X < 0)) { - goto L7115;} + goto L7116;} else { - goto L7114;}} + goto L7115;}} else { if ((b_477X < 0)) { - goto L7114;} + goto L7115;} else { - goto L7115;}}} + goto L7116;}}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_474X; @@ -7680,129 +7682,129 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_475X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} - L7237: { + goto L16666;}} + L7238: { b_984X = arg0K0; c_985X = a_822X / b_984X; if ((a_490X < 0)) { if ((b_491X < 0)) { - goto L7283;} + goto L7284;} else { - goto L7282;}} + goto L7283;}} else { if ((b_491X < 0)) { - goto L7282;} + goto L7283;} else { - goto L7283;}}} - L25340: { + goto L7284;}}} + L25349: { b_986X = arg0K0; c_987X = a_823X % b_986X; if ((a_494X < 0)) { arg0K0 = (0 - c_987X); - goto L25344;} + goto L25353;} else { arg0K0 = c_987X; - goto L25344;}} - L21336: { + goto L25353;}} + L21337: { SvalS = new_834X; Scode_pointerS = ((Scode_pointerS) + 3); arg1K0 = (Scode_pointerS); - goto L18438;} - L21320: { + goto L18439;} + L21321: { i_988X = arg0K0; if ((i_988X < 0)) { - goto L21336;} + goto L21337;} else { SstackS = ((SstackS) + 4); *((long *) ((((char *) (-3 + new_834X))) + (((i_988X)<<2)))) = (*((long *) (SstackS))); arg0K0 = (-1 + i_988X); - goto L21320;}} - L21505: { + goto L21321;}} + L21506: { i_989X = arg0K0; if ((i_989X < 0)) { arg0K0 = stack_nargs_839X; arg0K1 = rest_list_840X; - goto L21523;} + goto L21524;} else { SstackS = ((SstackS) + 4); *((long *) ((((char *) (-3 + new_838X))) + (((i_989X)<<2)))) = (*((long *) (SstackS))); arg0K0 = (-1 + i_989X); - goto L21505;}} - L22028: { + goto L21506;}} + L22029: { i_990X = arg0K0; if ((i_990X < 0)) { SvalS = value_845X; Scode_pointerS = ((Scode_pointerS) + 2); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { addr_991X = (((char *) (-3 + value_845X))) + (((i_990X)<<2)); S48_WRITE_BARRIER(value_845X, addr_991X, init_842X); *((long *) addr_991X) = init_842X; arg0K0 = (-1 + i_990X); - goto L22028;}} - L26115: { + goto L22029;}} + L26124: { i_992X = arg0K0; if ((i_992X < 0)) { SvalS = vector_847X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { *((unsigned char *) ((((char *) (-3 + vector_847X))) + i_992X)) = init_584X; arg0K0 = (-1 + i_992X); - goto L26115;}} - L26349: { + goto L26124;}} + L26358: { i_993X = arg0K0; if ((i_993X < 0)) { SvalS = string_850X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { *((unsigned char *) ((((char *) (-3 + string_850X))) + i_993X)) = (init_600X); arg0K0 = (-1 + i_993X); - goto L26349;}} - L13333: { + goto L26358;}} + L13334: { i_994X = arg0K0; h_995X = arg0K1; if ((i_994X < n_854X)) { arg0K0 = (1 + i_994X); arg0K1 = (h_995X + (((*((unsigned char *) ((((char *) (-3 + string_853X))) + i_994X)))))); - goto L13333;} + goto L13334;} else { index_996X = 1023 & h_995X; bucket_997X = *((long *) ((((char *) (-3 + table_852X))) + (((index_996X)<<2)))); arg0K0 = bucket_997X; - goto L13301;}} - L24488: { + goto L13302;}} + L24497: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} - L29550: { + goto L16666;} + L29559: { SvalS = 13; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L33097: { + goto L18439;} + L33106: { key_998X = arg0K0; SstackS = ((SstackS) + 4); arg2_999X = *((long *) (SstackS)); if ((0 == (3 & (SvalS)))) { mode_1000X = (((SvalS))>>2); if ((1 == mode_1000X)) { - goto L26773;} + goto L26782;} else { if ((2 == mode_1000X)) { - goto L26773;} + goto L26782;} else { if ((3 == mode_1000X)) { - goto L26773;} + goto L26782;} else { if ((4 == mode_1000X)) { - goto L26773;} + goto L26782;} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_999X; @@ -7810,7 +7812,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (((mode_1000X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}}}}} + goto L16666;}}}}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_999X; @@ -7818,8 +7820,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} - L34456: { + goto L16666;}} + L34465: { key_1001X = arg0K0; obj_1002X = SvalS; if ((3 == (3 & obj_1002X))) { @@ -7830,14 +7832,14 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = channel_1003X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} + goto L16666;} else { status_1004X = close_channelB(channel_1003X); if ((status_1004X == NO_ERRORS)) { SvalS = 13; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { push_exception_continuationB(25, 1); *((long *) (SstackS)) = channel_1003X; @@ -7851,12 +7853,12 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_1005X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}}} + goto L16666;}}} else { - goto L34464;}} + goto L34473;}} else { - goto L34464;}} - L37273: { + goto L34473;}} + L37282: { key_1006X = arg0K0; SstackS = ((SstackS) + 4); arg2_1007X = *((long *) (SstackS)); @@ -7868,15 +7870,15 @@ long s48_restart(long proc_345X, long nargs_346X) arg5_1010X = *((long *) (SstackS)); if ((0 == (3 & (arg4_1009X | arg3_1008X)))) { if ((1 == arg2_1007X)) { - goto L37305;} + goto L37314;} else { if ((5 == arg2_1007X)) { - goto L37305;} + goto L37314;} else { - goto L37325;}}} + goto L37334;}}} else { - goto L37325;}} - L37545: { + goto L37334;}} + L37554: { key_1011X = arg0K0; SstackS = ((SstackS) + 4); arg2_1012X = *((long *) (SstackS)); @@ -7895,21 +7897,21 @@ long s48_restart(long proc_345X, long nargs_346X) if (v_1019X) { if ((3 == (3 & arg4_1014X))) { if ((16 == (31 & ((((*((long *) ((((char *) (-3 + arg4_1014X))) + -4))))>>2))))) { - goto L36856;} + goto L36865;} else { - goto L36848;}} + goto L36857;}} else { - goto L36848;}} + goto L36857;}} else { arg0K0 = 5; - goto L36739;}} + goto L36748;}} else { - goto L37587;}} + goto L37596;}} else { - goto L37587;}} + goto L37596;}} else { - goto L37587;}} - L8203: { + goto L37596;}} + L8204: { val_1020X = *((long *) ((((char *) (-3 + ch_868X))) + 12)); addr_1021X = (((char *) (-3 + prev_869X))) + 12; S48_WRITE_BARRIER(prev_869X, addr_1021X, val_1020X); @@ -7918,15 +7920,15 @@ long s48_restart(long proc_345X, long nargs_346X) S48_WRITE_BARRIER(ch_868X, addr_1022X, 1); *((long *) addr_1022X) = 1; arg0K0 = (*((long *) ((((char *) (-3 + ch_868X))) + 16))); - goto L33202;} - L14784: { + goto L33211;} + L14785: { i_1023X = arg0K0; res_1024X = arg0K1; if ((-1 == i_1023X)) { SvalS = res_1024X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { channel_1025X = *((Svm_channelsS) + i_1023X); if ((3 == (3 & channel_1025X))) { @@ -7937,14 +7939,14 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (((char *) (-3 + x_1027X)))) = channel_1025X; *((long *) ((((char *) (-3 + x_1027X))) + 4)) = res_1024X; arg0K0 = x_1027X; - goto L14798;} + goto L14799;} else { arg0K0 = res_1024X; - goto L14798;}} + goto L14799;}} else { arg0K0 = res_1024X; - goto L14798;}}} - L34529: { + goto L14799;}}} + L34538: { key_1028X = arg0K0; SstackS = ((SstackS) + 4); arg2_1029X = *((long *) (SstackS)); @@ -7971,7 +7973,7 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = 13; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { push_exception_continuationB(26, 1); *((long *) (SstackS)) = arg3_1030X; @@ -7985,41 +7987,41 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (((undumpable_count_1040X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 5; - goto L16665;}} + goto L16666;}} else { arg0K0 = 25; arg0K1 = status_1038X; - goto L30184;}} + goto L30193;}} else { status_1041X = ps_close(port_1034X); if ((status_1041X == NO_ERRORS)) { arg0K0 = 25; arg0K1 = status_1037X; - goto L30184;} + goto L30193;} else { ps_write_string("Unable to close image file", (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } arg0K0 = 25; arg0K1 = status_1037X; - goto L30184;}}} + goto L30193;}}} else { status_1042X = ps_close(port_1034X); if ((status_1042X == NO_ERRORS)) { arg0K0 = 25; arg0K1 = status_1036X; - goto L30184;} + goto L30193;} else { ps_write_string("Unable to close image file", (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } arg0K0 = 25; arg0K1 = status_1036X; - goto L30184;}}} + goto L30193;}}} else { arg0K0 = 10; arg0K1 = status_1035X; - goto L30184;}} + goto L30193;}} else { push_exception_continuationB(15, 1); *((long *) (SstackS)) = arg3_1030X; @@ -8029,24 +8031,24 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = comment_string_1032X; SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16665;}} + goto L16666;}} else { - goto L34561;}} + goto L34570;}} else { - goto L34561;}} + goto L34570;}} else { - goto L34561;}} + goto L34570;}} else { - goto L34561;}} - L30563: { + goto L34570;}} + L30572: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = stob_877X; SstackS = ((SstackS) + -4); *((long *) (SstackS)) = proc_878X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L34107: { + goto L16666;} + L34116: { minutesP_1043X = arg2K0; if ((s48_Spending_interruptPS)) { if ((s48_Spending_eventsPS)) { @@ -8056,22 +8058,22 @@ long s48_restart(long proc_345X, long nargs_346X) check_events_return_2: temp_1044X = check_events0_return_value; if (temp_1044X) { - goto L34133;} + goto L34142;} else { - goto L34138;}} + goto L34147;}} else { - goto L34133;}} + goto L34142;}} else { - goto L34138;}} - L22847: { + goto L34147;}} + L22850: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = proc_896X; SstackS = ((SstackS) + -4); *((long *) (SstackS)) = name_897X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L33368: { + goto L16666;} + L33377: { key_1045X = arg0K0; SstackS = ((SstackS) + 4); arg2_1046X = *((long *) (SstackS)); @@ -8079,23 +8081,23 @@ long s48_restart(long proc_345X, long nargs_346X) if ((16 == (31 & ((((*((long *) ((((char *) (-3 + arg2_1046X))) + -4))))>>2))))) { x_1047X = SvalS; if ((1 == x_1047X)) { - goto L33385;} + goto L33394;} else { if ((5 == x_1047X)) { - goto L33385;} + goto L33394;} else { - goto L33390;}}} + goto L33399;}}} else { - goto L33390;}} + goto L33399;}} else { - goto L33390;}} - L23938: { + goto L33399;}} + L23947: { table_1048X = arg0K0; n_1049X = -1 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + arg2_686X))) + -4))))>>8)); arg0K0 = 0; arg0K1 = 0; - goto L12880;} - L27369: { + goto L12881;} + L27378: { len_1050X = 1 + n_907X; addr_1051X = ALLOCATE_SPACE(16, (4 + len_1050X)); *((long *) addr_1051X) = (66 + (((len_1050X)<<8))); @@ -8103,10 +8105,10 @@ long s48_restart(long proc_345X, long nargs_346X) *((unsigned char *) ((((char *) (-3 + string_1052X))) + n_907X)) = 0; arg0K0 = arg2_906X; arg0K1 = (-1 + n_907X); - goto L27346;} - L27321: { + goto L27355;} + L27330: { if ((25 == arg2_906X)) { - goto L27369;} + goto L27378;} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_906X; @@ -8114,34 +8116,34 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (((n_907X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} - L30968: { + goto L16666;}} + L30977: { if ((from_index_727X < 0)) { - goto L31022;} + goto L31031;} else { if ((to_index_728X < 0)) { - goto L31022;} + goto L31031;} else { if ((count_729X < 0)) { - goto L31022;} + goto L31031;} else { if ((3 == (3 & arg5_726X))) { if ((16 == (31 & ((((*((long *) ((((char *) (-3 + arg5_726X))) + -4))))>>2))))) { arg0K0 = (-1 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + arg5_726X))) + -4))))>>8))); - goto L30989;} + goto L30998;} else { - goto L30985;}} + goto L30994;}} else { - goto L30985;}}}}} - L30963: { + goto L30994;}}}}} + L30972: { if ((3 == (3 & arg5_726X))) { if ((17 == (31 & ((((*((long *) ((((char *) (-3 + arg5_726X))) + -4))))>>2))))) { - goto L30968;} + goto L30977;} else { - goto L31022;}} + goto L31031;}} else { - goto L31022;}} - L31022: { + goto L31031;}} + L31031: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg5_726X; SstackS = ((SstackS) + -4); @@ -8154,86 +8156,86 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (((count_729X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 5; - goto L16665;} - L23097: { + goto L16666;} + L23106: { push_exception_continuationB(5, 2); *((long *) (SstackS)) = port_913X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} - L23077: { + goto L16666;} + L23086: { push_exception_continuationB(14, 2); *((long *) (SstackS)) = port_913X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} - L23317: { + goto L16666;} + L23326: { push_exception_continuationB(5, 2); *((long *) (SstackS)) = port_921X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} - L23297: { + goto L16666;} + L23306: { push_exception_continuationB(14, 2); *((long *) (SstackS)) = port_921X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} - L23531: { + goto L16666;} + L23540: { push_exception_continuationB(5, 2); *((long *) (SstackS)) = Kchar_927X; SstackS = ((SstackS) + -4); *((long *) (SstackS)) = port_928X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L23513: { + goto L16666;} + L23522: { push_exception_continuationB(14, 2); *((long *) (SstackS)) = Kchar_927X; SstackS = ((SstackS) + -4); *((long *) (SstackS)) = port_928X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L29458: { + goto L16666;} + L29467: { arg0K0 = (*((long *) ((((char *) (-3 + stuff_935X))) + 4))); - goto L29452;} - L11650: { + goto L29461;} + L11651: { if ((3 == (3 & thing_936X))) { if ((16 == (31 & ((((*((long *) ((((char *) (-3 + thing_936X))) + -4))))>>2))))) { arg3K0 = (((char *)(((char *) (-3 + thing_936X))))); - goto L11692;} + goto L11693;} else { - goto L11658;}} + goto L11659;}} else { - goto L11658;}} - L29443: { + goto L11659;}} + L29452: { { long ignoreXX; PS_WRITE_CHAR(10, out_738X, ignoreXX) } SvalS = 13; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L16741: { + goto L18439;} + L16742: { StemplateS = (SvalS); Slosing_opcodeS = opcode_740X; arg0K0 = (2 + nargs_739X); - goto L16066;} - L16811: { + goto L16067;} + L16812: { merged_arg3K0 = "exception handler is not a closure"; loseD0_return_tag = 1; goto loseD0; loseD0_return_1: - goto L16741;} - L20966: { + goto L16742;} + L20967: { key_1053X = arg0K0; p_1054X = SenvS; if ((3 == (3 & p_1054X))) { if ((p_1054X < (((long) (Sstack_beginS))))) { - goto L21061;} + goto L21062;} else { if (((((long) (Sstack_endS))) < p_1054X)) { - goto L21061;} + goto L21062;} else { merged_arg0K0 = (SenvS); merged_arg0K1 = (ScontS); @@ -8244,10 +8246,10 @@ long s48_restart(long proc_345X, long nargs_346X) save_env_in_heap_return_0: v_1055X = save_env_in_heap0_return_value; SenvS = v_1055X; - goto L21061;}}} + goto L21062;}}} else { - goto L21061;}} - L20977: { + goto L21062;}} + L20978: { env_1056X = arg0K0; a_1057X = *((long *) ((((char *) (-3 + (StemplateS)))) + ((((((((*((unsigned char *) ((Scode_pointerS) + 1))))<<8)) + (*((unsigned char *) ((Scode_pointerS) + 2)))))<<2)))); addr_1058X = ALLOCATE_SPACE(3, 12); @@ -8259,14 +8261,14 @@ long s48_restart(long proc_345X, long nargs_346X) if ((0 == (128 & (*((long *) ((((char *) (-3 + x_1059X))) + -4)))))) { *((long *) ((((char *) (-3 + x_1059X))) + -4)) = (128 | (*((long *) ((((char *) (-3 + x_1059X))) + -4)))); arg0K0 = x_1059X; - goto L20985;} + goto L20986;} else { arg0K0 = x_1059X; - goto L20985;}} + goto L20986;}} else { arg0K0 = x_1059X; - goto L20985;}} - L20788: { + goto L20986;}} + L20789: { i_1060X = arg0K0; offset_1061X = arg0K1; env_1062X = arg0K2; @@ -8274,25 +8276,25 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = new_env_762X; Scode_pointerS = ((Scode_pointerS) + (1 + offset_1061X)); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { back_1063X = *((unsigned char *) ((Scode_pointerS) + (1 + offset_1061X))); arg0K0 = env_1062X; arg0K1 = back_1063X; - goto L20884;}} - L20684: { + goto L20885;}} + L20685: { value_1064X = arg0K0; SvalS = value_1064X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L16999: { + goto L18439;} + L17000: { i_1065X = arg0K0; m_1066X = arg0K1; if ((0 == (n_950X & m_1066X))) { arg0K0 = (1 + i_1065X); arg0K1 = (((m_1066X)<<1)); - goto L16999;} + goto L17000;} else { Spending_interruptsS = ((Spending_interruptsS) & (~ m_1066X)); if ((i_1065X == 0)) { @@ -8302,7 +8304,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = ((((Senabled_interruptsS))<<2)); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16918;} + goto L16919;} else { if ((i_1065X == 2)) { *((long *) (SstackS)) = (Sfinalize_theseS); @@ -8311,7 +8313,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = ((((Senabled_interruptsS))<<2)); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16918;} + goto L16919;} else { if ((i_1065X == 3)) { channel_1067X = Spending_channels_headS; @@ -8323,10 +8325,10 @@ long s48_restart(long proc_345X, long nargs_346X) if ((1 == next_1068X)) { Spending_channels_tailS = 1; arg0K0 = channel_1067X; - goto L8364;} + goto L8365;} else { arg0K0 = channel_1067X; - goto L8364;}} + goto L8365;}} else { if ((i_1065X == 4)) { *((long *) (SstackS)) = (Sos_signal_typeS); @@ -8338,13 +8340,13 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = ((((Senabled_interruptsS))<<2)); SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16918;} + goto L16919;} else { *((long *) (SstackS)) = ((((Senabled_interruptsS))<<2)); SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16918;}}}}}} - L16084: { + goto L16919;}}}}}} + L16085: { skip_1070X = arg0K0; stack_arg_count_1071X = arg0K1; template_1072X = *((long *) (((char *) (-3 + (SvalS))))); @@ -8353,8 +8355,8 @@ long s48_restart(long proc_345X, long nargs_346X) SenvS = (*((long *) ((((char *) (-3 + (SvalS)))) + 4))); arg0K0 = stack_space_952X; arg0K1 = stack_arg_count_1071X; - goto L15974;} - L16107: { + goto L15975;} + L16108: { skip_1073X = arg0K0; *((long *) (SstackS)) = 25; SstackS = ((SstackS) + -4); @@ -8364,8 +8366,8 @@ long s48_restart(long proc_345X, long nargs_346X) SstackS = ((SstackS) + -4); arg0K0 = skip_1073X; arg0K1 = (3 + stack_arg_count_771X); - goto L16084;} - L16361: { + goto L16085;} + L16362: { skip_1074X = arg0K0; stack_arg_count_1075X = arg0K1; template_1076X = *((long *) (((char *) (-3 + (SvalS))))); @@ -8374,26 +8376,26 @@ long s48_restart(long proc_345X, long nargs_346X) SenvS = (*((long *) ((((char *) (-3 + (SvalS)))) + 4))); arg0K0 = stack_space_959X; arg0K1 = stack_arg_count_1075X; - goto L15974;} - L16386: { + goto L15975;} + L16387: { skip_1077X = arg0K0; if ((total_arg_count_790X < 3)) { arg0K0 = total_arg_count_790X; - goto L16394;} + goto L16395;} else { if ((2 < stack_arg_count_784X)) { arg0K0 = stack_arg_count_784X; - goto L16394;} + goto L16395;} else { arg0K0 = 2; - goto L16394;}}} - L19282: { + goto L16395;}}} + L19283: { SvalS = (*((long *) ((((char *) (-3 + cont_965X))) + 16))); arg0K0 = stack_nargs_801X; arg0K1 = list_args_802X; arg0K2 = list_arg_count_803X; - goto L17666;} - L20444: { + goto L17667;} + L20445: { merged_arg0K0 = list_args_802X; merged_arg0K1 = stack_nargs_801X; pop_args_GlistS_return_tag = 4; @@ -8406,55 +8408,55 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = args_1078X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L10634: { + goto L16666;} + L10635: { if ((3 == (3 & x_456X))) { if ((10 == (31 & ((((*((long *) ((((char *) (-3 + x_456X))) + -4))))>>2))))) { arg0K0 = 5; - goto L38038;} + goto L38047;} else { arg0K0 = 1; - goto L38038;}} + goto L38047;}} else { arg0K0 = 1; - goto L38038;}} - L28549: { + goto L38047;}} + L28558: { if ((3 == (3 & n_458X))) { if ((10 == (31 & ((((*((long *) ((((char *) (-3 + n_458X))) + -4))))>>2))))) { push_exception_continuationB(5, 1); *((long *) (SstackS)) = n_458X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} + goto L16666;} else { - goto L28553;}} + goto L28562;}} else { - goto L28553;}} - L28748: { + goto L28562;}} + L28757: { if ((3 == (3 & n_459X))) { if ((10 == (31 & ((((*((long *) ((((char *) (-3 + n_459X))) + -4))))>>2))))) { push_exception_continuationB(5, 1); *((long *) (SstackS)) = n_459X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} + goto L16666;} else { - goto L28752;}} + goto L28761;}} else { - goto L28752;}} - L28947: { + goto L28761;}} + L28956: { if ((3 == (3 & n_460X))) { if ((10 == (31 & ((((*((long *) ((((char *) (-3 + n_460X))) + -4))))>>2))))) { push_exception_continuationB(5, 1); *((long *) (SstackS)) = n_460X; SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} + goto L16666;} else { - goto L28951;}} + goto L28960;}} else { - goto L28951;}} - L6821: { + goto L28960;}} + L6822: { if ((536870911 < lo_c_976X)) { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_467X; @@ -8462,7 +8464,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_468X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { if ((lo_c_976X < 0)) { push_exception_continuationB(5, 1); @@ -8471,7 +8473,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_468X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { if ((8192 < mid_c_979X)) { push_exception_continuationB(5, 1); @@ -8480,19 +8482,19 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_468X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { if ((a_469X < 0)) { if ((b_470X < 0)) { - goto L6848;} + goto L6849;} else { - goto L6855;}} + goto L6856;}} else { if ((b_470X < 0)) { - goto L6855;} + goto L6856;} else { - goto L6848;}}}}}} - L7115: { + goto L6849;}}}}}} + L7116: { if ((536870911 < c_982X)) { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_474X; @@ -8500,18 +8502,18 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_475X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { SvalS = (((c_982X)<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;}} - L7114: { + goto L18439;}} + L7115: { SvalS = ((((0 - c_982X))<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L7283: { + goto L18439;} + L7284: { if ((536870911 < c_985X)) { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_488X; @@ -8519,37 +8521,37 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_489X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { SvalS = (((c_985X)<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;}} - L7282: { + goto L18439;}} + L7283: { SvalS = ((((0 - c_985X))<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L25344: { + goto L18439;} + L25353: { n_1079X = arg0K0; SvalS = (((n_1079X)<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L21523: { + goto L18439;} + L21524: { i_1080X = arg0K0; rest_list_1081X = arg0K1; if ((25 == rest_list_1081X)) { SvalS = new_838X; Scode_pointerS = ((Scode_pointerS) + 2); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { *((long *) ((((char *) (-3 + new_838X))) + (((i_1080X)<<2)))) = (*((long *) (((char *) (-3 + rest_list_1081X))))); arg0K0 = (1 + i_1080X); arg0K1 = (*((long *) ((((char *) (-3 + rest_list_1081X))) + 4))); - goto L21523;}} - L13301: { + goto L21524;}} + L13302: { foo_1082X = arg0K0; if ((1 == foo_1082X)) { addr_1083X = ALLOCATE_SPACE(1, 12); @@ -8561,19 +8563,19 @@ long s48_restart(long proc_345X, long nargs_346X) S48_WRITE_BARRIER(table_852X, addr_1085X, x_1084X); *((long *) addr_1085X) = x_1084X; arg0K0 = x_1084X; - goto L24529;} + goto L24538;} else { s2_1086X = *((long *) (((char *) (-3 + foo_1082X)))); len_1087X = (long)(((unsigned long)(*((long *) ((((char *) (-3 + string_853X))) + -4))))>>8); if ((len_1087X == ((long)(((unsigned long)(*((long *) ((((char *) (-3 + s2_1086X))) + -4))))>>8)))) { if (((!memcmp((void *)(((char *) (-3 + s2_1086X))), (void *)(((char *) (-3 + string_853X))),len_1087X)))) { arg0K0 = foo_1082X; - goto L24529;} + goto L24538;} else { - goto L13317;}} + goto L13318;}} else { - goto L13317;}}} - L26773: { + goto L13318;}}} + L26782: { if ((0 == (3 & arg2_999X))) { if (((((arg2_999X)>>2)) < 0)) { push_exception_continuationB(5, 1); @@ -8582,23 +8584,23 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (((mode_1000X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { arg0K0 = (((arg2_999X)>>2)); - goto L26593;}} + goto L26602;}} else { if ((3 == (3 & arg2_999X))) { if ((16 == (31 & ((((*((long *) ((((char *) (-3 + arg2_999X))) + -4))))>>2))))) { if ((1 == mode_1000X)) { - goto L26651;} + goto L26660;} else { if ((3 == mode_1000X)) { - goto L26651;} + goto L26660;} else { v_1088X = ps_open_fd((((char *)(((char *) (-3 + arg2_999X))))), 0, &v_1089X); arg0K0 = v_1088X; arg0K1 = v_1089X; - goto L26664;}}} + goto L26673;}}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_999X; @@ -8606,7 +8608,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (((mode_1000X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} else { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_999X; @@ -8614,29 +8616,29 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (((mode_1000X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}}} - L34464: { + goto L16666;}}} + L34473: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 1; - goto L16665;} - L37305: { + goto L16666;} + L37314: { obj_1090X = SvalS; if ((3 == (3 & obj_1090X))) { if ((5 == (31 & ((((*((long *) ((((char *) (-3 + obj_1090X))) + -4))))>>2))))) { x_1091X = SvalS; if ((1 == arg2_1007X)) { arg2K0 = 0; - goto L37322;} + goto L37331;} else { arg2K0 = 1; - goto L37322;}} + goto L37331;}} else { - goto L37325;}} + goto L37334;}} else { - goto L37325;}} - L37325: { + goto L37334;}} + L37334: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg5_1010X; SstackS = ((SstackS) + -4); @@ -8649,27 +8651,27 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 5; - goto L16665;} - L36856: { + goto L16666;} + L36865: { if ((3 == (3 & arg4_1014X))) { if ((16 == (31 & ((((*((long *) ((((char *) (-3 + arg4_1014X))) + -4))))>>2))))) { arg0K0 = (-1 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + arg4_1014X))) + -4))))>>8))); - goto L36868;} + goto L36877;} else { - goto L36864;}} + goto L36873;}} else { - goto L36864;}} - L36848: { + goto L36873;}} + L36857: { if ((3 == (3 & arg4_1014X))) { if ((17 == (31 & ((((*((long *) ((((char *) (-3 + arg4_1014X))) + -4))))>>2))))) { - goto L36856;} + goto L36865;} else { arg0K0 = 5; - goto L36739;}} + goto L36748;}} else { arg0K0 = 5; - goto L36739;}} - L36739: { + goto L36748;}} + L36748: { reason_1092X = arg0K0; push_exception_continuationB(reason_1092X, 1); *((long *) (SstackS)) = arg4_1014X; @@ -8681,8 +8683,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = channel_1018X; SstackS = ((SstackS) + -4); arg0K0 = 4; - goto L16665;} - L37587: { + goto L16666;} + L37596: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg4_1014X; SstackS = ((SstackS) + -4); @@ -8693,13 +8695,13 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 4; - goto L16665;} - L14798: { + goto L16666;} + L14799: { v_1093X = arg0K0; arg0K0 = (-1 + i_1023X); arg0K1 = v_1093X; - goto L14784;} - L30184: { + goto L14785;} + L30193: { reason_1094X = arg0K0; status_1095X = arg0K1; push_exception_continuationB(reason_1094X, 1); @@ -8718,8 +8720,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_1096X; SstackS = ((SstackS) + -4); arg0K0 = 4; - goto L16665;} - L34561: { + goto L16666;} + L34570: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg3_1030X; SstackS = ((SstackS) + -4); @@ -8728,100 +8730,100 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16665;} - L34133: { + goto L16666;} + L34142: { SvalS = 13; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L34138: { + goto L18439;} + L34147: { if ((0 == (Spending_interruptsS))) { s48_wait_for_event((((arg2_678X)>>2)), minutesP_1043X); - goto L34133;} + goto L34142;} else { - goto L34133;}} - L33385: { + goto L34142;}} + L33394: { if ((1 == (SvalS))) { v_1097X = Hlookup2102((Sexported_bindingsS), arg2_1046X, key_1045X); arg0K0 = v_1097X; - goto L33442;} + goto L33451;} else { v_1098X = Hlookup2083((Simported_bindingsS), arg2_1046X, key_1045X); arg0K0 = v_1098X; - goto L33442;}} - L33390: { + goto L33451;}} + L33399: { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_1046X; SstackS = ((SstackS) + -4); *((long *) (SstackS)) = (SvalS); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} - L12880: { + goto L16666;} + L12881: { i_1099X = arg0K0; h_1100X = arg0K1; if ((i_1099X < n_1049X)) { arg0K0 = (1 + i_1099X); arg0K1 = (h_1100X + (((*((unsigned char *) ((((char *) (-3 + arg2_686X))) + i_1099X)))))); - goto L12880;} + goto L12881;} else { index_1101X = 1023 & h_1100X; bucket_1102X = *((long *) ((((char *) (-3 + table_1048X))) + (((index_1101X)<<2)))); arg0K0 = 1; arg0K1 = bucket_1102X; - goto L12844;}} - L27346: { + goto L12845;}} + L27355: { l_1103X = arg0K0; i_1104X = arg0K1; if ((i_1104X < 0)) { SvalS = string_1052X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { *((unsigned char *) ((((char *) (-3 + string_1052X))) + i_1104X)) = ((((((*((long *) (((char *) (-3 + l_1103X))))))>>8)))); arg0K0 = (*((long *) ((((char *) (-3 + l_1103X))) + 4))); arg0K1 = (-1 + i_1104X); - goto L27346;}} - L30989: { + goto L27355;}} + L30998: { y_1105X = arg0K0; if ((y_1105X < (from_index_727X + count_729X))) { - goto L31022;} + goto L31031;} else { if ((3 == (3 & arg3_724X))) { if ((16 == (31 & ((((*((long *) ((((char *) (-3 + arg3_724X))) + -4))))>>2))))) { arg0K0 = (-1 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + arg3_724X))) + -4))))>>8))); - goto L31004;} + goto L31013;} else { - goto L31000;}} + goto L31009;}} else { - goto L31000;}}} - L30985: { + goto L31009;}}} + L30994: { arg0K0 = ((long)(((unsigned long)(*((long *) ((((char *) (-3 + arg5_726X))) + -4))))>>8)); - goto L30989;} - L11692: { + goto L30998;} + L11693: { v_1106X = arg3K0; ps_write_string(v_1106X, out_738X); - goto L29458;} - L11658: { + goto L29467;} + L11659: { if ((3 == (3 & thing_936X))) { if ((1 == (31 & ((((*((long *) ((((char *) (-3 + thing_936X))) + -4))))>>2))))) { arg3K0 = (((char *)(((char *) (-3 + (*((long *) (((char *) (-3 + thing_936X)))))))))); - goto L11692;} + goto L11693;} else { - goto L11666;}} + goto L11667;}} else { - goto L11666;}} - L21061: { + goto L11667;}} + L21062: { arg0K0 = (SenvS); - goto L20971;} - L20985: { + goto L20972;} + L20986: { value_1107X = arg0K0; SvalS = value_1107X; Scode_pointerS = ((Scode_pointerS) + 4); arg1K0 = (Scode_pointerS); - goto L18438;} - L20884: { + goto L18439;} + L20885: { env_1108X = arg0K0; i_1109X = arg0K1; if ((0 == i_1109X)) { @@ -8829,85 +8831,85 @@ long s48_restart(long proc_345X, long nargs_346X) arg0K0 = count_1110X; arg0K1 = i_1060X; arg0K2 = (2 + offset_1061X); - goto L20805;} + goto L20806;} else { arg0K0 = (*((long *) (((char *) (-3 + env_1108X))))); arg0K1 = (-1 + i_1109X); - goto L20884;}} - L16918: { + goto L20885;}} + L16919: { arg_count_1111X = arg0K0; obj_1112X = Sinterrupt_handlersS; if ((3 == (3 & obj_1112X))) { if ((2 == (31 & ((((*((long *) ((((char *) (-3 + obj_1112X))) + -4))))>>2))))) { - goto L16932;} + goto L16933;} else { - goto L17012;}} + goto L17013;}} else { - goto L17012;}} - L8364: { + goto L17013;}} + L8365: { channel_1113X = arg0K0; x_1114X = 1 == (Spending_channels_headS); if (x_1114X) { - goto L8378;} + goto L8379;} else { Spending_interruptsS = (8 | (Spending_interruptsS)); if ((0 == ((Spending_interruptsS) & (Senabled_interruptsS)))) { s48_Spending_interruptPS = 0; if ((s48_Spending_eventsPS)) { s48_Spending_interruptPS = 1; - goto L8378;} + goto L8379;} else { - goto L8378;}} + goto L8379;}} else { s48_Spending_interruptPS = 1; - goto L8378;}}} - L15974: { + goto L8379;}}} + L15975: { stack_slots_1115X = arg0K0; stack_arg_count_1116X = arg0K1; if ((stack_slots_1115X < (64 + (((((SstackS) - (Sstack_limitS)))>>2))))) { - goto L15976;} + goto L15977;} else { space_1117X = 1 + (((((Sstack_endS) - (SstackS)))>>2)); v_1118X = AVAILABLEp(space_1117X); if (v_1118X) { arg2K0 = 1; arg0K1 = 0; - goto L16033;} + goto L16034;} else { collect_saving_temps(1, 1, &temp1_1119X); v_1120X = AVAILABLEp(space_1117X); if (v_1120X) { arg2K0 = 1; arg0K1 = 0; - goto L16033;} + goto L16034;} else { arg2K0 = 0; arg0K1 = 0; - goto L16033;}}}} - L16394: { + goto L16034;}}}} + L16395: { final_stack_arg_count_1121X = arg0K0; if ((stack_arg_count_784X < final_stack_arg_count_1121X)) { arg0K0 = final_stack_arg_count_1121X; - goto L16398;} + goto L16399;} else { arg0K0 = stack_arg_count_784X; - goto L16398;}} - L28553: { + goto L16399;}} + L28562: { SvalS = 1; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L28752: { + goto L18439;} + L28761: { SvalS = 1; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L28951: { + goto L18439;} + L28960: { SvalS = 1; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L6848: { + goto L18439;} + L6849: { if ((536870911 < c_980X)) { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_467X; @@ -8915,13 +8917,13 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_468X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { SvalS = (((c_980X)<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;}} - L6855: { + goto L18439;}} + L6856: { if ((536870912 < c_980X)) { push_exception_continuationB(5, 1); *((long *) (SstackS)) = arg2_467X; @@ -8929,36 +8931,36 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_468X; SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { SvalS = ((((0 - c_980X))<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;}} - L24529: { + goto L18439;}} + L24538: { val_1122X = arg0K0; SvalS = val_1122X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L13317: { + goto L18439;} + L13318: { arg0K0 = (*((long *) ((((char *) (-3 + foo_1082X))) + 4))); - goto L13301;} - L26593: { + goto L13302;} + L26602: { index_1123X = arg0K0; channel_1124X = make_registered_channel(mode_1000X, arg2_999X, index_1123X, key_998X, &reason_1125X); if ((1 == channel_1124X)) { if ((3 == (3 & arg2_999X))) { if ((16 == (31 & ((((*((long *) ((((char *) (-3 + arg2_999X))) + -4))))>>2))))) { if ((1 == mode_1000X)) { - goto L26708;} + goto L26717;} else { if ((3 == mode_1000X)) { - goto L26708;} + goto L26717;} else { v_1126X = ps_close_fd(index_1123X); arg0K0 = v_1126X; - goto L26703;}}} + goto L26712;}}} else { push_exception_continuationB(reason_1125X, 1); *((long *) (SstackS)) = arg2_999X; @@ -8966,7 +8968,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (((mode_1000X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} else { push_exception_continuationB(reason_1125X, 1); *((long *) (SstackS)) = arg2_999X; @@ -8974,23 +8976,23 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (((mode_1000X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} + goto L16666;}} else { SvalS = channel_1124X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;}} - L26651: { + goto L18439;}} + L26660: { v_1127X = ps_open_fd((((char *)(((char *) (-3 + arg2_999X))))), 1, &v_1128X); arg0K0 = v_1127X; arg0K1 = v_1128X; - goto L26664;} - L26664: { + goto L26673;} + L26673: { channel_1129X = arg0K0; status_1130X = arg0K1; if ((status_1130X == NO_ERRORS)) { arg0K0 = channel_1129X; - goto L26593;} + goto L26602;} else { if ((status_1130X == ENOENT)) { push_exception_continuationB(10, 1); @@ -8999,7 +9001,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (((mode_1000X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { push_exception_continuationB(25, 1); *((long *) (SstackS)) = arg2_999X; @@ -9015,8 +9017,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_1131X; SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16665;}}} - L37322: { + goto L16666;}}} + L37331: { waitP_1132X = arg2K0; start_1133X = ((arg4_1009X)>>2); count_1134X = ((arg3_1008X)>>2); @@ -9025,25 +9027,25 @@ long s48_restart(long proc_345X, long nargs_346X) if ((0 == (128 & (*((long *) ((((char *) (-3 + arg5_1010X))) + -4)))))) { if ((3 == (3 & arg5_1010X))) { if ((16 == (31 & ((((*((long *) ((((char *) (-3 + arg5_1010X))) + -4))))>>2))))) { - goto L36458;} + goto L36467;} else { - goto L36450;}} + goto L36459;}} else { - goto L36450;}} + goto L36459;}} else { arg0K0 = 5; - goto L36341;}} + goto L36350;}} else { arg0K0 = 5; - goto L36341;}} + goto L36350;}} else { arg0K0 = 5; - goto L36341;}} - L36868: { + goto L36350;}} + L36877: { length_1135X = arg0K0; if ((length_1135X < (start_1016X + count_1017X))) { arg0K0 = 7; - goto L36739;} + goto L36748;} else { got_1136X = ps_write_fd(((((*((long *) ((((char *) (-3 + channel_1018X))) + 8))))>>2)), ((((char *) (-3 + arg4_1014X))) + start_1016X), count_1017X, &pendingP_1137X, &status_1138X); if ((status_1138X == NO_ERRORS)) { @@ -9054,12 +9056,12 @@ long s48_restart(long proc_345X, long nargs_346X) s48_Spending_interruptPS = 0; Senabled_interruptsS = 0; arg0K0 = 13; - goto L36739;} + goto L36748;} else { SvalS = (((got_1136X)<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;}} + goto L18439;}} else { push_exception_continuationB(25, 1); *((long *) (SstackS)) = arg4_1014X; @@ -9079,21 +9081,21 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_1140X; SstackS = ((SstackS) + -4); arg0K0 = 5; - goto L16665;}}} - L36864: { + goto L16666;}}} + L36873: { arg0K0 = ((long)(((unsigned long)(*((long *) ((((char *) (-3 + arg4_1014X))) + -4))))>>8)); - goto L36868;} - L33442: { + goto L36877;} + L33451: { val_1141X = arg0K0; SvalS = val_1141X; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L12844: { + goto L18439;} + L12845: { previous_foo_1142X = arg0K0; foo_1143X = arg0K1; if ((1 == foo_1143X)) { - goto L23940;} + goto L23949;} else { s2_1144X = *((long *) (((char *) (-3 + foo_1143X)))); len_1145X = (long)(((unsigned long)(*((long *) ((((char *) (-3 + arg2_686X))) + -4))))>>8); @@ -9104,50 +9106,50 @@ long s48_restart(long proc_345X, long nargs_346X) addr_1147X = (((char *) (-3 + table_1048X))) + (((index_1101X)<<2)); S48_WRITE_BARRIER(table_1048X, addr_1147X, value_1146X); *((long *) addr_1147X) = value_1146X; - goto L23940;} + goto L23949;} else { val_1148X = *((long *) ((((char *) (-3 + foo_1143X))) + 12)); addr_1149X = (((char *) (-3 + previous_foo_1142X))) + 12; S48_WRITE_BARRIER(previous_foo_1142X, addr_1149X, val_1148X); *((long *) addr_1149X) = val_1148X; - goto L23940;}} + goto L23949;}} else { - goto L12906;}} + goto L12907;}} else { - goto L12906;}}} - L31004: { + goto L12907;}}} + L31013: { y_1150X = arg0K0; if ((y_1150X < (to_index_728X + count_729X))) { - goto L31022;} + goto L31031;} else { memcpy((void *)((((char *) (-3 + arg3_724X))) + to_index_728X), (void *)((((char *) (-3 + arg5_726X))) + from_index_727X),count_729X); SvalS = 13; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;}} - L31000: { + goto L18439;}} + L31009: { arg0K0 = ((long)(((unsigned long)(*((long *) ((((char *) (-3 + arg3_724X))) + -4))))>>8)); - goto L31004;} - L11666: { + goto L31013;} + L11667: { if ((1 == thing_936X)) { - goto L11669;} + goto L11670;} else { if ((5 == thing_936X)) { - goto L11669;} + goto L11670;} else { if ((25 == thing_936X)) { arg3K0 = "()"; - goto L11692;} + goto L11693;} else { if ((3 == (3 & thing_936X))) { if ((0 == (31 & ((((*((long *) ((((char *) (-3 + thing_936X))) + -4))))>>2))))) { arg3K0 = "(...)"; - goto L11692;} + goto L11693;} else { - goto L11682;}} + goto L11683;}} else { - goto L11682;}}}}} - L20805: { + goto L11683;}}}}} + L20806: { count_1151X = arg0K0; i_1152X = arg0K1; offset_1153X = arg0K2; @@ -9155,7 +9157,7 @@ long s48_restart(long proc_345X, long nargs_346X) arg0K0 = i_1152X; arg0K1 = offset_1153X; arg0K2 = env_1108X; - goto L20788;} + goto L20789;} else { value_1154X = *((long *) ((((char *) (-3 + env_1108X))) + ((((*((unsigned char *) ((Scode_pointerS) + (1 + offset_1153X)))))<<2)))); addr_1155X = (((char *) (-3 + new_env_762X))) + (((i_1152X)<<2)); @@ -9164,23 +9166,23 @@ long s48_restart(long proc_345X, long nargs_346X) arg0K0 = (-1 + count_1151X); arg0K1 = (1 + i_1152X); arg0K2 = (1 + offset_1153X); - goto L20805;}} - L16932: { + goto L20806;}} + L16933: { Senabled_interruptsS = 0; if ((0 == ((Spending_interruptsS) & (Senabled_interruptsS)))) { s48_Spending_interruptPS = 0; if ((s48_Spending_eventsPS)) { s48_Spending_interruptPS = 1; - goto L16934;} + goto L16935;} else { - goto L16934;}} + goto L16935;}} else { s48_Spending_interruptPS = 1; - goto L16934;}} - L17012: { + goto L16935;}} + L17013: { ps_error("interrupt handler is not a vector", 0); - goto L16932;} - L8378: { + goto L16933;} + L8379: { *((long *) (SstackS)) = channel_1113X; SstackS = ((SstackS) + -4); *((long *) (SstackS)) = (*((long *) ((((char *) (-3 + channel_1113X))) + 16))); @@ -9188,8 +9190,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = ((((Senabled_interruptsS))<<2)); SstackS = ((SstackS) + -4); arg0K0 = 3; - goto L16918;} - L15976: { + goto L16919;} + L15977: { if ((s48_Spending_interruptPS)) { if ((s48_Spending_eventsPS)) { s48_Spending_eventsPS = 0; @@ -9199,25 +9201,25 @@ long s48_restart(long proc_345X, long nargs_346X) v_1156X = check_events0_return_value; if (v_1156X) { arg0K0 = stack_arg_count_1116X; - goto L16894;} + goto L16895;} else { - goto L15980;}} + goto L15981;}} else { arg0K0 = stack_arg_count_1116X; - goto L16894;}} + goto L16895;}} else { - goto L15980;}} - L16033: { + goto L15981;}} + L16034: { okayP_1157X = arg2K0; key_1158X = arg0K1; if (okayP_1157X) { arg0K0 = key_1158X; - goto L15987;} + goto L15988;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = key_1158X; - goto L15987;}} - L16398: { + goto L15988;}} + L16399: { v_1159X = arg0K0; merged_arg0K0 = v_1159X; merged_arg0K1 = stack_arg_count_784X; @@ -9232,12 +9234,12 @@ long s48_restart(long proc_345X, long nargs_346X) SstackS = ((SstackS) + -4); arg0K0 = skip_1077X; arg0K1 = (3 + final_stack_arg_count_1121X); - goto L16361;} - L26708: { + goto L16362;} + L26717: { v_1160X = ps_close_fd(index_1123X); arg0K0 = v_1160X; - goto L26703;} - L26703: { + goto L26712;} + L26712: { status_1161X = arg0K0; if ((status_1161X == NO_ERRORS)) { push_exception_continuationB(reason_1125X, 1); @@ -9246,7 +9248,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (((mode_1000X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;} + goto L16666;} else { channel_close_error(status_1161X, index_1123X, arg2_999X); push_exception_continuationB(reason_1125X, 1); @@ -9255,27 +9257,27 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = (((mode_1000X)<<2)); SstackS = ((SstackS) + -4); arg0K0 = 2; - goto L16665;}} - L36458: { + goto L16666;}} + L36467: { if ((3 == (3 & arg5_1010X))) { if ((16 == (31 & ((((*((long *) ((((char *) (-3 + arg5_1010X))) + -4))))>>2))))) { arg0K0 = (-1 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + arg5_1010X))) + -4))))>>8))); - goto L36470;} + goto L36479;} else { - goto L36466;}} + goto L36475;}} else { - goto L36466;}} - L36450: { + goto L36475;}} + L36459: { if ((3 == (3 & arg5_1010X))) { if ((17 == (31 & ((((*((long *) ((((char *) (-3 + arg5_1010X))) + -4))))>>2))))) { - goto L36458;} + goto L36467;} else { arg0K0 = 5; - goto L36341;}} + goto L36350;}} else { arg0K0 = 5; - goto L36341;}} - L36341: { + goto L36350;}} + L36350: { reason_1162X = arg0K0; push_exception_continuationB(reason_1162X, 1); *((long *) (SstackS)) = arg5_1010X; @@ -9286,63 +9288,63 @@ long s48_restart(long proc_345X, long nargs_346X) SstackS = ((SstackS) + -4); if (waitP_1132X) { arg0K0 = 5; - goto L36356;} + goto L36365;} else { arg0K0 = 1; - goto L36356;}} - L23940: { + goto L36365;}} + L23949: { Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} - L12906: { + goto L18439;} + L12907: { arg0K0 = foo_1143X; arg0K1 = (*((long *) ((((char *) (-3 + foo_1143X))) + 12))); - goto L12844;} - L11669: { + goto L12845;} + L11670: { if ((1 == thing_936X)) { arg3K0 = "#f"; - goto L11692;} + goto L11693;} else { arg3K0 = "#t"; - goto L11692;}} - L11682: { + goto L11693;}} + L11683: { if ((3 == (3 & thing_936X))) { if ((2 == (31 & ((((*((long *) ((((char *) (-3 + thing_936X))) + -4))))>>2))))) { arg3K0 = "#(...)"; - goto L11692;} + goto L11693;} else { - goto L11686;}} + goto L11687;}} else { - goto L11686;}} - L16934: { + goto L11687;}} + L16935: { SvalS = (*((long *) ((((char *) (-3 + (Sinterrupt_handlersS)))) + (((i_1065X)<<2))))); obj_1163X = SvalS; if ((3 == (3 & obj_1163X))) { if ((3 == (31 & ((((*((long *) ((((char *) (-3 + obj_1163X))) + -4))))>>2))))) { - goto L16951;} + goto L16952;} else { - goto L17037;}} + goto L17038;}} else { - goto L17037;}} - L15980: { + goto L17038;}} + L15981: { arg1K0 = (Scode_pointerS); - goto L18438;} - L15987: { + goto L18439;} + L15988: { v_1164X = arg0K0; merged_arg0K0 = v_1164X; copy_stack_into_heap_return_tag = 3; goto copy_stack_into_heap; copy_stack_into_heap_return_3: if ((stack_slots_1115X < (64 + (((((SstackS) - (Sstack_limitS)))>>2))))) { - goto L15976;} + goto L15977;} else { ps_error("VM's stack is too small (how can this happen?)", 0); - goto L15976;}} - L36470: { + goto L15977;}} + L36479: { length_1165X = arg0K0; if ((length_1165X < (start_1133X + count_1134X))) { arg0K0 = 7; - goto L36341;} + goto L36350;} else { got_1166X = ps_read_fd(((((*((long *) ((((char *) (-3 + x_1091X))) + 8))))>>2)), ((((char *) (-3 + arg5_1010X))) + start_1133X), count_1134X, waitP_1132X, &eofP_1167X, &pendingP_1168X, &status_1169X); if ((status_1169X == NO_ERRORS)) { @@ -9350,7 +9352,7 @@ long s48_restart(long proc_345X, long nargs_346X) SvalS = 21; Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;} + goto L18439;} else { if (pendingP_1168X) { addr_1170X = (((char *) (-3 + x_1091X))) + 16; @@ -9359,12 +9361,12 @@ long s48_restart(long proc_345X, long nargs_346X) s48_Spending_interruptPS = 0; Senabled_interruptsS = 0; arg0K0 = 13; - goto L36341;} + goto L36350;} else { SvalS = (((got_1166X)<<2)); Scode_pointerS = ((Scode_pointerS) + 1); arg1K0 = (Scode_pointerS); - goto L18438;}}} + goto L18439;}}} else { push_exception_continuationB(25, 1); *((long *) (SstackS)) = arg5_1010X; @@ -9375,41 +9377,41 @@ long s48_restart(long proc_345X, long nargs_346X) SstackS = ((SstackS) + -4); if (waitP_1132X) { arg0K0 = 5; - goto L36393;} + goto L36402;} else { arg0K0 = 1; - goto L36393;}}}} - L36466: { + goto L36402;}}}} + L36475: { arg0K0 = ((long)(((unsigned long)(*((long *) ((((char *) (-3 + arg5_1010X))) + -4))))>>8)); - goto L36470;} - L36356: { + goto L36479;} + L36365: { x_1171X = arg0K0; *((long *) (SstackS)) = x_1171X; SstackS = ((SstackS) + -4); *((long *) (SstackS)) = x_1091X; SstackS = ((SstackS) + -4); arg0K0 = 5; - goto L16665;} - L11686: { + goto L16666;} + L11687: { if ((3 == (3 & thing_936X))) { if ((3 == (31 & ((((*((long *) ((((char *) (-3 + thing_936X))) + -4))))>>2))))) { arg3K0 = "#{procedure}"; - goto L11692;} + goto L11693;} else { arg3K0 = "???"; - goto L11692;}} + goto L11693;}} else { arg3K0 = "???"; - goto L11692;}} - L16951: { + goto L11693;}} + L16952: { StemplateS = (SvalS); Slosing_opcodeS = (0 - i_1065X); arg0K0 = arg_count_1111X; - goto L16066;} - L17037: { + goto L16067;} + L17038: { ps_error("interrupt handler is not a closure", 1, i_1065X); - goto L16951;} - L36393: { + goto L16952;} + L36402: { x_1172X = arg0K0; *((long *) (SstackS)) = x_1172X; SstackS = ((SstackS) + -4); @@ -9424,7 +9426,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = x_1173X; SstackS = ((SstackS) + -4); arg0K0 = 6; - goto L16665;} + goto L16666;} loseD0: { message_369X = merged_arg3K0;{ why_1174X = (((*((long *) ((SstackS) + (4 + (((nargs_739X)<<2)))))))>>2); @@ -9434,20 +9436,20 @@ long s48_restart(long proc_345X, long nargs_346X) if ((0 == (3 & (*((long *) ((((char *) (-3 + current_template_1175X))) + 4)))))) { if ((current_template_1175X == (*((long *) ((((char *) (-3 + (Sbottom_of_stackS)))) + 8))))) { arg2K0 = 0; - goto L10518;} + goto L10519;} else { ps_write_integer(((((*((long *) ((((char *) (-3 + current_template_1175X))) + 4))))>>2)), out_1176X); arg2K0 = 1; - goto L10518;}} + goto L10519;}} else { arg2K0 = 0; - goto L10518;}} - L10518: { + goto L10519;}} + L10519: { not_firstP_1177X = arg2K0; arg0K0 = (ScontS); arg2K1 = not_firstP_1177X; - goto L10525;} - L10525: { + goto L10526;} + L10526: { cont_1178X = arg0K0; not_firstP_1179X = arg2K1; if ((3 == (3 & cont_1178X))) { @@ -9456,30 +9458,30 @@ long s48_restart(long proc_345X, long nargs_346X) if ((0 == (3 & (*((long *) ((((char *) (-3 + template_1180X))) + 4)))))) { if ((template_1180X == (*((long *) ((((char *) (-3 + (Sbottom_of_stackS)))) + 8))))) { arg2K0 = not_firstP_1179X; - goto L10534;} + goto L10535;} else { if (not_firstP_1179X) { ps_write_string(" <- ", out_1176X); - goto L10573;} + goto L10574;} else { - goto L10573;}}} + goto L10574;}}} else { arg2K0 = not_firstP_1179X; - goto L10534;}} + goto L10535;}} else { - goto L16684;}} + goto L16685;}} else { - goto L16684;}} - L10534: { + goto L16685;}} + L10535: { v_1181X = arg2K0; arg0K0 = (*((long *) (((char *) (-3 + cont_1178X))))); arg2K1 = v_1181X; - goto L10525;} - L10573: { + goto L10526;} + L10574: { ps_write_integer(((((*((long *) ((((char *) (-3 + template_1180X))) + 4))))>>2)), out_1176X); arg2K0 = 1; - goto L10534;} - L16684: { + goto L10535;} + L16685: { { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } if ((why_1174X == 1)) { @@ -9487,10 +9489,10 @@ long s48_restart(long proc_345X, long nargs_346X) ps_error(message_369X, 3, opcode_740X, why_1174X, ((((*((long *) (((char *) (-3 + (*((long *) ((SstackS) + (((nargs_739X)<<2)))))))))))>>2))); goto loseD0_return;} else { - goto L16708;}} + goto L16709;}} else { - goto L16708;}} - L16708: { + goto L16709;}} + L16709: { ps_error(message_369X, 2, opcode_740X, why_1174X); goto loseD0_return;} loseD0_return: @@ -9500,34 +9502,34 @@ long s48_restart(long proc_345X, long nargs_346X) }} check_events: { -{ goto L39788;} - L39788: { +{ goto L39797;} + L39797: { type_1182X = s48_get_next_event(&channel_1183X, &status_1184X); if ((type_1182X == ALARM_EVENT)) { if ((1 == (Sinterrupted_templateS))) { Sinterrupted_templateS = (StemplateS); arg0K0 = 1; - goto L15869;} + goto L15870;} else { arg0K0 = 1; - goto L15869;}} + goto L15870;}} else { if ((type_1182X == KEYBOARD_INTERRUPT_EVENT)) { arg0K0 = 2; - goto L15869;} + goto L15870;} else { if ((type_1182X == IO_COMPLETION_EVENT)) { enqueue_channelB(channel_1183X, status_1184X); arg0K0 = 8; - goto L15869;} + goto L15870;} else { if ((type_1182X == OS_SIGNAL_EVENT)) { arg0K0 = 16; - goto L15869;} + goto L15870;} else { if ((type_1182X == NO_EVENT)) { arg0K0 = 0; - goto L15869;} + goto L15870;} else { if ((type_1182X == ERROR_EVENT)) { ps_write_string("OS error while getting event", (stderr)); @@ -9537,14 +9539,14 @@ long s48_restart(long proc_345X, long nargs_346X) { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } arg0K0 = 0; - goto L15869;} + goto L15870;} else { ps_write_string("unknown type of event", (stderr)); { long ignoreXX; PS_WRITE_CHAR(10, (stderr), ignoreXX) } arg0K0 = 0; - goto L15869;}}}}}}} - L15869: { + goto L15870;}}}}}}} + L15870: { v_1185X = arg0K0; Spending_interruptsS = (v_1185X | (Spending_interruptsS)); if ((type_1182X == NO_EVENT)) { @@ -9552,19 +9554,19 @@ long s48_restart(long proc_345X, long nargs_346X) s48_Spending_interruptPS = 0; if ((s48_Spending_eventsPS)) { s48_Spending_interruptPS = 1; - goto L15896;} + goto L15897;} else { - goto L15896;}} + goto L15897;}} else { s48_Spending_interruptPS = 1; - goto L15896;}} + goto L15897;}} else { - goto L39788;}} - L15896: { + goto L39797;}} + L15897: { if ((s48_Spending_interruptPS)) { if ((s48_Spending_eventsPS)) { s48_Spending_eventsPS = 0; - goto L39788;} + goto L39797;} else { check_events0_return_value = 1; goto check_events_return;}} @@ -9641,42 +9643,42 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (SstackS)) = list_363X; SstackS = ((SstackS) + -4); if ((count_364X < (64 + (((((SstackS) - (Sstack_limitS)))>>2))))) { - goto L15285;} + goto L15286;} else { space_1192X = 1 + (((((Sstack_endS) - (SstackS)))>>2)); v_1193X = AVAILABLEp(space_1192X); if (v_1193X) { arg2K0 = 1; arg0K1 = 0; - goto L15369;} + goto L15370;} else { collect_saving_temps(1, 1, &temp1_1194X); v_1195X = AVAILABLEp(space_1192X); if (v_1195X) { arg2K0 = 1; arg0K1 = 0; - goto L15369;} + goto L15370;} else { arg2K0 = 0; arg0K1 = 0; - goto L15369;}}}} - L15285: { + goto L15370;}}}} + L15286: { SstackS = ((SstackS) + 4); list_1196X = *((long *) (SstackS)); arg0K0 = count_364X; arg0K1 = list_1196X; - goto L15294;} - L15369: { + goto L15295;} + L15370: { okayP_1197X = arg2K0; key_1198X = arg0K1; if (okayP_1197X) { arg0K0 = key_1198X; - goto L15320;} + goto L15321;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = key_1198X; - goto L15320;}} - L15294: { + goto L15321;}} + L15295: { i_1199X = arg0K0; l_1200X = arg0K1; if ((0 < i_1199X)) { @@ -9684,21 +9686,21 @@ long s48_restart(long proc_345X, long nargs_346X) SstackS = ((SstackS) + -4); arg0K0 = (-1 + i_1199X); arg0K1 = (*((long *) ((((char *) (-3 + l_1200X))) + 4))); - goto L15294;} + goto L15295;} else { push_list0_return_value = l_1200X; goto push_list_return;}} - L15320: { + L15321: { v_1201X = arg0K0; merged_arg0K0 = v_1201X; copy_stack_into_heap_return_tag = 4; goto copy_stack_into_heap; copy_stack_into_heap_return_4: if ((count_364X < (64 + (((((SstackS) - (Sstack_limitS)))>>2))))) { - goto L15285;} + goto L15286;} else { ps_error("VM's stack is too small (how can this happen?)", 0); - goto L15285;}} + goto L15286;}} push_list_return: switch (push_list_return_tag) { case 0: goto push_list_return_0; @@ -9711,46 +9713,46 @@ long s48_restart(long proc_345X, long nargs_346X) key_362X = merged_arg0K0;{ arg1K0 = ((SstackS) + 4); arg0K1 = 0; - goto L13514;} - L13514: { + goto L13515;} + L13515: { p_1202X = arg1K0; i_1203X = arg0K1; if ((2 == (3 & (*((long *) p_1202X))))) { if ((22 == (*((long *) p_1202X)))) { arg0K0 = (-1 + i_1203X); - goto L13501;} + goto L13502;} else { arg0K0 = i_1203X; - goto L13501;}} + goto L13502;}} else { arg1K0 = (p_1202X + 4); arg0K1 = (1 + i_1203X); - goto L13514;}} - L13501: { + goto L13515;}} + L13502: { arg_count_1204X = arg0K0; top_1205X = SstackS; if ((1 == (ScontS))) { - goto L13506;} + goto L13507;} else { merged_arg0K0 = key_362X; merged_arg0K1 = 1; really_preserve_continuation_return_tag = 1; goto really_preserve_continuation; really_preserve_continuation_return_1: - goto L13506;}} - L13506: { + goto L13507;}} + L13507: { stob_1206X = ScontS; arg1K0 = ((((char *) (-3 + stob_1206X))) + -8); arg1K1 = (top_1205X + (((arg_count_1204X)<<2))); - goto L13539;} - L13539: { + goto L13540;} + L13540: { loc_1207X = arg1K0; arg_1208X = arg1K1; if ((top_1205X < arg_1208X)) { *((long *) loc_1207X) = (*((long *) arg_1208X)); arg1K0 = (loc_1207X + -4); arg1K1 = (arg_1208X + -4); - goto L13539;} + goto L13540;} else { SstackS = loc_1207X; goto copy_stack_into_heap_return;}} @@ -9769,10 +9771,10 @@ long s48_restart(long proc_345X, long nargs_346X) p_1209X = SenvS; if ((3 == (3 & p_1209X))) { if ((p_1209X < (((long) (Sstack_beginS))))) { - goto L12690;} + goto L12691;} else { if (((((long) (Sstack_endS))) < p_1209X)) { - goto L12690;} + goto L12691;} else { merged_arg0K0 = (SenvS); merged_arg0K1 = (ScontS); @@ -9783,15 +9785,15 @@ long s48_restart(long proc_345X, long nargs_346X) save_env_in_heap_return_1: v_1210X = save_env_in_heap0_return_value; SenvS = v_1210X; - goto L12690;}}} + goto L12691;}}} else { - goto L12690;}} - L12690: { + goto L12691;}} + L12691: { end_1211X = *((long *) (((char *) (-3 + (Sbottom_of_stackS))))); arg0K0 = (ScontS); arg0K1 = (Sbottom_of_stackS); - goto L12643;} - L12643: { + goto L12644;} + L12644: { cont_1212X = arg0K0; previous_1213X = arg0K1; if ((cont_1212X == (Sbottom_of_stackS))) { @@ -9803,10 +9805,10 @@ long s48_restart(long proc_345X, long nargs_346X) p_1214X = *((long *) ((((char *) (-3 + cont_1212X))) + 12)); if ((3 == (3 & p_1214X))) { if ((p_1214X < (((long) (Sstack_beginS))))) { - goto L12661;} + goto L12662;} else { if (((((long) (Sstack_endS))) < p_1214X)) { - goto L12661;} + goto L12662;} else { merged_arg0K0 = (*((long *) ((((char *) (-3 + cont_1212X))) + 12))); merged_arg0K1 = cont_1212X; @@ -9815,10 +9817,10 @@ long s48_restart(long proc_345X, long nargs_346X) save_env_in_heap_return_tag = 2; goto save_env_in_heap; save_env_in_heap_return_2: - goto L12661;}}} + goto L12662;}}} else { - goto L12661;}}} - L12661: { + goto L12662;}}} + L12662: { header_1215X = *((long *) ((((char *) (-3 + cont_1212X))) + -4)); addr_1216X = ALLOCATE_SPACE((31 & (((header_1215X)>>2))), (4 + ((long)(((unsigned long)header_1215X)>>8)))); data_addr_1217X = addr_1216X + 4; @@ -9828,7 +9830,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) (((char *) (-3 + previous_1213X)))) = new_1218X; arg0K0 = (*((long *) (((char *) (-3 + new_1218X))))); arg0K1 = new_1218X; - goto L12643;} + goto L12644;} really_preserve_continuation_return: switch (really_preserve_continuation_return_tag) { case 0: goto really_preserve_continuation_return_0; @@ -9868,16 +9870,16 @@ long s48_restart(long proc_345X, long nargs_346X) copy_env_return_0: top_1224X = copy_env0_return_value; arg0K0 = top_1224X; - goto L11922;} - L11922: { + goto L11923;} + L11923: { env_1225X = arg0K0; p_1226X = *((long *) (((char *) (-3 + env_1225X)))); if ((3 == (3 & p_1226X))) { if ((p_1226X < (((long) (Sstack_beginS))))) { - goto L11941;} + goto L11942;} else { if (((((long) (Sstack_endS))) < p_1226X)) { - goto L11941;} + goto L11942;} else { merged_arg0K0 = (*((long *) (((char *) (-3 + env_1225X))))); merged_arg0K1 = key_357X; @@ -9890,20 +9892,20 @@ long s48_restart(long proc_345X, long nargs_346X) S48_WRITE_BARRIER(env_1225X, addr_1228X, new_1227X); *((long *) addr_1228X) = new_1227X; arg0K0 = new_1227X; - goto L11922;}}} + goto L11923;}}} else { - goto L11941;}} - L11941: { + goto L11942;}} + L11942: { arg0K0 = cont_356X; - goto L11945;} - L11945: { + goto L11946;} + L11946: { cont_1229X = arg0K0; env_1230X = *((long *) ((((char *) (-3 + cont_1229X))) + 12)); if ((3 == (3 & env_1230X))) { if ((3 == (3 & (*((long *) ((((char *) (-3 + env_1230X))) + -4)))))) { *((long *) ((((char *) (-3 + cont_1229X))) + 12)) = (*((long *) ((((char *) (-3 + env_1230X))) + -4))); arg0K0 = (*((long *) (((char *) (-3 + cont_1229X))))); - goto L11945;} + goto L11946;} else { save_env_in_heap0_return_value = top_1224X; goto save_env_in_heap_return;}} @@ -9925,34 +9927,34 @@ long s48_restart(long proc_345X, long nargs_346X) if (v_1232X) { arg2K0 = 1; arg0K1 = start_353X; - goto L14260;} + goto L14261;} else { temp0_1233X = collect_saving_temps(start_353X, 1, &temp1_1234X); v_1235X = AVAILABLEp(space_1231X); if (v_1235X) { arg2K0 = 1; arg0K1 = temp0_1233X; - goto L14260;} + goto L14261;} else { arg2K0 = 0; arg0K1 = temp0_1233X; - goto L14260;}}} - L14260: { + goto L14261;}}} + L14261: { okayP_1236X = arg2K0; temp_1237X = arg0K1; if (okayP_1236X) { arg0K0 = temp_1237X; - goto L14234;} + goto L14235;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = temp_1237X; - goto L14234;}} - L14234: { + goto L14235;}} + L14235: { start_1238X = arg0K0; arg0K0 = start_1238X; arg0K1 = count_354X; - goto L14243;} - L14243: { + goto L14244;} + L14244: { args_1239X = arg0K0; count_1240X = arg0K1; if ((0 == count_1240X)) { @@ -9968,7 +9970,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) ((((char *) (-3 + x_1243X))) + 4)) = args_1239X; arg0K0 = x_1243X; arg0K1 = (-1 + count_1240X); - goto L14243;}} + goto L14244;}} pop_args_GlistS_return: switch (pop_args_GlistS_return_tag) { case 0: goto pop_args_GlistS_return_0; @@ -9991,29 +9993,29 @@ long s48_restart(long proc_345X, long nargs_346X) if (v_1245X) { arg2K0 = 1; arg0K1 = list_351X; - goto L14139;} + goto L14140;} else { temp0_1246X = collect_saving_temps(list_351X, 1, &temp1_1247X); v_1248X = AVAILABLEp(space_1244X); if (v_1248X) { arg2K0 = 1; arg0K1 = temp0_1246X; - goto L14139;} + goto L14140;} else { arg2K0 = 0; arg0K1 = temp0_1246X; - goto L14139;}}}} - L14139: { + goto L14140;}}}} + L14140: { okayP_1249X = arg2K0; temp_1250X = arg0K1; if (okayP_1249X) { arg0K0 = temp_1250X; - goto L14097;} + goto L14098;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = temp_1250X; - goto L14097;}} - L14097: { + goto L14098;}} + L14098: { list_1251X = arg0K0; a_1252X = *((long *) (((char *) (-3 + list_1251X)))); addr_1253X = ALLOCATE_SPACE(0, 12); @@ -10023,8 +10025,8 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) ((((char *) (-3 + x_1254X))) + 4)) = 25; arg0K0 = (*((long *) ((((char *) (-3 + list_1251X))) + 4))); arg0K1 = x_1254X; - goto L14112;} - L14112: { + goto L14113;} + L14113: { l_1255X = arg0K0; last_1256X = arg0K1; if ((25 == l_1255X)) { @@ -10042,7 +10044,7 @@ long s48_restart(long proc_345X, long nargs_346X) *((long *) addr_1260X) = x_1259X; arg0K0 = (*((long *) ((((char *) (-3 + l_1255X))) + 4))); arg0K1 = x_1259X; - goto L14112;}} + goto L14113;}} copy_listS_return: switch (copy_listS_return_tag) { case 0: goto copy_listS_return_0; @@ -10076,14 +10078,14 @@ long s48_restart(long proc_345X, long nargs_346X) if ((8 == (31 & ((((*((long *) ((((char *) (-3 + thread_1264X))) + -4))))>>2))))) { if ((1 < ((((3 + ((long)(((unsigned long)(*((long *) ((((char *) (-3 + thread_1264X))) + -4))))>>8))))>>2)))) { arg0K0 = (*((long *) ((((char *) (-3 + thread_1264X))) + 4))); - goto L10214;} + goto L10215;} else { - goto L10264;}} + goto L10265;}} else { - goto L10264;}} + goto L10265;}} else { - goto L10264;}} - L10214: { + goto L10265;}} + L10215: { env_1265X = arg0K0; if ((3 == (3 & env_1265X))) { if ((0 == (31 & ((((*((long *) ((((char *) (-3 + env_1265X))) + -4))))>>2))))) { @@ -10095,32 +10097,32 @@ long s48_restart(long proc_345X, long nargs_346X) goto get_current_port_return;} else { arg0K0 = (*((long *) ((((char *) (-3 + env_1265X))) + 4))); - goto L10214;}} + goto L10215;}} else { - goto L10286;}} + goto L10287;}} else { - goto L10286;}} + goto L10287;}} else { - goto L10286;}} + goto L10287;}} else { - goto L10286;}} - L10264: { + goto L10287;}} + L10265: { ps_error("current thread is not a record", 0); get_current_port0_return_value = v_1267X; goto get_current_port_return;} - L10286: { + L10287: { if ((25 == env_1265X)) { if (((((marker_349X)>>2)) == 1)) { arg3K0 = "dynamic environment doesn't have current-output-port"; - goto L10240;} + goto L10241;} else { arg3K0 = "dynamic environment doesn't have current-input-port"; - goto L10240;}} + goto L10241;}} else { ps_error("dynamic environment is not a proper list", 0); get_current_port0_return_value = v_1268X; goto get_current_port_return;}} - L10240: { + L10241: { v_1269X = arg3K0; ps_error(v_1269X, 0); get_current_port0_return_value = v_1270X; @@ -10138,8 +10140,8 @@ long s48_restart(long proc_345X, long nargs_346X) arg0K1 = 0; arg0K2 = list_348X; arg2K3 = 0; - goto L10081;} - L10081: { + goto L10082;} + L10082: { fast_1271X = arg0K0; len_1272X = arg0K1; slow_1273X = arg0K2; @@ -10161,13 +10163,13 @@ long s48_restart(long proc_345X, long nargs_346X) arg0K1 = (1 + len_1272X); arg0K2 = (*((long *) ((((char *) (-3 + slow_1273X))) + 4))); arg2K3 = 0; - goto L10081;}} + goto L10082;}} else { arg0K0 = (*((long *) ((((char *) (-3 + fast_1271X))) + 4))); arg0K1 = (1 + len_1272X); arg0K2 = slow_1273X; arg2K3 = 1; - goto L10081;}} + goto L10082;}} else { okay_argument_list0_return_value = 0; okay_argument_list1_return_value = 0; @@ -10188,11 +10190,11 @@ long s48_restart(long proc_345X, long nargs_346X) x_1276X = strlen((char *) string_1275X); if ((x_1276X < 256)) { arg0K0 = x_1276X; - goto L9589;} + goto L9590;} else { arg0K0 = 256; - goto L9589;}} - L9589: { + goto L9590;}} + L9590: { len_1277X = arg0K0; len_1278X = 1 + len_1277X; addr_1279X = ALLOCATE_SPACE(16, (4 + len_1278X)); @@ -10200,8 +10202,8 @@ long s48_restart(long proc_345X, long nargs_346X) string_1280X = 3 + (((long) (addr_1279X + 4))); *((unsigned char *) ((((char *) (-3 + string_1280X))) + len_1277X)) = 0; arg0K0 = 0; - goto L9599;} - L9599: { + goto L9600;} + L9600: { i_1281X = arg0K0; if ((i_1281X == len_1277X)) { get_error_string0_return_value = string_1280X; @@ -10209,7 +10211,7 @@ long s48_restart(long proc_345X, long nargs_346X) else { *((unsigned char *) ((((char *) (-3 + string_1280X))) + i_1281X)) = ((*(string_1275X + i_1281X))); arg0K0 = (1 + i_1281X); - goto L9599;}} + goto L9600;}} get_error_string_return: switch (get_error_string_return_tag) { case 0: goto get_error_string_return_0; @@ -10311,8 +10313,8 @@ long s48_call_startup_procedure(char **startup_vector_1285X, long startup_vector Sinterrupted_templateS = 1; arg0K0 = 0; arg0K1 = 0; - goto L15603;} - L15603: { + goto L15604;} + L15604: { i_1288X = arg0K0; size_1289X = arg0K1; if ((i_1288X == startup_vector_length_1286X)) { @@ -10321,41 +10323,41 @@ long s48_call_startup_procedure(char **startup_vector_1285X, long startup_vector if (v_1291X) { arg2K0 = 1; arg0K1 = 0; - goto L15640;} + goto L15641;} else { collect_saving_temps(1, 1, &temp1_1292X); v_1293X = AVAILABLEp(space_1290X); if (v_1293X) { arg2K0 = 1; arg0K1 = 0; - goto L15640;} + goto L15641;} else { arg2K0 = 0; arg0K1 = 0; - goto L15640;}}} + goto L15641;}}} else { arg0K0 = (1 + i_1288X); arg0K1 = (1 + (size_1289X + ((((4 + (strlen((char *) (*(startup_vector_1285X + i_1288X))))))>>2)))); - goto L15603;}} - L15640: { + goto L15604;}} + L15641: { okayP_1294X = arg2K0; key_1295X = arg0K1; if (okayP_1294X) { arg0K0 = key_1295X; - goto L15618;} + goto L15619;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = key_1295X; - goto L15618;}} - L15618: { + goto L15619;}} + L15619: { key_1296X = arg0K0; len_1297X = ((startup_vector_length_1286X)<<2); addr_1298X = ALLOCATE_SPACE(2, (4 + len_1297X)); *((long *) addr_1298X) = (10 + (((len_1297X)<<8))); vector_1299X = 3 + (((long) (addr_1298X + 4))); arg0K0 = 0; - goto L15676;} - L15676: { + goto L15677;} + L15677: { i_1300X = arg0K0; if ((i_1300X == startup_vector_length_1286X)) { *((long *) (SstackS)) = vector_1299X; @@ -10364,37 +10366,37 @@ long s48_call_startup_procedure(char **startup_vector_1285X, long startup_vector x_1302X = fileno((stdout)); if ((x_1302X < y_1301X)) { arg0K0 = y_1301X; - goto L14512;} + goto L14513;} else { arg0K0 = x_1302X; - goto L14512;}} + goto L14513;}} else { value_1303X = enter_string((*(startup_vector_1285X + i_1300X)), key_1296X); addr_1304X = (((char *) (-3 + vector_1299X))) + (((i_1300X)<<2)); S48_WRITE_BARRIER(vector_1299X, addr_1304X, value_1303X); *((long *) addr_1304X) = value_1303X; arg0K0 = (1 + i_1300X); - goto L15676;}} - L14512: { + goto L15677;}} + L14513: { y_1305X = arg0K0; x_1306X = fileno((stdin)); if ((x_1306X < y_1305X)) { arg0K0 = y_1305X; - goto L14514;} + goto L14515;} else { arg0K0 = x_1306X; - goto L14514;}} - L14514: { + goto L14515;}} + L14515: { v_1307X = arg0K0; x_1308X = Snumber_of_channelsS; y_1309X = 1 + v_1307X; if ((x_1308X < y_1309X)) { arg0K0 = y_1309X; - goto L14516;} + goto L14517;} else { arg0K0 = x_1308X; - goto L14516;}} - L14516: { + goto L14517;}} + L14517: { v_1310X = arg0K0; Snumber_of_channelsS = v_1310X; v_1311X = fileno((stdin)); @@ -10403,49 +10405,49 @@ long s48_call_startup_procedure(char **startup_vector_1285X, long startup_vector Spending_channels_tailS = 1; if ((NULL == (Svm_channelsS))) { ps_error("out of memory, unable to continue", 0); - goto L14538;} + goto L14539;} else { - goto L14538;}} - L14538: { + goto L14539;}} + L14539: { v_1312X = Svm_channelsS; length_1313X = Snumber_of_channelsS; arg0K0 = 0; - goto L14586;} - L14586: { + goto L14587;} + L14587: { i_1314X = arg0K0; if ((i_1314X < length_1313X)) { *(v_1312X + i_1314X) = 1; arg0K0 = (1 + i_1314X); - goto L14586;} + goto L14587;} else { space_1315X = 3 * (7 + ((((4 + (strlen((char *) "standard output"))))>>2))); v_1316X = AVAILABLEp(space_1315X); if (v_1316X) { arg2K0 = 1; arg0K1 = 0; - goto L14600;} + goto L14601;} else { collect_saving_temps(1, 1, &temp1_1317X); v_1318X = AVAILABLEp(space_1315X); if (v_1318X) { arg2K0 = 1; arg0K1 = 0; - goto L14600;} + goto L14601;} else { arg2K0 = 0; arg0K1 = 0; - goto L14600;}}}} - L14600: { + goto L14601;}}}} + L14601: { okayP_1319X = arg2K0; key_1320X = arg0K1; if (okayP_1319X) { arg0K0 = key_1320X; - goto L14544;} + goto L14545;} else { ps_error("Scheme48 heap overflow", 0); arg0K0 = key_1320X; - goto L14544;}} - L14544: { + goto L14545;}} + L14545: { key_1321X = arg0K0; channel_1322X = fileno((stdin)); b_1323X = enter_string("standard input", key_1321X); diff --git a/c/sysdep.h.in b/c/sysdep.h.in index faaf408..d624f8b 100644 --- a/c/sysdep.h.in +++ b/c/sysdep.h.in @@ -13,6 +13,10 @@ /* Define as the return type of signal handlers (int or void). */ #undef RETSIGTYPE +/* Define if your processor stores words with the most significant + byte first (like Motorola and SPARC, unlike Intel and VAX). */ +#undef WORDS_BIGENDIAN + /* * HAVE_SIGACTION is defined iff sigaction() is available. */ @@ -45,6 +49,13 @@ */ #undef HAVE_DLOPEN 1 +/* Define if your sys_errlist is a const definition */ +#undef HAVE_CONST_SYS_ERRLIST + +/* Define if you have the nlist() function. This is a + not-very-portable way of looking up external symbols. */ +#undef HAVE_NLIST + /* Define if you have the chroot function. */ #undef HAVE_CHROOT @@ -69,9 +80,15 @@ /* Define if you have the socket function. */ #undef HAVE_SOCKET +/* Define if you have the header file. */ +#undef HAVE_CRYPT_H + /* Define if you have the header file. */ #undef HAVE_LIBGEN_H +/* Define if you have the header file. */ +#undef HAVE_NLIST_H + /* Define if you have the header file. */ #undef HAVE_POSIX_TIME_H @@ -81,6 +98,12 @@ /* Define if you have the header file. */ #undef HAVE_SYS_TIMEB_H +/* Define if you have the header file. */ +#undef HAVE_SYS_UN_H + +/* Define if you have the crypt library (-lcrypt). */ +#undef HAVE_LIBCRYPT + /* Define if you have the dl library (-ldl). */ #undef HAVE_LIBDL