From 5e7451167d3cd78288490bd3d028ba466e321dfe Mon Sep 17 00:00:00 2001
From: Abdulaziz Ghuloum <aghuloum@cs.indiana.edu>
Date: Fri, 23 Nov 2007 03:44:48 -0500
Subject: [PATCH] Added close-port.  Updated user's guide's list of unsupported
 primitives.

---
 doc/ikarus-users-guide.pdf      | Bin 222791 -> 222539 bytes
 doc/ikarus-users-guide.tex      |  41 +++++++++++++-------------------
 scheme/ikarus.io-primitives.ss  |  11 +++++++--
 scheme/ikarus.io.input-files.ss |   7 ++++--
 scheme/last-revision            |   2 +-
 scheme/makefile.ss              |   2 +-
 scheme/todo-r6rs.ss             |  10 ++++----
 7 files changed, 38 insertions(+), 35 deletions(-)

diff --git a/doc/ikarus-users-guide.pdf b/doc/ikarus-users-guide.pdf
index bc00a34ccecb25266d20babdcf19fdf185d5a6c6..0c40f1fcc82e2e946225e446d1328eddf963659c 100644
GIT binary patch
delta 12310
zcmZu%cR-D88`n8)m8i5s+Vec)tkTd_8rn+|Z$r@(N;>UmNvTIsD!WCbkZjS^B&CcZ
zNoWvBzB}K`%k$`;u5+DxT;q4GyY4mfH#PD{SFu$DuxLz(S67!ebbE-G=QiG5y>%|y
z`{k&DtzSf>4Jf*OFP+w&;>mE9gO9gFZ}i@gv^V<u(T%l@JHE7ExNt;&XX!vd-^bZE
zFZ<^Px)cWWE{02gZyNjL6#11oHyi$Wc0BCs#3s6Q{HK83b%Blh`nM{2<p+81-t%>=
z^k8qkwU%xRE4$!T*>YX=XSE-Pv&^58b<6LbVpq=A`#wIib|@^wR>@L$b%FK1*vsua
zkMu@&8cS)W6%UL^2B&neE5!559h8m_ammosjIc9t9?YsXD|2U8N*;JIH(m0NgNe56
z`hVhe77DS<$}Bz06?1O49$)k{H(thf%#tJ2TF)ojdf+50KcLXK3gPHaT@VgQJh^Wr
ztgzi$Z0p4?jVCg&nt`A<LgH2Ex<)y*xVFz~tElrqa;Cgop^Uh8w~1V0a);ZRC4QY%
zXYXGTxU%%ANAJwWe93}$*{vQtyLswLoG(Y4eCjEgn@Ez8mP=L4a<}s1V$<NrTvOff
zP^qhQX@$+s0@i6QdL#3`eOt~aql_8j1qy9%+4Bl0T){hw<ND=V2P~?%>AYDKeb%$}
zv747UIqvF&xw&|PKCnI8$|+U0z-M|>W2VXa(D3e@+^kcFSI@MES@wGl?&a#t=z4Eo
zWw=<tt5`(9A_qDl!YwIiSERg3Tr;ng<yNLp;lvWyeKV4kCfl&s>`J#qyvg$q?-qq@
z7FLRTv*vc@LGkA^&<y-|w`^a6>wz>52Tiu7uSI9!Wy;+Gd|H=v_YK{sd$dNnq5r@?
zH%nXl2C(J)G4Ls#Eh3SnonbZFOHTP!3!Z(r$oMgzEm|NOk*eO%T<NNsG}YkmbK(na
z$nlZijBH9ZmCiacxixLbg2(*UvtBptzM14O>jRmY5l`$^#fqa?u&<MHk>g+>`JyaK
z@#ySSFFp92vdD!Z%SwKz?Awmmp1z^p$#3s_N0vFBx{~@V-aBbY;eC6D;>uMa-zCmd
zr+w@le6lrt+PI`&^pIZ#2CS*!*jSo3=F{ADakRIK+VWYPMOM4}T|2y@dD4`#D)e5N
zs8x<w=;oEW)sdUmxFJ<$hT2GO+(5VFu&eC1lEVgP*4&U)&*NGdJzm$<#9qkRvg>ot
zlOc;Q=F>VG9Rd#c&uK1;I^LS$lxXj^zsX<ZdSTIN2{El}S1&nFS>}~&YW7!t!L7Kq
zMbT2&tW-l@RU?AMR-Ul%<LRs2Ija;|l#Jy)E1*rWdAX~g1=U44-XiN$IZw?R8)llS
zPLx;q2CE)OdBx+*x61PHwLR*)haNvKE~<=eFg#+G?(6b&mtgK&^+)V*|C>C4^Hry}
zmOWV?qdM%t;EZau7jv5Pv(-^3qPS%$@pWmB6(7}8AD4X?{*v`BcJwq!jZ@COm%n_b
zV8MMm#qwI|GREPibtaahSrJ#RVsA%U%)(x;9h18`-ncGqc!}lYN42|^ktzF*XKn0`
zI<K(p+<PnXMVDrp=aBl@(Y3MUg*l6jD@ts-gYwsew$%$nw%XUWUGX}sYADcMq2kbf
ziTj?A#8_5oy!U4Eah6I-S4mE7=?LfZ0z08hiknpV*88HK&y0O-H8cXeEBr)voHcdc
zbI3yQ@vc6L4+Huhy*_gljY3N;HlJ1Ows{v-Y=*YBf1b_NsLXE+H9fDXC9RX7v-A~&
zx+PNbR!U0kY1>g&CVV{l6=~p!?~Zn-q!Ze@7dN;x?8|2}C{Q+H#k_mS?HTQ;SSUCf
zUH;rn*m$Q?oYDJwp5s?eoI(-=Z9IfSvMI0U7G8wLhh&d^9_6ol-p(A-&6Rr7TXOf&
z5F%yMzEhoaOu1vI4HL?F<M%-4>8uWqgKGJ@uRcY+R+Vehw+K30?=bax*Pt6fEjX#|
zZTxhFPOyILWr1i(-ci=EeGLyKKU!PVc|(<tzYLUIxZkr!&u@08W6ziT>a*cvE)PcC
zFWpP`S!@)g>2vLq&Q+O+&#p=??aIa`rQT*6QX8)g@$`Ss-z0FWFkx%|#c_GIb&d;;
z2U3_~$Lp(&3bv}hRNGEw35qyN71lU^?`i$m%dh7eIT@)~sqQZtxsp{qQI;#{x57wm
zB9X^;^yz|2OYX>6+6<tID&w0glD-5iVcc?IUw1pipmW;2Y0rX7`R|&igW4{?UQP;B
zE#SN>VgDd5ghwT(r{%Hi>Xd>Dz7Z)ME>o4pd6DW`v3um<?FG8^I&ay_jcbD7WLDMO
z;)VBWOqzl&2Y&ukow>bh6HVjr3KJc4_=$hF3+h+t6S6;|)+cLrHRq_ezc?#x<bI5K
znuO)>iBAdRvu6j7`d<IarT%^06!tuVO&FU9W2<DLf7Y)t*Ov57ir}?L;qaJUI&(Gg
z5&D}BTw3ulkx|vJt|)NzJBPN6_PE>@vRRS-MYqe9ii3f3_Xf6IqqlwdKu!~Rj?qsA
zJ|8js94Vdl{!>fmg#dkcrTYavI_IH_ma5FolE>F0qnemK?hAvbYBj&^=V$HWzVm#n
zN~O6%BzV<}(;Z6k=}U**U&w|<yn=(%pR(;JU#d|t;jX&!BhML2ot$v}iX_U8K;Her
zm#lAij%{R(1a-0RA2}Xzec8wzF6f)SVm<QmjMehU*gKw-10zgJ)%Y`ut4$`9s+RIZ
zPsA~WcTW|pm|eFu?DbQAk}+FB0n3=I;@o0#f1^8^=~?XDzVh)pxakJh&4`k+{L_Ie
zis#T?8~^x>=RUrtO%oy>R-Ak=+G}xR>&-2%j6Trs9lS5L&gG4B=-yl2Cya&rdzn#<
z>xX$}qPeX*c_r5jC6+0$lZ3e=CSq3Us5k^mk>05v-mo~^;S}4_75>pN4jqMCSh0$+
zdwGR#-P3Qmd4GT1#N8VnjTahjCe^-(T)g0sh{S=T3aQ@gStqyhXl}MI=Vr<>a=KEr
zkE^=zvA?TF9>Z=)kJ{ip;osvQ+<AX~*@l<XuAOWZqVEOSkCr%m>5L51Ict%|veGlI
zfYK|s?CQA8GU}+xXy*>0<ruUteEP7Sm8p=P%U|)$i|f7s{e_-L+zpPwnGiv9Ww9PD
zUTVL6mapspR_C;!;a#=nCTZzj^=WSERZsCJ+no+_%Ia~P<9jx>v`Hi@uW;SD8HLlk
zKFLRq?v%faFc@|fv=1wXSZ?EL6(%aSJX;~V11Cwn5ej43yI!S-_b3#ISZY;W$zy$~
zUm!KDTCD*YOb&%>=?#!#OZ~qkloyK|IPfRhMx1C((Q7xd*4~RepN2ba^z*mczd5(s
z<zz|MZfxT=u4+qP?QbQ!lV)e=Z@ygYpzB1*kLmH=Kg!&5M%<%8e0)vhO-rA3)SV^A
zOplXuJwkfP9L<fY*$pJ2<DIh(f+q}E`Smeu#kF28O|HunH)&kl?^fh^X3^4mO83!h
zr_iI}*UNUt#ui9JBeG>BCFS)dR|=L4pE`VhK`&HV-T9VxswcH9QGe!WyRrUJ5!;s*
z5<Ojer!r#;T(&6G#>54jXeBu`Ke^CzxV~qouK8H~oHjM*(&{tHQ;o46CFLEIs4-TT
z4~h(RVf07$zAo$&_uWsKy?*-xBlMQ8Rjo0kr=E;y7}t4rxbIUa$`u_F@OsW4b+hn|
zlIrNFmqmV>ltRMY*R)=p>aTIvRJ4m^S!v7fb#N%z4v&b0>gVO8MQ%Q$;L9uCKbV`F
zq5>7(9=!Fi?Mw=jbo0Rz-sZiO7vDz}WcALENPF3BDhOGr?xT_QHumjEthz``K^!aP
z{-C1P<SVX!wprYsPZ;GaI>h*++3j|&OYfub4SW@jU@I*)YFN5%mr~o(*N)5G+E<uq
z=4(xT!^~+X)}&4jYWG<Niz?-qCC`2?-K$56=VdK-m7dFH%n4X~+!}s#cP3bIfK^RO
z-F{N2Hfw>RPIA4{7Mr(GQQr%NtM-tC6F%I$)_$8ceXa7!!lzSPB1`uV`bm|?tX(8*
zvVT?Yy?olc)7K!oRp||+7f*a#s=rr$mDv99*4kmyY#TE!(uoF%-Nh>Eh9mjDyd}&1
zGi0pg>-ffc2C7cHN`II><-f0@X{!6{a;V@eIoX%g%6ISEhfkdqpJEp-UGe%BPpjFf
zed0V4a$L_?XEv-(EA8)`J5XTeu&QhO8WlGyQw0|fy<?>#YO6P^YwL~eOdYUz@1u*T
z?<_QoHb^+J{M-|{rq4<<LD#SBgJcf+E|BjX3R){L+`D{Gw{-zre_F<B(kiiPP0<!*
z^uqL_=BfaRncSpUKd*(ucJG5;I*<8jO=WkPs2*&5^ud_*_`}|}<hbsZ3vX5OYnQ~E
zns8;S|I@fWejsRuBlZ#+n;u^Ijn1ulb>GyaZ#eZN_Ks~Q?~-V&(L26FIakYTaA7Gw
z*F$E9?taOg@=<RuztD{QM`d%6*lLA^rRVl{%LK6Ba!m_uJkzG^ffklKH1flBdXENI
z#Fb@xZm{79qO*|K*<(9MhakiH!O@bl&WTsMw8ndy%4Z~G{Uk;%Tjq9N54LaH*mSca
z<oF!D^kYe!gJDp2|CrfIFL^#%`k@qFG_+tn!=r?|r^In<V$6o|S0ai_ZkK$|dU3Jk
zqMGgMo7oo=((2>GwD(n9uC5N~6!>sjaZg%gf#H?zRau<ZJ(Kz?tCHQa4<?NDU1C>D
zZ8Q!EYmUgV7j3w`?uM+go&NY^Nf&)a&RL;i1x?3AcP5UBzD}@jo_N2@>!z*a9p0sS
zsy9?MbR-;=s<xlmaAt@9p*;^a>&2b=DETyeT6DXH=FE?}SkoEBmJ`E)pePDw2aqON
ze^yBMb(a3|6ydAGPFDwWY*ULai7qaY9XhwI=ABGLYC|Wd-;!dP*=efHr?%S*Cw09K
zS=f%}N$MC*jFfK;PTU~*GWdK7#w{(-n{hCvBSiPg=SCYwroHI%fxCM%*88_MjfRG8
zxo$TTa-F(`llSYlp=vD_`;Mur0gtxSA2>W<P#_dN<ZpMx`}(aB%f|voZ@s;(I@QY;
zbj4}gk*bu?>x|;un9Sn6AtUe1TobZ{mef(mnMXQE6DO6qB|ZjDUqP;HnB%sdQ0voB
z*1_&3KG3e9ujk}28Qtr0C)KzvPW+%D=YH;?7vEl~bBeH}`TXMctL5{A#fXe9nj7Dq
zR<ngfVrL`K7+4^gBq8gyl#gfX-HVhx8D|n?jW!{^XHs1bc<tLfaJl<cexI<3OD$GP
zCTX&im4ywI+&wC~3p$oPw9l`#&p7(l_pX|Gvx)3Vq3#d}N%*3*;;e(JmxZJ94G$#|
z%j*vU=PdY6dD{tJtfn_;?#`S&bYLio=X}E+dliFPM5Aj1;wojL>N7MJkW{){(<945
zEzMhWw|;1bx{|W8chlA*w>P0^r2{9HdqI3X%huED!MMr7;gI1<FGp3k{3Ai<yN_gr
zR)z3?kEC908F=wRYOBc88_YZ<-UdtG^gK+iVqMsM)61vr#S@gosqqu*7POp9ahDSl
zvK%b-680R`W)_Helx!5QuU9lNkx9M2=;MwggEmvst3ihw5^hOcPgD@$WsvB3U#e-f
zbsa3zni?*4D)$~i0k!SrRR$WC8mjt>a)wWG^hv(oT*&p_z=;33fZ!GDsl0-L+_7Z+
zMXQR&S8%L~HD-N&*q7Xp$Zd5vW)a0Q&@Fd!vHYi}Z!Yj|xY2y~@=THl`BBVL_77X1
z&UP`K=xt(C(aW0A1GL`4lcr)F*8&QrGth+x$t>$EgttvUrStiY+9Rj-<g*=Jq~&WZ
zcB@&dOyiSUr*p&`E<S53(_?maXAQQqSUY#QUDkCLjtkS;GpSHnFXSIwC2YMarHM{u
zoW5mao5X)S?z5RXl(`z-dt&dmOF|xZIi<X+x4S7i+%c<i-p}#&Znkq$_}e?K#fqfy
zO!MNE`d3|Nb}1)5GHuU1q%0cN@xtTYwU>hS_J?jq>0OIyZ+yd<H2~)*N%yUWBSgll
zvfambo6Cn*f1a~>*{bK8LEnn8tz;9zR5?k3oHj;gW(GD`At$NxCmqg3I>-iN0^B4q
zXs#`}GhToDlYTw1=E57FlEyU$@1N&;Wc#rAf`z;GjU0os{tK(#R@<tm*FActw63rV
zbK)i;EZ6k>w*0PTx+gkau2yGlSbOwa<m7=wR!WC{>6Ea7^sN&T*+xs2oKRpz9X?kv
z=5Ie#G|V;^^QuVqOJiK_*JEB(vBYJOSMN;RGnW%kxwD3YeUjZVagb|6*#7v#7cE;X
z)l-|^S6}y>>@dyCOQ)eqkvY{fBb!~XbcYPw<O`Q#?dW~+w%F}rmDSqO+!ZJMPmPKx
zZX2t1nThZ{nM4aaTBMzN&suUs=v1E;U%gM&_tEjECkuk7-DVDs+PfcGbno0?kLn?D
zyHbjj-R7Mi;u}A2yuNAK_tDn0!sS%n;yuzHPeszS<JqSVt8R{5#U`XA9<S68!(8$z
zkx6?q{G^@EVtzRGO!&BNavG<ZSW4oh;5w-@G7VQAdT`2N4I&erA@2P?W7DU%DFwV5
zFq25W9e)4z$5JP!j)X4J8^`u>>zSmJMAOfe-Q3y8dtbbTSNKClZu5#g=iya+?Q5^G
zz4{pH!{$;~sx7?rsbKd)$%M1Xs_)sZXiu--OA45UMU6#RUrQpAm`ca5i|XjL^6Uz*
zo{iX_am04diOp)y*p^MG#oK<d*s<kU=uLw+HwS2MCZkFRzeW3L50%7lFDp2Ha(Tht
zNsa@b;R}4P<F=$E#l}E^g_AE*7JstU?t6vSv3myHe)gns$X>?#z>U_KRid2IImLll
zvx2<-xrevhE-!Lm>9Znb9o2KB&SVbmx*t~6KO?dHu;%WpSYzG%YudHc>EMvCxyf5!
z-2{`Q{?SmC_-y^{<pi_nv!P9fAII#2{4dr#kb0@Ad%yb*guM`H4RC+1aFG9?==nz#
zUrzR<R7ZblJ~>AFC^<W~)=DlayPz!HQt83k!Y}%n4hAx*@iQ!sjFfIqJtM=Fh8Ab*
zgfgJ3bw)SGPQ1^#mg{15Twh=EoBykNnaebL^SC34Vh>JLye}_T^|ZduQ761!EckrC
z_hsIQn{jX6^FNWrJiTW6yTzPZBx2oZNQqeU8uf-;@%C({es!LOLbZ+Ewa*{ktxS<<
zsd&|Xovqa~(TCS70ApXtCWvJ%Bn5FA8kky|Sz$bUq}M;`X+Dw_i~2|3=f1AV?>0s7
z>Zt0cL$=Aw_(zPz{AxKxJ8~E++77FgyRTN~anb$!UR7BkN#=OI`xxIbvy$q7?Clwm
zE-l*IDQo1_S|ci@itgE{WWHQ3x6@5DP!}@Hd~?5<>#$(vd;iDlpDrsMRBk$|F|42+
zedBp`Flz(9!L^Uu`pYleKI0I_Y0je`G7)>>g6i813Gc>NH0ze@t9EnOuI;{SRwFi<
zBBa8ltemWb^{WM|2hmcGdHER`bXG0sMLAZ>&()0urba!}YhIFvMIn}ZR!m(^?-4cd
z7$CKdHV#e*4!_iWv#q&MO7@cC4N?EPnnQN8VH72Pk%41qFT3L^R^_MdyKAfjNV#lW
zX}mi_7EX86yjw)-XJcO~)2D>l#FB)u!NsHiPFE)b6DM=bX$k4UPg+fg6v-7DmYn>7
zx2@)^5NQh=dsW7M`u{gkL_l^kHgI(|Ux)2qN)p5BL`coQF*dUN;wgf4!>X??oe)08
zF|s;dKINHbjq%Q+M~6~r>#`{IaV(Ft^GPz9%@zZ@uhRFO*1Sk%%hU`hxx1jQGA}3u
zQH~ej+U$}SLsOA*zuK*&v-Xa|%weg;nKQM1cg7snAKqVcug*NQt>=C8*B6V=A3Li#
z26IUH_h~Efa%P~V11w?Rm`;~k0gvj(id*D1b1`&`Bo)Wre$!0%B?md?*l6@iE1wFU
zuw7xMy<C-{S#-K2v#9&~-1+?Wk8ezus195ZY4|cz7Iy7X_>lBoOV714d?nt+-G=K;
zEo#J}rAH+vTLa5>%`M1j4HN;8{O8{XbwCAf^5aDr2sS243gt`<S{U-Fv&LJD^o@=E
zWkrwo|E;%Mg0zj(%-O`&&<cAe0ZjgXy5_bdNmGN<VzupR2UpBvElC`cyhP%!kufJ}
zv;E7i0c>qLr=yjPos)A-VJyjs?dOMYaU>GTVeV+_>RiKqiR91rFTMRT$qeOma<nqC
zTU~Q|jI@dE=LgmIq{20v)<zEIt|nMJo!s}6KF=Wk^P3zZ7{nxp|9cO1j!91V|IwJ1
z7CG(T!>|@Da`M0XYuvTTFG(y46J;)^%>OJ8Sk62D8$u{_CKbnnVJ5`D@xU@Voxo!-
zX?PwJX5jBYnY1747XNlJ3{jXcf_3PUnJgd%?i3mdF>$BB5JaI<aO)5lAxKZBGiW&J
z!CshxI}gZ0rTx$dOV%T=P=y)z!<i5b#;FGmLa5Z5hk9fYHc=`A{Zkz9Ey`rpkXDnG
z*~nBB!88oWkI6JT1>-d&Td*U*gqW)#*^*3wV60@GfDk4&Gf%)M1v57yGs!4~V2Set
z6-KdJM&K(N6~dMngZ(I-3S*m$!FLn{#tP;M2%=-X^8`#mu%#w|Ko}IvcAh{%mz_RO
zPyzNEO~`WKe(>GIJd4JlV;ZJp20N8OM=?J@=~J0B_)l$srU(=7a)bt>gmrW(Q0#>%
zIG94EU@~g}0U(6A&JzfbFlU}XDO9ZE2f;)z0W)wpjX|Mf=4L=M@JBER%lpA&GMU&z
zvmYk_wav+4WCW&S$>#GXpbV_uoa{-a0z0Uz1spmspZ8jD6rBOnvEm;T6QW`R^Irn6
zV-gmCfEY05I8VU96Pfb_LS<mB^8^j0V!W1spd$!oVhK)SFklFaoo4}nVAp;S3<fqc
zPe61UMzaD0Ohd7dc>)E#sjwo;v#3l2XFZq+%=agc!lcq+oJA>28Uw}Q2!eq#i0hbC
z92zMgB>x}KAcTHJG|XgBhzl7sT#Qke3<$ptT+CqNgqdGQjB*N${H`##A7GlvWZ<zu
zp&*2yrGP-juR|yZ1D}Q{5QL8~2qY{RrwHJo%2Zs$111%(3E<HY%w`=~h(-Hd_<7kW
zAm8A;1yNvd*`FQ+JQ$x`01u_$j0SjA6rWEhFzw$I%KFb+6qo@Kgn@~9nu1UmIIlt=
z4ZwuG2tp+&f`APCyCU-$mx9p#aN!RtAatU32$QHCP?+Ea6rvNHfFcmVt0+ok5zLBG
z8N|(Wn7EliNK+J$a|s$#A><E@=M|>Hw13yJegz8!xQV!sO2~2ZwSpiZl|j^w%A^vM
zqfv0mv4Au*n5Z3{PRIKbLa8ubJ5aO{TzUX?iNYZApuenx7&O-JU;w58I7bMkW+DuN
zFbGVDQV2m1Jo+I9Lcj-vpue&M>u2{dUt{n<0z5(~2Hr#n;l!j8x)~r0QD`a!f1Wz1
zn^XcoAdu+rmw?*A#426LLMp`QW74UF<#d!m#mt?_ax5ySyLdCBpo=2#pug~70@xrF
zv=6ww6ebV>#{-#%G7rG{jQk7b5Q_fgKthcH?F${>@yzoGjUNPDNdOzl`27wOa6bSR
z1(ZR&gj5<Kt%AM@#)lW+(V1AI16dv;JCcPkT}QGKI|Zd7n4=?E0o!g*UV=q9l0{hr
zGgE25koF5`G>~ZVg3$ir4hjt=Xhs92jj$K`2`btD%uIs`C<Q$v1Hxb@vK*O)Ft8XW
zph>h7d5JxRL9_xWLqs9L?1I0XN+(7QjgFw$ge&OtXbgmkX}AFj*q@0R0E$dwGB9^%
zG7~FtCM&V1bOs^nAefF%grMIc1_`JT1Oox66Cwd5bRv)W!;rtv0T8Iuz|HUM$#VJ-
zN+WDRP@<U-I`KLLbdy-7BUuh>bR-M2P*5-NRzv^dMu<iz)AL;i0kbGfgb$F601NQs
zKhKl@Gy151i6GDmU^xI5q7aiP0u3~%?ekD+a{^F*V^0>rlI+39TlQpOF*<`VVL>ni
z1_&z`puV>oS=kPBBzWyXhfDAq9U=OXjuL$igSH=wawCI(k-;B}&<SY?LKsA2ftv`>
zM*a_nKWqg?4uVl(+RqN;zrqc{3_1bB@L%#F1N1LAp@A={cw4{}h(_=_1H~x<3OB@{
zA_Pr9i-fQGpv?YkH~vcyzzD>3#9<pi0^hDf5EF)ALg8lq#j9X=AQWU^7`(>w9WRl`
zARq!j>sJW6{miFe-XyfGFa;%a0`ns=-dZq)N|*^?FbbaA00Ng#Qo-O(XzxH{4&jp(
z3<guY+Av5igmn=8Cz^iw1)eYSKR~kRzoH3)u?NO%J;(~c>jVTLFcDRB3PDwvI2a-n
z8m=7#qZ7*fW#eBa2EEMx@BM9D00oB7h`<PgNw^pR^FLl_ghre+LHrVw1OEOa6z0bT
z@X$iM7zLdp{t{5G@Th`Olqeud`}30dJ7^$@<Ie-_FN+`{NT`2EIKP=n#m~p!K#+^@
z2ZG#6IFCUkq<rvL@G}(n{{sq`0<d;ZFhLR$EKDcPKQJ9U=iu*WfSH)ULs2|V5eji6
z0#9rIK4bk32_`}qIY1&Lj3x*LCDaXs@|QO?@K}a78Un_UKZ0u>5+DW%r2-&_it`Le
z0e@QuI%S*{z;FTKp@V?;J%VMxq)8}52ucMF?|jqwUj&1RgF-lv2ooS67$xv~sdNG)
z5bCe-_`gB~f(pV{EQCfQv<3)`NvIKkN5C-%NTM)wCi*94KuSUwC?PL_|C=IO0Td2`
zc1&Vk0%P=F_7aN|3f@I1_(Ft&1M%jkp$Op#h6*}d{5mR_%yF0jZ5il=aV`PRm%r-9
zuL+Wd(r9??Xds*7{SJnhUz>ksSfCqW+@XW!8ShT;pp3Vm0R-L|@l80e3!R2XE3iHu
Zgn$F)9qf}A*_0Qi(s||Ojjc_1{|B-oQ-lBj

delta 12508
zcmZu#c_38#7jI@PMPwIJ_AJrNy|dgwitHh~5TzoLHA^TriIO5&E=f;mv5QD4DMeX|
zBx|Hn2$8i?{Jvhj_p7<jKXaV>UCw?!=i5-v^SF`cNGYMv8$}>GmzEaSfdGG37cZ`Z
zU6l?RKK*pQPm?Ov3N;gkygP`zj%-iZ4Mp!eovn5Vv%2zR!KeE1nN_?>VHtPW_HItm
z<sJC^)T;bPWsYerx^Gf_{>kW!-Q79n{Cr60kIx=+Q#Ib|OGkTV0$wKx-sx1USAWwu
zGd0n@SE=ldbHH8n9I5C-u9UNCQrK{jX!3>Q{$)3}%Nyo=pN_w_<E_2u+Nc&o{{HE+
zim4KxeBYIAusitnz_sk)L($jtyooN=9DC}atJ~fBUx-#J$>x7H>Uz|sMzq%U@%!N^
zSh6fjQlL<?`a)U^dO6E<gTq#Xl4PUR6%ggA`=}G!fvr_`$-!vv)#SM6I$dc;KN%nS
z4k^ES5+PhYWw>(xi&nK)tD$u|d~PsNS)uiw`8EDK-D-P;JE}S5Obr$N_l!^_r6rX8
zeWd-eO|g5@!#hiCyEo3xnrM`lgbAr{)EkkX%FTVxCC=QH*V*uwLz3UhV1>%<t-QqT
z{&EQciDec!45jVY&`+9{fpL>{2Xo!Gc*+?5s3r)y2eCahOg(zAgL2<{*WNK@hg%XA
zMmwALuC*KJ_?j-<Te`ejo4D#O2}vh#s@(6a%q@xLZ#V6|EdTNHn`pl#)AkxyZsuwe
zgO*#CZ@8k6q!?So!oD`iR%*XuDwk8AQHVw0{O}=KM(7vM4i)r6x~S1f!=wVeOP7SW
z#{6V$^rN8c2<kc`G2Zss=U82@VCRFE%07>B^mz?mt=OFsvNii&L|uQa)LF^dUd`mh
zJECWWi`3VLIUS|4ojR{@xx6pzf_Gkzn1*QydzdP!c*^a}-OmEgckkzMi|co&t6uvw
z<Mapa*n+}=DLtXlF?3b;K%GWE%&xesv9$bNdAsoNIT?2O=^)e3B8{2pr*!W4EmM_1
zC9{RQG&=jQT`N8jX_~W=$7{mtg!gDU_oFU_feT}3yV=6^E}AaeT54y~lBnE$t3FQ|
zj(VE6w_dQY&d>|LcT_8fFN7!cFQ$mM%6(gAcT=jzSX^1IW9nxV<}f_55d3}Bqlvv-
zr3Y&AMfFo^1`bL;+oJWUrR_QtlME-Sk2_a3TjgC_Q^B2dmTg`2rI0Lka(I8J*b<?{
zQx)+~^_~e8O>HC5--r}{SSWcD_V)U%Y8|g`wfNd_z0JZjzJNpD-tKB)<m8>yD!Ot)
z^?W{ajl9K^g3v+>KMR!GU3I&=<NJc-e&(0R2(|}=7=FQRjs0;1W3he3c1r8Bswv?v
ziT$x6Lzag;8Z6~RUkVyS;~ie#=1U6`?ChMy_p2=3co3T4rwz}E87eq71V%TG2bo@5
z<q><Ga=?nf8ydcW(tP;pgIgIz3eR`*aotczAZBS9ijIDFi4(ntn!&Su+xLp?d@eQQ
z;O$OpV>^;k;l3eXs;*P>26bO(2DRl%S-+tVZ*IO?nIPwY&o<r*R@9kxSajgKs`}Z8
zNSm)lC#hFoOG@m!G3Z6y=(u`V`aukbXRM4}XSUHT-pidHyV<o2a-H0JvYu+6iM*ZX
zXCq(O`20xpaKCb9=QeanPLQs$&G5*+b5gGkxGT#wia4rBOh_%iyELPrrq4~wX0-Z~
z7kAx?M6S1#-XP(-LCx(GX}x)&Q8gEf+Y&#n3)*NdCq8if@VsGiM{vTk&k2{7<f>{{
zGMEy!YHRntJ1H0+l5dh~D#U)e($8vtfw!3E%V&KR;;;_ixoUpqZM0yw`($2Le67i|
zIq~BT%rij`dNekdXasdVRCBmT)+@1pO!n=nd%fpqwPL`Hlo^VyO^4Ep)Ljap%f1T8
z#whJEk@n<%c(qw>tdZjQ%;RD;13JHD`Ign=q45mK!en#b(1RZXrw06<Xp;GRch(+!
zL(=27;QXk#uSTR`W&U{+6g}xVRgfQ2;A!HzNrczrqW6~TWj}bI9@WoP*z6y6yDvlH
zR!LNR1;6STXJYq*Hbd3?{_9?xS57L&>Se@pNx(J@p-sc#?h{X_s%x18S*z1On0-sg
zY^`6nqbt|PH&Y{RBc$IEar=`v0`0!GKQ5%y*6h?xB3;T;SVA~QKM@VR&mAM>T`1Ej
zoxkLvdO2NRX;fP&@)b4MDf#xy=`_On4XPsBW-0yeo9`}7@N%BMKkwpS>VDjGTl|SH
zKi&=XUJaE#MD3Y%3TaI3Gv9Z2S06Fy?OFETPQIuYjjnYDhijDIaVTZlZ4XG%-n={g
zw9LIy=f|TNa@#}nB8lO~o6(&*6h^gRo~hJWz0)4O6+4Ity{82XwT-uiDNA3zH`r~X
z%<Ms>gNEReNafHlmA3I3#9b?G`NwaLj^2q+>vbzS3PoR82z!_#L2Q?Ac*x%Ty7_gM
z`Lx5xnnIJgLOs`dt@WviMJ}<vb5A<lXs6BO)2j#06uPeFI<R_4`N<<%Ye|;fTAAq1
zCte~X2MzS9IJG)&u>8ZJysq)y0d#H38V(C+UhMSXrYnUU2KK_th_Qv_1vGkWp5Wi}
z)g#55AcT1a5{gj<{6`xdb=cz5O<sO)%<jvIZGzJx<bLu_$?M%mUPViuEA8|+{$rs*
zF7~XdgIT4zJ-p7HR1<n;%?_ETH|JhzKYq9(!1maVUP(0iTGN}!-SqHR!DDLzIM0d=
zRs6_-@8^$()}`6@%nx;QK6~&f^hDO{!>>_v=>F!8Rc6<0T!Jc3ydxMS>nr({B4Yx=
zIWJ%=#{WC-_2DvKzvQt{vEVg+<vEX`6^7H4QxA>a_;F4wL-I4mF<t}H@l@^Ht#fH+
zhxlG>4cMh=b>Smh^;*MK9D*?yT1s_N#a%pKt&VDwA()3l$9FY76Vq8yV;ldjQ_5VZ
z5B(82xQRWlbE#N<tUhESq!Rjyp4<qHYhU-XYcp#t=d(b?N3&@<PsU+tYnILiPrI?E
z;V$aVnLg?PnJ?+PE!~!9uM5mp(sjAfB6HGZRA{5C_c+^+6HDX0qD<xdtt@#Wmarf7
zo726(pPZ{`Mu<-_HPCf^Nxv_%hlhN|SRAD~jqCDRMCg23nay1J)y4W=>X$7cbmo^c
zD$hg-zD^hUzZSbtWmBn9@|sUAre$97KPbMu=h>Tk)w^WI$rqM3?3Z-j+%VVhRaQ%|
zsv-P~Oyxl6n!eD_yxQYA4#}vAUHfEx>lbXws{h=()b!}J8FOKBWl^W}&%_oBopt_l
z6Q!k4{TlcCjy7p*3c4ls!*)4Q^wjXAw&InYJ3Zr@lX4WE>)u@-R<y+bPB$fnXRg`%
zwtn^-(-(buw=YrohLny3F6my^rlKIM9hXzQRQbYT-oBthxeyM{z4b5KM>g~?I83Z7
z)Q2pW?Jqu);6U)&kT?@{@Ize4EfY<Z(4poLbYBWL$@i6y%c!V8ex>@bz=f%kT4hBa
zJU96UrujwNOdUDX92u`z_WV^%vPay-nueI>Fb74q%$rw?YbyIrKKS6c@NwtplABxI
zIe&a~Y#*Df${rXnek~Vrac1oHu$S}q)}uxJ5}!96dQj$LUN)s;^!nNAy6@*iP0jD;
zACgvbKzAM$x?RL>0k!(AUMUsL(PZ25tywAqs=s2MXML1=ZJM|W*OkX+EqU4NGqda~
zGktH2Tu|#_%d6j)F29!DE@twb&7LKyVnsBS!fg9cwIc3>X2Z?T?{^Ohj1G%stLJ(1
ziXWagJ?HFiH{KIlQ>F0nO3#|GNtxzdA#K;it)5h(+S6<H9C{lf|L}P)&qi!$cuRi9
z&}p}5>r?NYCVV$D*so5qyZi8coh9GBNY-3;cWh0Uw?*StpPmCfE<ULN>va>G8)Mba
zwaqJK?KBTeN}e8t=pXZ64yrw@G?)pLKOj9^P@_Jab~`BDyRAbY@o)|$+;6aT*{X;>
z(Tb(qGL8C!RnGnT@AmVnYM0lN9q0bClk@s`xX2|$&h?0Qu&3Rbd)G1~j5Xwp>tB=m
zbyhSN8p399q5HYC@3N+=t6I{6s|ZPqhbe#86SGi48j6trEGRGSpT>1d@!gwMI!LhM
z;5c=q{<yK%m0sodw$o=Wr(XyioZE47l;T-?t5~wTbDtppJC|@Rt>_40lx?Z-{H7%J
zLrJ&hdAIJUo^8+maZq4vqa#6I{awwF!u>ifJ(r|XMYD}ns5w`C#gVH~<24n{=;&C*
z^{(SPzO_}pY%iq6b&-wB1@wb=2fUn0GL6sWPLz0;s+O5BkloO>(QHR#lY@1OO-4iZ
zWl}_oZoJA_asB8L|4S<k*_{ezYL&mbW<PGbx+?Tj_H_RaBY&;>wPTUBwfA@xFD*mh
zRZXMaTdxI(Y(KG7dxgRS<`9)f|0oCQK^#xHnOV_xA!ot3sbAUIk|~F&Vp(VQCu?PG
zdB0A3x9W}8vtbH86F>aU*A4Udt0v{1y%K9a)4M+^`u%fzdfbT<1Dh|YD!w9`UmD$g
z^U;z|f{<i;=S}sN=<xB}`h>pf>WPpJEVX4Rc{6pQ^_u@SJsTcN<(lm0Tn9>>SE51Q
z_EL%d-ba1x6gZ89`m`^_ja-nZA+<TCBy@^szY^De{GsR&Z#CEB)-a7iSH-)5m#Px?
zZOU3VjTHAP?3!#45X;%B*d}N3g>yd4%hX<1!+0v>hdcK6-is>qX()4_<}##S^t^IY
z^*Sf5kdr;zM23UoMfIb&Cohf-6yJ(L^V^fN__#J$RmwaRZHjE0^Ac4P^4sgp&uFtn
z()4Z|<<1+<YhK}SJHvEJf<3LmvGOT{w#z-=T4>AU`mbyfc2R#_e+qH#IJ_lKPi?`y
zhd1aTTgiEw1;^IVfr_d~m4YX|idHk~Ly`@t2JxB_Mc6Td!TXaB$sIn^0ZOl~E2AGz
zzb$)FZ?VqDJvU<cqzJEa`D~9-fcnS5!MF~>NK0D2W&iG{AA-}<4j!NetKSUzoSjtS
zcWCbF5q>|qzH8|%&Daa7xzFFaDDF(tn5os(pZ!qWs9($TIOWqe&-ra-gKm3f3ivh(
z<xkN+R>5`>3b%$Ha`hPL^{i7^Hz_Y`#&G)J&}JszDHd})>PA<Yr2kv}LP=}2>&y#b
z;ceF+>TfCc*BI>)x6OFRxo~~B+vn~;&yLtCCE8*FmA4-zq(rbo5JI72{tJXj6#An#
zJDK0{K1Svn`62A+ETp$m<*oR!BvOL;_M=3*?H(ghQtaK()xNPvo(h>7ha2%?r`Oi!
zU9!xI%)aSB9n4&lT#5|Wa2?}4Zjq20u_{WVV*F%`gur_{Z>_J#_zt%Q&N*uhw0~Ir
z0&{e%U1m5kn;1kxmyQhPU9#VM-0DgwkB9M+OJk;fK|xV3(px39zII~C?gq5`Ln#cG
zmUXq?-yW+c$lHtbzwJqE7TEic-Jy^}PU(u+W!E%*>xtK&0`~?~etDB}*{H<HGW6aa
z39YeP9pg1BWCylJqT9MbNt2=x_@J(oh$q8GI(yvH$JhGHlNK)bclH<Om+<8ToG;%`
zAhHp(800@JLW_4YwDJ?WKZd>tx>2@nrNCfMjp&?|6}R3A-L~UfT+ivJ$j5~Yczbz!
zTdj2U!U~DR^{A1NkdC2+rG>@enMRkuke63po!2#xy=<k!A+Rzg^DLK#QDgfuj{;*g
zmzLNi^Ezst-<&GH!dmCgYg@E-^|Dos7>)1VcXUqAP+``hZt195rFocXQ}>jDnNP90
zSKO<SRe>^ZBu?|r9Qh`d?znB+eUWsgL{U4f_`Uk^1bBEAy31u(-n!5W2ap?`yAoqI
z{FQqB#sE`eujhO5`LDUEZl1A`H;Uh<a6D_%wJ_Yb=|JmUMZc)r&Cd1O@>>*jjk2Ya
zPJef|l@3VQWKBNB{avy8YOtlI%3bSf=+x=0r%q|EMAwXr@^V~^=MC$lC$fjov}mTr
zuD)#ERL8Ea{5A+(-_!dkIPZQBr}TnOyRpii=lvzil_OB^ZRD!YnjE3yYR7E&J}wEK
zjd6bXLgR*$%V5M>s+L@&!SzAzo=`{iPQF?tc${!`$V+9nbzjy(ftJb}_Qvh!^U!VT
zzLM_c65G2O8v~!c<e_qG?<2{YK057|J><8-!<o@^$B=8qHT1qtqJUWT#TxGe>XI`r
zdd;fZxg|?g*reSgZAHUUJl1JVlcLvNlTFCUvD2=os?sPe*uLgTe6@N($6X_n;x7)%
zRcqch?P@Wl@hbWqYju$vlG3u=GPUQ-@?Df&Yd$@)E9NywRUK_Jk}nqIDSYHT^1yXl
ztZGLb?ef`MF~^hmwN;C=AH`#r4jvX#UFKn_t)ey`IO3?F{WT<QWcHoJ%7T1v^2wCq
zgU>s7&vvQAUdbOh*^}6ic7T00zCL)KkRZswEO>~5m<l`5m&4H9+}c1NyU0#_@edu!
zK};f0uoaxdm6W-Q!q=8X4Bonfl2=~5KXd%^`mBaskIItDPT8L?l-#-H;%FDqF33?S
zIi=S#SV+;l0^7z(gwX)WYXOoU_L>a_i2OC``q!1F@WQW#53BS%GW9|Q5_#WQo;H?Q
z7Gs&XvC4E?`wUHaVtjJR!lnb)x8D1{^TWKmJx}zT<EvGQzdsj<*~~?;B)kb-rSkAI
zX|Ja28#gbj11~68_gHb2$K-Q^bLZmdRK-InH@^*umIcJVKmU-{ABc8%#NLSYe%_+4
zS`f^m<fP#=;NQ~boqnb0c+hn7)lV-1?tK1YB>SVKt}Q6?v&ZN{==buR;E->shwB4#
z)lNO2j36`0Zndq-%OAIPNNQe$v^t799xqfJkX1B1ebjx&<Mv>^cf8UMetf83xn}Eq
zHe(KHWB;9T$8NjCo&Lt$I)$q8epf`;bK-YpX$#a|lJ?%d-XPbY<kK|oCjYeU(i`R5
zUmk7?itmbk>-H(*@<rtQan0>jp@H&FhKC87=T408?pO4Ev$R1xRnT_RGk4p}BgY%}
z@D3#=zi~O?yoY1E&-ueVXI_?9Y<@7qV^MkC;!EzWiPf2R4m3q6_SLTUv#>^si*kcg
zBXz!oJ)e7b{>Z@0qoUcRbxJSo)N6^(JI@45C)MvQ*&>m_En>N1rp=;uwjgenl<S4%
zamXAxc=p`UgEG%Vb>B8LLYXVBsycIV)E<g>#$BY_5$m--??nJtbzj7T+sSn~nvF6M
z8LoE+I3-hLZWx6xjVfz=TKcA~SsBgTsKuWrvL(*C&QG&ntIO@M<eAfTy_a_;Y`r%2
z%=_u#^V>5P?vBrkJd);2+j5d)-U_{a$X0RQT<Ed`Vd22uc`F^0hL6U<!C237!r-YJ
zj@a#GuB7)-BW0eALSYX?$ba>g_FN5*e2vz{JSu7td|ABgeaJHE8p9IfCy@!}3n;gL
zvHHkyclSL{UV4tP?OE=#-oiI*=*|@%w-iAozGnS}bGM5P3VD)Sq^?QVPUZ}Uc@7(Q
zys*o}j!w#&-Rxdxr@j85#gEDe$9^c^r0S0NyIlLt*BjjQg(Jm=w)wm12khlNqpFY?
z<JFq9UaNF&{F45SypVpM`l09|E?4h87`rTC1(wVO^2^lD*3`}c<K`v~{zHG|CYqst
zVoWFV2JeSbe0L{>!%S>!!l}mVpICae=dSRO)%dz(xu<9j$Fa{3&>i<JcsJaCrlyhQ
zayGZXQC?C`G%qBcS3l=ijb2fT>~h3NuVmG+{!hI%=}nDiE~~?nHEvTQpC(&Mn_k{-
zn83Qr>dd5kUoi^Pwb3VIhaG3T-}-vL%#N@mo(XXF^$Uu8c&C}971dcT?0)53pKsnb
zWXNuJxS#%eDS18q_a!|7?L^Ush{II{IjSjlrl}R5_1o9oetVb8F1VyL-<?YL_{e>+
zDDcrezHc-9zRq^5v1`csc#E-T%j>0&8W0bawS~npYj$u(TE3CxHqJ8LSu@FbVR^tl
ztWSd^RPM$@j3RLIES*^DJK0)3!AtBRuubH5i(&*>f*|&RkLbf;ZfR()Z-hDW6Px~_
z$pXYfoRiZlVo#2@l;02_dJx!N=fqq7+yo0PI$*1<!!~0qM~K+}51lAX+=+T0lj5tK
z6h83ks>i1E)YT{IYERp*xcRhVb*S!2)jBS=&wa1$o{wDQ-0603?0w}$y}+DPyql^j
zlX*A>%Pdx})d-7eev`>#WNGdYofTWYDoVCAJ8DiymRNZ+uyg*d$n@yDf=bMYgKJLG
zcgHH7(5aVK?5`f#?HbB`UT{gM<Mh6(eWFN4^60p0`r(i$=X8RZ*Yih4u*U3te$yrT
z6Poq%cVs<;&CCp^s+SugyP4x9jmyNR$JY0VIju*d)_&jMlyIt`$zg9;hF)((htSQ-
zO_}~P;nRHW{4c!pOCJo>o)45zxv(*RxsMX|N`!cVW9f7t_vzO1eWJu41U6o{BlM?@
z!o`T*9ELWg`Zo61gcvaFPrCfEIB~ri2jH4n*kDo!Nw}Qfh-gCigLBZBsKDT`Hng@f
z*Db#sL9`?M^A91CNTjms7+G7HlrJqOdJ=xo2X7ILs2n=l+pM*X${&vqcM<;iXZ<H)
zrXh#6k?9uut=LOCsrw)LCWEx+w_D>@{Jc-a+|}RLH6YLh+sY&<V($@>_0KynEhg#o
zuT!z-Ow!3;2bH_1lim|i3Ph$zkr)4@yrsAne<?79Ol7d}Aeh1+v+&3W1Tk?u3Ke1H
zF=<rRJE%<N-|P5)yBMNSC=43bwt>V%AsWnb3Y|)&v77=nz!1c;4u<G7R!JEMQ1j1q
zU@w)<avqR{M*mxLEKZ9gtwMuY4`)&k28(*&AUc^*-latnCWs<19d`|bMk(jmL{cJ<
z7)%-lX_GohObEhwbx0;`R5F!`IqQ&2Nf4ci6)qAmlY-4J5>zIHnQbO9Npw05JGn?O
z7<8<5Gx)?L!<dLJ*iR#qshFEC_y!?V?9w6u)0tTBB0;6mFmXLV&|wI(T_hL~89Td3
zATSMkrbm(k_rp|dW|75&nHZ!`LfGgOh>m#!Y7-rzQ2*410@LVJR+qzog<Ho!fMOr?
z!ND*Y!ek5pK}9H-^CCe55}sQm=rjh_wn#9jG)%w{T+SfVn3$O%(2PN$!`Owtc@T|)
zbr~+6zyN9+kpf9H1_O&TTHHt`WA#QP7ZL*Opk@p>Oklo!#^5M~%wS?y|E4H(2KILG
zBTS`ZtG6tk1k`p|Bxt}BDT@T1LdIGa353bOcufGoL}-|?2{?&K2KPoUvLG6SRWA}S
zm5j|V5>yDm)PX}tG%(=>EfNgin-Wu!Jj#GrB837m8BErYW6}^hOO%nB3^Ijf9oUO7
zSS%0LQ6QEyAu|z>!HZr)f6r(T*et?;g&=$WbT8n+tm`N+86*mB9TlJDWGX`YZ5_BD
zloB!ov&IIQOvfcHSP8MNgUNK5wG07SSTl@5rqCEHiU1zNmBNzofQhhb0(eY>#rza9
zNa^1-SyY4!fhhb<yPrH5!QN~o32tC5E?_yG#$q(UV=(bofh4DxlLS#Z?nW42naMB=
zv-pt$GMItiOUDHe8D`*p1|z?GhW@|&lc{99K2!=`A1cJe*_}#-ab~CfDyqK)Bxo??
zKl}}%1#}&Rir>s+;DUe#YB#GdX#e3K8c+|njt1fUNTbtG{6Yq<s)6E!*N#s9*)o3D
zjt>2)-J)`IP%~JCp;P}+j`nZ&B_m{r)t?k9=wK|HLB=4Mg%wGV05ARsp)Az_WH%KT
zEP#jL%*mv~xC>z#F84t3M_6N;f&i2J6b$`W0}9N*B|YFFtieKo5nO`>JbXTanugb&
zRcP$B4M`LWcOVI^M5t8OL<53SVeF^_=y@P@A<V&nB#%Ab1`>}3Y96a;sW6PY5JWbf
zN5jPfD3<tjpn9-c9Yi~AF^HK!oc~)6bU4-^0eFhF@PqJYG7!wch9plUGcYgkyOK=9
zVKxd40ifWh4GF=X*^orAFE#+8K$y7wq7fJr8m0y)YZ?t<O(u}*cn8wxf0Xyd0!RVQ
z$L*y<2pKE1CCRNMBTQUO(qVuC+Q3&fIu(JinMGOXzy%oOKtil3WV|dC2nRetKgauw
z2AUVEAL&elj!jsR<ghk7k|G-grc<y_b|hpk1BP*;F<>Un_6#a6X(<dUYZG5YfH3ZI
z3IGcc4kSS$f?)SR;GuK?m~j$<G{*Dr$xa6VoOK-o532!yrr^$l>3>_*<c~;$@qLd1
zGx5TJ-ik{P8VJ4wdyqSLeL%^<$w@(QeGkBKCN3iYrocIXO2eN=rT^l|{+>AqZWaMq
z0s%B>2SO2|;6<PVu#N?RuUMfSNeFxEKvKed97!T5P5}tU??x#2C_o_GoI?R(;T!_6
zF^<QeA-^K>w?fLG|3{e8aZL>%c3eZGAn<<_!T(SMi~xTsybmNc6?7riaH9e=hv)r=
zd;TL-Ap{2>z?cbP#g-t7@U;=4<75Yil37z0bXf{6iV!+pbWlNYqJ!A@S-XCNK8un1
zr!jynz_5iYa!mX*OaW*dR|A+-I)3lJp8i?)7oiV8p$yjE3W0pZYYgG$F8~v9Q36qZ
z=KSv|4}sy9HI*SU9YJvy1NXC<3tAlZS-cN&n1<s~0M2DyN5Nw=2=tg=kc<9r`-31l
z-U<M;vtl!l%``d|?o3iZad8hp03)*s08w$z2>{PCaDqZiI!<vgShHFUCNqDvh2LTa
z=!k1x5KPAl^B))<)D7I51q6d}omCMSVgBK*#n^!WUdL%n1tT)+W-5fkgAf>}Sha&_
zpmF2&GVlTdV1nW<q2qf9L<881^*}lphgf+ugp6}FsDL;tfXe;ry#Loq2;?~K!2f9T
z08QYU9K^tPD2RcdWFQ83iuprm6qp|Y`u)LN<N@Tt!h->}!D+&zu)aZoL7$Er9v~(Y
zH)OzM29<*1F8PlKF@ULAFJ64jW3?7cL2!NtGY0Dz4TfXn-wuTS`(_A}$*ewxfrzXr
z2AUG<fnX+~;)j1Q)Z+HizyS8A!sy~q!WuLX1p;;L&xK$e6Bi#a2tu4?=yV2a3jhEL
z*XCdb1@w=_M~>g{J4jhvR0HGVg#qY+HD+Lhjw@0i_VHE#J>_5J(0`t6nfNM20}mst
zCZvLg5mt@C8zk!s6hKZ0t^?CSFZ=i6U-zOkG8LCjG%^EMeCSj#QL?xMOoX_e0^SlS
zte4P1Wo7X@g#o5ypxoc~|F?fIAu{XhELezt3Sl6~|4sNy6VTCF=LZn!;K_(ZXeI<A
g>0ciA-!JAMq`{zoecMAa;G&V4T=MdITlKmA2Ol5Tg#Z8m

diff --git a/doc/ikarus-users-guide.tex b/doc/ikarus-users-guide.tex
index 8574358..e76a7da 100644
--- a/doc/ikarus-users-guide.tex
+++ b/doc/ikarus-users-guide.tex
@@ -1812,13 +1812,12 @@ missing features and procedures.
   -- Procedures that may construct complex numbers from non-complex
     arguments may signal an error or return an incorrect value
     (for example, \texttt{(sqrt -1)} should \emph{not} be \texttt{+nan.0}).
-\item Reader does not recognize \texttt{\#!r6rs} syntax.  It should
-be modified to accept both \texttt{\#!r6rs} and \texttt{\#!ikarus}
-so that Ikarus-specific reader features (gensym syntax, record
-syntax, shared graphs, fasl objects, etc.) can be enabled/disabled as needed.
 \item The procedure \texttt{equal?}\ may not terminate on
 \texttt{equal?}\ infinite (circular) input.
 \item Representation of I/O ports is missing a transcoder field.
+\item \texttt{number->string} does not accept the third argument
+(precision).  Similarly, \texttt{string->number} and the reader do
+not recognize the \texttt{|p} notation. 
 \end{itemize}
 \newpage
 \section{List of missing \rnrs{6} procedures}
@@ -1836,18 +1835,18 @@ string->utf16     string->utf32    utf16->string     utf32->string
 
 The following procedures are missing from \texttt{(rnrs unicode)}:
 \begin{Verbatim}
-string-downcase   string-foldcase   string-titlecase   string-upcase    
-string-normalize-nfc                string-normalize-nfd 
-string-normalize-nfkc               string-normalize-nfkd   
+string-downcase   string-titlecase   string-upcase    
+string-normalize-nfc      string-normalize-nfd 
+string-normalize-nfkc     string-normalize-nfkd   
 \end{Verbatim}
 
 
 The following procedures are missing from \texttt{(rnrs arithmetic
 bitwise)}:
 \begin{Verbatim}
-bitwise-ior  bitwise-xor   bitwise-if             bitwise-bit-field 
-bitwise-copy-bit-field     bitwise-bit-set?        bitwise-copy-bit 
-bitwise-reverse-bit-field  bitwise-rotate-bit-field  bitwise-length  
+bitwise-ior  bitwise-xor    bitwise-if         bitwise-bit-field 
+bitwise-copy-bit-field      bitwise-copy-bit   bitwise-length  
+bitwise-reverse-bit-field   bitwise-rotate-bit-field  
 \end{Verbatim}
 
 
@@ -1860,32 +1859,26 @@ fxreverse-bit-field   fxrotate-bit-field
 
 The following procedures are missing from \texttt{(rnrs hashtables)}:
 \begin{Verbatim}
-make-eqv-hashtable         make-hashtable
+make-eqv-hashtable         make-hashtable           equal-hash
 hashtable-hash-function    hashtable-equivalence-function 
-equal-hash   string-hash   string-ci-hash   symbol-hash
 \end{Verbatim}
 
 
 
 The following procedures are missing from \texttt{(rnrs io ports)}:
 \begin{Verbatim}
-call-with-bytevector-output-port     call-with-string-output-port
-binary-port?   textual-port?    port-eof?
-port-has-port-position?         port-position 
-port-has-set-port-position!?    set-port-position!
-call-with-port        close-port
-get-bytevector-all    get-bytevector-some
-get-bytevector-n      get-bytevector-n!
-lookahead-char         lookahead-u8
-get-string-all        get-string-n  get-string-n!  put-string
+call-with-bytevector-output-port    call-with-string-output-port
+binary-port?     textual-port?      port-eof?
+port-has-port-position?             port-position 
+port-has-set-port-position!?        set-port-position!
+call-with-port       lookahead-char    lookahead-u8
+get-bytevector-all   get-bytevector-some     get-string-all
 make-custom-binary-input-port         make-custom-binary-input/output-port    
 make-custom-binary-output-port        make-custom-textual-input-port    
 make-custom-textual-input/output-port make-custom-textual-output-port
 open-bytevector-input-port            open-bytevector-output-port 
 open-file-input-port   open-file-input/output-port open-file-output-port    
-output-port-buffer-mode
-transcoded-port       port-transcoderput-bytevector 
-standard-error-port   standard-input-port   standard-output-port 
+output-port-buffer-mode   transcoded-port   port-transcoderput-bytevector 
 string->bytevector    bytevector->string
 \end{Verbatim}
 
diff --git a/scheme/ikarus.io-primitives.ss b/scheme/ikarus.io-primitives.ss
index d0937ed..baf6bba 100644
--- a/scheme/ikarus.io-primitives.ss
+++ b/scheme/ikarus.io-primitives.ss
@@ -21,7 +21,7 @@
           get-string-n get-string-n! 
           get-bytevector-n get-bytevector-n!
           newline port-name input-port-name output-port-name
-          close-input-port reset-input-port! 
+          close-input-port reset-input-port! close-port
           flush-output-port close-output-port get-line)
   (import 
     (ikarus system $io)
@@ -34,7 +34,7 @@
             get-bytevector-n get-bytevector-n!
             newline port-name input-port-name output-port-name
             close-input-port reset-input-port!  flush-output-port
-            close-output-port get-line))
+            close-output-port close-port get-line))
 
   (define write-char
     (case-lambda
@@ -172,6 +172,13 @@
            ($close-output-port p)
            (error 'close-output-port "not an output-port" p))]))
   ;;;
+  (define (close-port p)
+    (cond
+      [(input-port? p)  ($close-input-port p)]
+      [(output-port? p) ($close-output-port p)]
+      [else (error 'close-port "not a port" p)]))
+
+  ;;;
   (define flush-output-port
     (case-lambda
       [() ($flush-output-port (current-output-port))]
diff --git a/scheme/ikarus.io.input-files.ss b/scheme/ikarus.io.input-files.ss
index 65f5434..ac15f84 100644
--- a/scheme/ikarus.io.input-files.ss
+++ b/scheme/ikarus.io.input-files.ss
@@ -16,7 +16,7 @@
 
 (library (ikarus io input-files)
   (export open-input-file current-input-port console-input-port
-          with-input-from-file call-with-input-file)
+          standard-input-port with-input-from-file call-with-input-file)
   (import
     (ikarus system $ports)
     (ikarus system $io)
@@ -28,7 +28,7 @@
     (except (ikarus)
             open-input-file current-input-port console-input-port
             with-input-from-file call-with-input-file
-            *standard-input-port* *current-input-port*))
+            standard-input-port current-input-port))
 
   (define-syntax message-case
     (syntax-rules (else)
@@ -256,6 +256,9 @@
   (define console-input-port 
     (lambda () *standard-input-port*))
 
+  (define standard-input-port 
+    (lambda () *standard-input-port*))
+
   (define current-input-port 
     (case-lambda
       [() *current-input-port*]
diff --git a/scheme/last-revision b/scheme/last-revision
index 79e6287..4872852 100644
--- a/scheme/last-revision
+++ b/scheme/last-revision
@@ -1 +1 @@
-1118
+1119
diff --git a/scheme/makefile.ss b/scheme/makefile.ss
index 97738b9..7d7bf2a 100755
--- a/scheme/makefile.ss
+++ b/scheme/makefile.ss
@@ -1052,7 +1052,7 @@
     [null-environment                            i r5 se]
     [quotient                                    i r r5 se]
     [scheme-report-environment                   r5 se]
-    [close-port                                  r ip]
+    [close-port                                  i r ip]
     [eol-style                                   i r ip]
     [error-handling-mode                         i r ip]
     [file-options                                i r ip]
diff --git a/scheme/todo-r6rs.ss b/scheme/todo-r6rs.ss
index 3d8f192..4c6ac2d 100755
--- a/scheme/todo-r6rs.ss
+++ b/scheme/todo-r6rs.ss
@@ -558,7 +558,7 @@
     [quotient                                   C r5 se]
     [scheme-report-environment                  C r5 se]
     ;;;
-    [close-port                                 S ip]
+    [close-port                                 C ip]
     [eol-style                                  C ip]
     [error-handling-mode                        C ip]
     [file-options                               C ip]
@@ -646,9 +646,9 @@
     [put-string                                 C ip]
     [put-u8                                     C ip]
     [set-port-position!                         S ip]
-    [standard-error-port                        S ip]
-    [standard-input-port                        S ip]
-    [standard-output-port                       S ip]
+    [standard-error-port                        C ip]
+    [standard-input-port                        C ip]
+    [standard-output-port                       C ip]
     [string->bytevector                         S ip]
     [textual-port?                              S ip]
     [transcoded-port                            S ip]
@@ -778,7 +778,7 @@
     [string-ci>=?                               C uc se]
     [string-ci>?                                C uc se]
     [string-downcase                            S uc]
-    [string-foldcase                            S uc]
+    [string-foldcase                            C uc]
     [string-normalize-nfc                       S uc]
     [string-normalize-nfd                       S uc]
     [string-normalize-nfkc                      S uc]