From 9269809d3e1ce9e08339d56145ff847917cf059a Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?R=C3=A9my=20GIBERT?= Date: Mon, 26 Aug 2019 17:27:28 +0200 Subject: [PATCH] Kernel 0.93+ --- .Floppies/A2OSX.BUILD.po | Bin 33553920 -> 33553920 bytes BIN/CSH.D.txt | 6 -- BIN/CSH.S.CORE.txt | 172 +++++++++++++++++++-------------------- BIN/CSH.S.txt | 2 +- 4 files changed, 83 insertions(+), 97 deletions(-) diff --git a/.Floppies/A2OSX.BUILD.po b/.Floppies/A2OSX.BUILD.po index 7a52fd7426fa3fe52113376d096925107d55a40f..35d8e73c7b20a3b25ee36739e4f65589f6c42ed0 100644 GIT binary patch delta 19248 zcma)j2Ygh;7WeFKF5F~yQ}^ypHX&>ZY!bqfgqF}l3IswDNdUn{NEQ+dNlXHQqRT27 zcvv1-xMF(|1qEBMq0e5QSff6Dir5e_6g7wy3*Ue4+$}-B@Atv)zqvDW=FFKhXU?3N zJ9pjhr(@OuJx3#q&bWtfa#0vik6b>cfV;)rXCfR>cn@%Oc5y;c;>4$w z_x5umyrT?PUtjn29bkD*M3m8JQVpu*_np^9{O;Sc-<6Qo9Vz}u+Mj-D`(YP(YO!mN zyXVxt%X%%YweB9TYq@*(+IH7IYph4DU(fJhJyq?oD?+>F!B!Ez0Ogb{!wy<8XcI-Z!z=TH$-ry^FZs zPwyE7rn{aiSnT?cH)`$unQHAX+?UxqkJqi{bt^f$@_kvo(|OjkeV6tYx(2y7J9sL; z+q`H0ZrAT=J(;^MbJeX%>ZJ&Ihqm^Zez#pkN1b!P!P-s*7*i)AGFT6eK70i%*()B>)K?fwx?i|>!)EoW7mJ%^&Rhb z*1n1T$xvk~Z#{WOKUWBaGI>QSlo^S9$oXD@*0r5|`*$AMzw_w+uA}#rxb81?xn>XB z-*evjzOEyjSuONhjS3Mxvv(Zbd9@Vf>yLQ1uea=QU$61-k%#*F-Q`33<%jx2nm6S^ zW<0MtY+p`q5~@Db*Zc80%5$t35#GA1Dr4;`^fYJJI|ZlM(NpZmDb{ytF@)H8407x` z-F1wUpT|2F$IU}>Z5_TYjt~D_-?}JQd}hx$*E7R zUyAGgp)S|C!_fO>%HNi+`MO8GP<~%a3dKxVxP4?YhPNwwB^vN>%QGZwj5ft>yEDeyAJL6 zYW<0>?;8uehq?}JHXi;8{Zt!OX}AxXT;6Tjvfp*5d!3c*wcCPf`&~D>7i}j{R#D?j zXf*YnJ$)PBIoO+cQ}0iW)O)b&Aeel)qpzU7@17k;nh0Io*Y{AL>ycsImOcApU+q5q z>Yl#d-)=(2x+fb878iK?y82M#$l@LS`vz~e?;@`pxbDENgRdOOzwW?Y2X}nAeHEXo zyP~x0V4+^NnwNF;@A#6J?l}0^O;V)`Zev6B*h#|QOXur=8b;p;Z-*}wf4koMGa zTiX;6vfH?$pI6LU+$-sR>!H3IT4?7=EJt9?*Wj(|*6@zZ$>qIlqXz`gfcN z6ChZ6ikDK+norls&i+FudX2E)cM4EN@2KdJ_#MQn>-i_bo6Xey` zdVk&Bf2?5f?zJu#)dr#;a&EV~BA@CZi^Fo9$f3xX*&VfKzq3Db%l--XG;TRe7dP&D zv0yRJ?3X8O*?-R-WN`!C&9kQWM^CtC(>sTI2jA2kwPn93=_ar4IoL13?l=E*6KqtZ ze$rBW!pFE?ac_>|mMh^&eYnq(sjSKDmtKqgr2qn8Ds8s!y8!BB&cVznGiM}oMlq*( zr_=I=+TUkM8p%~~5C7SIHrE33q?U+n#Ma6wY8MuHX84P1W@@#}Z4sVA zwY{@rJ&`Yp$bN44NTReyl%8E$?5S_ycpPLKQPZgCXr>WDvu}$)&i=;h6<5dJk zSL=)>gU_%apAkGcJeVBGlkQ+LnN5z?X%I8lT4%(RVVCh;A zn`Z?zF3%PUq7~5WTyKZBeU-PtKij+J;@0+tjtNAbBg&OZO@Xr)1WdDOX&Q;I3bMVp zv8macM&hc2Io{?DZ`#=;=B!{&Ln};WZZNsDwLOg_)CAKV7dLg*H-blPFsr@}JV^Y! zV8)VmZ{3Ay#6Dj&oU|zk3xWkpn_KHT(@5&sYSu}Z%R+V5NlffT>WY&#r{|m?85}km zI5(K)&Kq;;Jd%Brm{erW`RXGlZ55Fhh<B0Z} z;fnO^^jYc4)7#T8NpDGCm412p=`>@ylI~1T%FM}}oLQWyUjCD=4i5AlsT7 z>ip>$xr9>n^zSyiktV91KWvUgSU8B1M7DKw*7-9-!etR9IXqM2mPMo?AdgIe8P_-0 zlc=FYL`Ot+2{U%3YW929%BIe%)#^WOHlrg=joBQpIBgkPcX%fo%P@zhuUtyZSSprx zY&~Tgsv5_bzSwHTL+-+aUM!n&%iH~)@x;!Ti;9wQG& zpc$)0fC}pbaf~FM@#+%qMOt*nMfA+AMd;>Hx7_NqrD1g-w%nljylf+)HzMbWt_{go zAOF*qoHSYt0AKQhJftz?Hj<1L;ZIwVWgG~2tdmE^7O3{qwlQ&V|A9agzMtexRL?nW z%bf{d-&wbsIN{}&uW0jU&hl`kvlnK954}$b!Pw`x0hM(8? z=MxD|o{X5TR+*F`YX51QH5PuIM3oRvzS`DUN5+-jXjR5egadDDt|JOuH`fPmq`afT z+u7-DCuVr?CH3`)%!mZ%O{{R)T3haPH%Xj*<7EmRRDt}gIXB*-Wad`lQK=%H(W++d z{t8`WqQD^sn2SiLyo6-Wz44@ywFIu0M8es^*8Rl6oor2QU_^^oG}P3s@)Bu2=L|nP zKoigcQ5F)<7&X9qhPM;p88I)?RXUc~;bql35|o7O^MY!&o*(GNWH+%~pew8pf&OAN zlUk>K5urHLb&@j3HW3m;HdTq~aQ+K6YYs?FWpF7>2Q z$uJJTNKG**!z}H=hEhAV3g(rlkhls{vT&>VPLz`1x)?Lqi)p$#FioXPKq6g=pQN?K zQ=p!RRTLjFUlwE)eYq~0W@;9nE?Pk@k=CJ>>_;&szI+AYI~yWjDdvV_Jr=KIbs~3(Vk^_8)q;dUt|i&Dt0g!TOJYb~4?>yh)b;Lvs}b za9+)aj{3~k1nF)63~4wpT9(a$V$|D$diLu=MEWpPPA3-ZQpBJZ5-YYS!tk@u?2Vyj zxAJDy0o5zj?;;el_olGg+XA&OMeUnIwQoUf<0@Wo+&}At|a?b~F;4{sen3?Is(De6JW)=|0rTykBh@q`0LAxzki1G{I1M z0`$bXC#<`chmg-5-uOHsKg{=itBLs$owiBUk@3tMRupUtGwWQQjqka;l3|6P#73=hd`2oI(hL1QVWJx(Lnkt`BSz59w%%5vM z(fkdDS_D>c-|EIy?5U|PDlR4F?{qW3WbVh9J5Oj%Ai?~7u#R*R`HmlmdXZUC+&_kt z6kLnUKZl5a0deB5MD2-E9D`4BEBZ}XQPS_iiX#8e^oX7BpF()oX`-HvQc^||Lr_eE zK{$+{m`0TGc>pm@28bD_n8$s z*otQwZO|;;7h}-8dStAD`(Qtj;|$s{LUO!;4@dFLqPbT$H>^gufK;uPCUFU1jQOZ# zEvzmjDK?FG9;d!4j9SYeampFwPP;~4URiscFN_*#66ZLBHkk_6C=8clo<^K_Cb3f^ zuBfV<5l+n0BrfR;;*?|%`(}FP@!|ne3;H2v(ht>`msM01)rOO68N`{YmDWNXS9f%- zMr5uZ{17P(`o=L$aDW0Uw>iVGZB!r(7zU!a;b$6w8#3rdkO=~3mSzOLY-9`bR&qjo zLt)s+V0qjq1CNy0{Gz#jE*lw@8>&#$&;TK?tZQiSV;9@#U)j>&UE0)wtu%s^m0pj> zLmYVlR)t+vRdf8U?f#N^Y1Kr^hdA-04Z(c~7$HWJ#vt21)*xc2#BqVj#5!K@ntP&~ zj3`hqidM4I3qfq15GX)!WuAx%dVeSJ{!Z5VTR$bpN1Dppoo3K>AR!&wibA~#EZfp_ zkXniZRWXlBkdap!q6`bQu28dM6lYl(C~PxA6v3gI8DK-K|y~2P% zNPR9E%L)$&r%l9J1n9Xpt<+{1u~!>Bg}Ga`C`>rKl6locK1<9)d9I+6Y7Dm$TB}de zd7{ufA5{ytYO&G+F-@&!8?yc7EjWUn;3vZt8nUkp_wYIXBL8GR6ymM##He<{g%ax` z)Tmn7$*Yjqb5NtWMyD$#8RznJG158yg*iohxL5m^_||lKJN&IJez9Sa&l7DYo-Zau z3y*0x@rkS-(8?DWwzV~`CUJ}TI0dptU_q}F1u;v)3i63uFS4Zus4&rs&SLwh@ycJ{ zfq35M=gyxe-0mS39%O}qx8C@l0folPyv{B@oFc5mm(c0NBeP1;*R?S_Sc zts(B#ivqTS=+n|3u$5er-pLKy;S)ico0qN(Rm;9OVBZiafBk^*;~_DEyQXC=t?k$# ztVS&!=HwA+4YcFFL^O!KH}6f>m5>VuWL#=7r-ddhmkLpQol zYgkpsk25=4{dMij{LM``|IvDFzFhA{K8f=g!p`L}zL|alHjCV}g90pr0KA^Rb*aC_ zySkHeBRN+HvDIhelnmdz^#*JKy|6WXk%6-+FDfZ7zM^TVKk%I6Z)k0Cqk2fL06TwO zOM}0zqhsX?h|8Or?9V0UE?qNYh{Vvr^bJC%e-+GEx2&$Ig*!WGBM4*u5#A~68T9Us zA#qoQm!P}S)u6XuV+h+(2Aq%iT2vD*+OzqLmRnl=D=>JPUNM^L$MH&xvPBnnJT~gr zfi1n>fW2CGf?~_QA;?O)5hd2G0i()+*{HgBh1dja(~L^&M01FAGl=7E8Q3^+-l|s^ z-Br}m+S%xB_ZQ8bflUH2-;NR+k< z^co`FkBZ3;phDhObxRJS)CYxAjM{@dwXJzIiFt^74&B|rt2_)3fb6(O!m{(Y7kX3_ z#5@*WK;*q5+x$2f>R$E<-OK(v+{-?xd0Ag5kp5dY`&77_efkVH`^?|D*)zQCv!ZS1 zbDEdc4eQ#VKlP!9&uc!8q`klgInePDc~@3p4Q+0%uWR;C@Z;?Py8NP`lwN`s6JO^2 z9^heh2m1;Zo!I}t6X@$x#?qxE`PFc0Fz4s(o&M=E=WBmWU+Uvt4_F3~-as3}-c+p$ z=Js29c0Nhy9pEjsbC-AYQcR_HQE9|`XOd`}*(sNt% zem-zGl>c=gp9dFx!F=fmm?=jMYTZ~RVd=48Bg!`eS3~})h$!ENMAzRVR%6=}tR(e= znd^jb3}TtZu(q{(S2eY+?C@7rb6+_0d-Vc`l2UaNv~fR#O_Y4hpdmknTHw2XZI}Z3 zk$y%M`!6Ai(At>#tNMlmhf${>i|{nkZy-+jUH!wM46*-#Y(4t>6WP*f{3IIGT&mCo zMx*XeF@zCDZPyL06KRkUXOx4Dx(kStjbSc;&-F;7<^*D*!V8FGMm4*|xJ^6SnqoyE zjY>)k5Su7+C~|98|m0?;4ED`wS+z98sW3n@RvioF}>P|;3~8uNyH2Nx%xQOh;fo?K}YAQvB`=falVj4 zUZ9WR*uy(4dHwFet)qkp3+pTy}k}J zEZZ}D0_%6`YC79%Tg!<2tmvln9JCPkJeLI*<7#G3FZbu=lEfD^e!iFfmY?)8>eya6 zlW7Gpzsj{KPCNIBP8Gan)Q?dRG5_@h1%1*Y4c6#l3z!?`QkJMHHE3_H^GSf zhG3rjrlv7*+O|nV-T^Jqw;>@JjE+v%N5?ce!50 zg~RvI)A;{#LUAbo+;JEuzYjCRjey7xjN%Qu^1px`gsENm(5R+nD+%!*1;t_K+5`w@Mc)B^GWgwt$9OahICFx(HeeUS;yQ*7p^~Bqr_3yGl$@HX_fDOFUx7V?HJra-VY?(%HVz`?0X7 zi?7e{##to(TRn4uzfEib621%O1O}V-ivcs@eL~zX4!l(SJ~TcjIqM%#M?1I*g$dG+ zD2Vz=H%B7>tQ*WPfhh((o@p?r!kP{nM*5q^KJX^IQ9buhn`}({UH$wQhojW|M^Kpf z(;ysZCkB(S6QfDD6O%~~Lc$tQB2*V#eVk+x?w`lrChY~pv}{GGkz^!nktS`;VLkV482TnY2hVQ!)MjOk*;{4!Yp1J!4MG4#6yy@}`#RZD~YZ11E2+lXq84 z-*TKeMJJi`$z1LqN9@U=l%@`?^R^*pN_FeJmCM^I7Q+>u?R6i_C^~3pyxp}35Q$@-=4<+_2lO7ZYh389Iwl01V zkw=*DUKLq6I#0wBBl&20^wAt8MpMc~rj&=DUtli^)Kvj zzKd@GLftZt4|IY^1-!vR*e|C2hzWn`%av;GNQEw$2rBa=p`P?SVx6LoTSY|?u}y^_ z+G&VxpKuoPG?NxU$VGY=r|T^u+$_<1SE~1}47`(OsMq8uPTx$?C%Igd$+JX{Qf6yC z3cRh~D9&mE6GW*Hqm-_>E01`clsG5QVi&)4mjj2G!>|1jsS@qks{YbbB2}AwC^?Il z@Te-#8w}9gkiKeAJF3=%m`R&(^Yl*4=h+LmRy6;4wqO$OKjno&$}{Unr`?HEUIPwx_71WFwJR=;PQT zc&A(xBB+@+9b=^TLIgAIYJV=`+>Vfloe)u4#eXj5omj22TO-)TUdnZ>-RLg^J7Qjo zn)+&e8SmWX0keXq9%Vy`TR4*TQ9`x3W>+KWE=U< zKky@O(wSZ*m=3;%i$|ib#cbwZ9h8A5k^adkH|vyJ^p0E?CSFwuiM>9Qu9;auVs8kg zeKj+23E;+1Mg@u98cNL|F={A<%R4bQg_1Ln+!jifo<(AA4kar~N$f45WKm@aiMchD z#@&P1+f2o1-=k@$6d7^1hsrB>h1h?EWq?55uJ`m#(Np;@VJhYwSRBMUFYgptv3F}# zxy!wpU)P}bKyRTbUF9v2Jw(-1BrT=+YdiEppWQtvA9Mp8?8h;AJv`EV|ust ziarc|+@!XQR))-fA}E^tZy`whlYbHMDIuEUX~7(uCpd$UNYCgZJuBLv&zr<;f)_;F zkuPfbxbg6kXx#p?roiGxZ~cWD7se+oedTY}NX-8UiTJ9nt9`nzUc+C+w2s#y0iW&z z1WP97H&9hSLwu8)^IM?DhL^r=Qb+w^vnTiR%y)G0-_+9_ zKhX#0hp-EN!vU`Wo9p=d)S8t`I-Zj}ME*!nIQDD3#Dc9I4`7mt^R16fw~?p=+`Do= znD~iFojg`?SU=T!SwNJ}P1?zB&KJnydus$&2O(3`mwcLX`Q<}GRQW5tslz6tGh)3PS)X}<}z_bqSlyI_0$dV42Cd#T@>)Z7AP zsPUvpJ*z-THvV8zTMHEXpdU33>SuVKfE!6a33BD&O&X3>8!P_JHOGpyFebh@x z%C9=lQyNdj&AE79bR>3DNTAgIHrdGxT<&k4WqjH@1s!NK;-8ChFOTZVY z^f?vfxHVN;RYqi6gcd8yivInV9X#D5iQA#xYqSpcB}Tvm`K;jrR8{l#I}q)doqAgZ z_|_*vtkKEH5{Dh~5S?j?-uzHBALWYBLx{*!EgMrkO*H06*Ax-Bj1n+4dq#v>ZL->Y z!@wCP&P52&@Qc&(a8W(cJ)rtV?ey1u0nT?bQIXGVeh95=BwH701VoC-3G^-vbxza?v}>73$8!u@pOGDV9TSuzhWT;0gd4iv04+-VDsHUGZ=Y*A*X}4g`7K;- zWcgh+^>r<{5!Kn$>@RJtAQJB6A|&BA74^44c|^HIZJVUnvT!4Jz)7Y9w{bg`@YDFv ze|a6@96aT8ZB zkZ}>0zmPEF{;jqXEh6^a>XvPGr3DvoxmcNP)is=30xsePM|de-HSq|9Um!*02f&Y? zH;yH^qKoO>LvWhO*+%1TuErK8Zn?yX%eh)=0dC*SshQy^EuL9bJQx1c{;<|&9B%4{ zx2Zg;_D)f3p2zfd_(fe2;zvEfuLAQXVsSq=(1d%Wo7kV!SoxkB$SUFKzl#5iU@Je% zZ}_4c&w)K3J=_!K*LiI(@N4P1z}m?uUhd**FNuCB)MP$UUOux|bLSGf;T6#%T=5;y zqgS;a#l5EAjeT9e()os3S2!p^m8U9}q&G!g)LXct%0Is#^4lWE-m8w93Sa+@NRED2 zoikO*H@v5=o2obs|5b09stk>MUlb;NpmEebnJq^UB67{R$LlGXH)qa55{28lo~pSR zmh}Ckq{dUT^?Swn*fizct%EumTiZKbd*A&)$u#WzP;uHzNYuxiMiU0tdOf8O>XW@+ zl*vO4*H63T^_@Q`Y0i$$c7N7H5{Hiw^bas$Bpvu#tWkU|*2KRS8(DyF5cIFak}t$X zeeD}Id?40=&&0&@YR)AVA0p^nP?knAR;a!oZRyo5dTs9iYxT{pxi!c#sZIazY?&9I z)!`H|)4!^V~7ecglE}CnIxg*Fy>cjx^uNQP7cqMjeb&MiUuz zGMdC_GNVHnO<{B>qb^2M8BJp}ozVB zqca&TXLJ^$vl*>mbPl7Hj8-vP&FEQ-&SkWQ(OO35F*={o1&p4}=t4#pF?tT8=Q4U8 zqvtbv0i%lmBcodxRT;gB(QS<0%;+tQ-pc50jNZ=Z zzZmUi^bSV1GkPbZcQLwy(VdLm&FDRh?qYN|qxUj;AEWm(`T(O3GTOuF9!4Kx^kGIH zVf0Z(A7gYcqmMKC1f&0E^hrjaV)SW7pJDV_MxSH!c}8Dg^hHKrV)SK3Ut#n=jK0d~ zK1N?-^mRtxVDwE!-(vJ_Mtd23htYQ#eUH)qGWtHFA29kqMn7cqBS!Z#`Z1#i82yCN zPZ|A;(a#zEg3*JFe#z(|M!#b8Fr!~H+Q;Y-MvpRjjM3wae#7XujDE*xKcgoY{hra2 zjQ+srkBt7r=+BJ)!sxGzo?`SjMt^7Y4@UoF^zZ;aOb3dA5}*_) z17-j-fpTCLFdL`<<^YvI6;KVF1r932X+o0M`N612+IS0$TwUxCz(> z+zi|T+zQ+V+z$K;=mzcpwgYzpcL6(qoxt6|J-{wtH*ha-A8s+f%ky_0`CJK0RIC%1U>@x10MqifKPx=fzN=?fiHlAz?Z-w;49!T@HNl} z90863$AII&H^8^RcR)XI0{9*{3H$*32>b;64EzH83Y-Fd1AYho0RA*QKu;SE{~x3d B5|RJ_ delta 20027 zcma*P349bq`aWJWNrz5mCg*fgIS7+X$iXoroC$YM5(!C20tljHNCpxKNk{^Mg2MnQ zSVRO|X;`nw3KF~m?uxp);F&brqNBs5B&cI*X!MppqNN3>gzRn;(1VVQA?djihX3rOU zzOLycNBeBklRJaee}<_42sxI- zmfnEU`_qeUO~dPLU#9O0>ahrS=3lHN0=Hvys^D6lJyrd_iH;-4%?75*g$96DnS4;vgj_ouZ?K@(d zXzxz%+F&b4?@p>YV1PLJ)ONw@KABEyxcv1^w$g(1;!Y#1FG%k+DF4)>3Y6$_QF_N| z{^Jvs8cKJ^^w@f%cn6^m6x$vwQEU!aztpB^`+v6AEA3r|jnQ3!8zZ}_j2lC{gpDCx z0ULw5f;JkvhIE=?IM@pyekK<`1>WtR2p{emZIe^G$8cNIdZrA-!I{H2K^%7hg)=#u zrDw{a9YTn^HyBM&_Kj@Cygtt5g43LxW(;iL>!0>6=Dd|Kw*S*!WB+HzJ{_3A1?3<6 zv}f3WxzqewUvG}uG>V)E|M}+d6CjD?a)$Pd>Wu~Wu}^zn-WbknOz`~>)LdM@hTC_s z#@+QAe%k6%yMFJCgh8Nb=5{3VSQui( zSlp8_a3!p*w!M?yJ?eo(+k?Yww%dnyCv`?1?F%2aU6H;j7390_-e~Sg?iFoghIa?K zOP@~R1F^j`7C|5RT3>fS>DCm^W9v!l{)|gMrB!4Gl=h@iOa>le<9jRvnLWt^!tOIC zH-3#EJhQ0l9zG=Zo;mpWqR!CWecS4H_tj^+&UBpFW$gc4buv1-_w>O}7Ihlc_L@$4 zx-3Mv2RhDO+ZhM*Z%yB5*@9AMoD$a^>5C4KV*>*f^~J9b^rjp>ITe%ERKlbd{C4Hk$_%dz+S z-{0ML@4Q3lENyZcWf^7+q` z>9+p#T^H($cf0#f?&Iqo{P{)4*)HPxvg0exyXS08eb?(4uKt7n<6VRQ2nJ&2c8o*1 zHV!t7!?A%ll>C^ts{<3zj}_q9fbN+7f!-5v{FB*=hh9J1JN(E~Wh0JIH%zkV24Xom zyJrBja3$>j7T$PmFvlQT;KKmK1@lqgfT^luWn(sN7HwO@QEtmx9;z2dTaw0OxfU`kO845c)&nw`cK2l zpU5A^4zWl(G6sYf!+*?%Zdh4%MfWV}HPXHP=J*Qk!s3%h`>sE5B?7oRSfAQ8zLpV# zS`MTPHoE3OsuKRY`{d$&^T9)3n4{&d`psp3H(8Du9yMCtUpi@GD0XZ!-?3kGMW%_S z4~$ZNRk5Rh=>NOe9AY517`$YwTEo+(NOF|RVh;>Y%aP>C{5Q@jJ6)ETNfShG3h>ej zRp1CNu*#8NURkIJy|^L7PG;nROyd1MlNFg}3_t#`%QAOna61`sB6T#Guv-3SO2YW# z_CuEE4D7Il9S&uO!`R{QM-NA=?FvsbkfPMsaGqw6xU^W))@^emfvDr#=32wI)E6}s zxRzD4w{CajRe8pe=oqr70yyG9umtJW1b+nqOQWN~WM zd}rfomquodSL+VFZ8c7*YIoMI&>F&rq5&Oe?Nph=6V>uqZ+Vzn9;cR%C%t2RK{)iG z)!>edA>2#3`T5m5IByn-px&B2ykY{8;*^TQD=YHKE7TscNMwRaRXI!N8|tm`@(uIj zQ#HvVF-b~gX>;?6)h*>MA?;h$Ud3d2RZQS@kDju|n2jldJmo8^-4G-%`O2CSJVYIv zWKrJnl{Kk4SS`keD3U5F3(LzZs&-DVsH(2?B#%rcp(e6lD~(3Ute28dvgoB7lZhCr zib@FEJ7A433Rg>U5vt(ws%n41kQ^4NbB~5-a}?R{D6aBkW^N&(Rb`$g$<6`mRClym zLT*W%Vys>q&5Ln*aRe{M>%}p=n4lMjqll6B8as6=FDEKxf%{_m zp|7pR>C-vWFr6xu7j1g+8eUA&i%BS&lD%e;bi2IdoHfB*>uRcXc}@tUNm7cu^_Km4|d&*l}tsZ%}Er<2iX@+ar4qYUYC__x+!h739L zTkBBw2+c1e6~7>$bieSC8>K74M{cxU8iA5SFO5NIj9wZJ12Xl})TtBZ^OK|5A2 zPIaR=PA{S{Y`k9L?hBis7Ztxv)Qi)2>m{0+;|Z)kKSlZbr1#?{#7N_La50==fL8Szr67ne1+CX=Wlz1((PLwjvKWX#g5 zYMqclB8&BkrL8XKiewU9qSw?mH?=o3t#&1EB9T|ujf8(pT;H8g=LqFgUGHa9JYe=2nU%$X~{ecoCcT&cRjQ6-POU>zM-t$3rT z%0z!)}KFDOdh^s2FU{ZZHQea>$(&`#pVlu6{_te3Uc@ElT=r~_@;ogCR z=e8jI?LUwFu-d&`-Q&$o99{&kbKe9`gc_Rb;xb@nY^cYL$G z^U<@`97AkOq!Mf;O%3fkrk55h%q{VZoiLF|QSw|CZCzj``$Nn22-qFeJ;5j38YgF66CIU_y+9K#@qNH2T*)Sg zh~0pTj^?{SRdudo??vmd08ipD+<<(z*Mem@NRG%EdMZ)tQsq*%1HZnKl)mO-8_@c) z+ArygXDLKXQM;0cUuuQYD5P=|($L~3HeC_x&d|k5BQ6oEBs4@EshPm{0&arWJ3QSX z*n##FGq!@pI;Y2;l1bwDM&KjUe27$tP`)YnS`<@J?w4bmWy+p$ZCk6yF^NRafaawIgIr~r zN%m_5LN5A|_~uYr;MU2MkuqU}@QUGEfu9&PI84|OGy=-keLn&{V6pm>m@9~5lDyQl zN(pAJvZJ!Pib%7;Q?;-vKex2hQ`G8m$(?t^3CX44u+Gt~DhnCBozgQFU zu<-L3$?Jc$#-?6{rtrnYktHjl^Bwt>#Dv9M z5jK_x*Pwmm68Rs$T1SM};P((Gag3E)>YZfbQu)HK)(H!1$^Mo`Cy}rabEk2=OWI0Z z?d`5sV!}$iw6@mc7)OL<;I=IHnqW^OvGr(#^Bmck9ktCXSGt<8`#2m9A~b+B<63$1 zZ`Smn75H6hl#l*qwMMV>b)ja{B?V+ev;5v~)(m$G=z>=%6UjqjTKN#@Gbw*%U6pf< ziwJF8SUaS^jpWv~9TTZ!|v}tL?ydDjFIC64`umPPW-AMM!PKy*@JB^s#UM@6lM5EQ?6JEHsrErb2 zk(f4liHNWnG;v#eG*!qsUHtgctZ3Qcqhws#*4vV#sA1c@>P&$;fAUjjJ6GqX+uoCG z?j875x|uj8$cS;Q*`O&1iGlopbN`{bt$QvArnx>QS- z*SG0u#B@Xx3J=^5nQ;%OBQ3d!=|P>v`moQT-XS)3dz-;}6s*z5d_=w=Ge6=Zv;585 za|U|;yRYX*dC$i$VV4^%Qiz+FAM;~>+{=Cg*q`vR{{!q%Px{zP+AwmNWb{*<7t?oQ zhYMq;4I`3sv`)($d6#u+@V}KMF`GOzWzd$ze-|~?FX+q{npWuqsZS}<5<45=+*-FHh z)Ik*f1FrO!<*-00E$~&oLf2R%D@LQ&%Rnrz`T4>8I_mjcos>nyH^}~mrnSWMChA(9 ze5VoKg1GRvAt!6Ecl9Nv|9W|d_>Q`Ho8CngU(Ire*hlvB*s?ds1ZE+bGcrSM%lhli!opN0$L^Z@FhIwto)lG#mFxSQc~nsgB%?9HE)cK|K`&A zO+*|}SNxQ7^4K8B9{jD^$E5G%Yl5VSvFA0LE@*S=d$oD!5AuUSQbOvFYF4nQLfh4O zz7hVDUmwjaB<7<0O^_7r{#g_CizezszMU-yYhQMIWZ9fU(bumD@mw9 z`L$|6Np*fPF&mXqelEx@0m|=rm4&&pNqC^zP+nGDQZ}!ULqo?BG{l@ny+0I7nQ z!gUrQ0!=ZI2A*W-3ougLibCWOQ3icS)wes72x1& z23LB7yee3tLq>9)N2xlyM{7De6rDXp9HZ)-kg1MRac<=fB?acAQ|-t{nM7nkFy^UJ z1*eh3u?q1#-g=WCwNgPM#tkBm8?TU;lvVF>`%$AzA|?!?O_->PMx(zT^AzGqgNd^h z;?nZ6S^mVlOd@gy5hqRt@v>saJl=eX)++s!!SvG<;mR@DpIkjRC(KYsbRB&K|{X>nV?L!eL#0j!`!I-6AN8)jd&SE9G4 z%=Wdb+0^FTMqHfKt@F6nHnbtpn?cN_oE*DL4z}Yt=xSV2xP zgJ$-X-0X##*-^x_NS7sCg(mA_`57~ucr|`EU*m0qI!jP7uEwX%C3%`hHdv&%ASV~F zR2hYgS}!lL)Ol5bjwY8+m1Q8eFPE>jNXZfPpy8WEgSrq!uaI|HBq^p*Tc1{{)k2fu z4nmu?N!6k@npPRSdx+SoPOITgSE?i!!sYrTr|RA`;9 z`0yK))j>abDT&}5CvI=}P}cJV0ueyhgMsgvS(zQYrlHLBlH@3;O zww+r{O#3vR@kH7`m;+{7Za3g;HNBuPZ{932_O3rFy9pcu0JY7;*V$yV-c85&F%HBR!?r_EF`+b^Z=T8YM4XlLk47*m(k^6T^CEYR}G%9 zAN8s6h*8rc14-N84LCxtB{7d89DR9R;gyB?Jf{DqcLH(uvQgE5NX4l@&mXtDRmu7P(rRF%gLHoZ-(T z{CQPdVDYqP1ob;Z-oj_xeamo1Jw~v#7Osr9%3eF5mJxe&r*Sm9>Qk zZ-7sFlh0fK6bolu=`9FL)NU-ihg@QMTbGmij^VcZCHpY*yWXlCV(!yr6X89GPI_PN zmn2)x2O147IzB`-{m7>&oKUuUWl0lvs_B$h77;!MUF>N&H(H`gKJit5ifYSe-mu}( z+mA**WwVLpf8Kf?PG@}epL^^1{_%xgFMJ7M(piI?l_^Cvex-LJeRFB@#y?6CX~3tm z>W^~ds^@ej;adnx{Z8TZ-l%y4przHdrlEOto2R^j-{1^8FK5L_iRBl-A%1UAE@)$Z zxLoKE>yN%(;i0jZW+eJ2U!5<6k}k@3#Ynb@pP`XD0fk>6Kk--j)fj2$oZnEbZQ#G7 zS|CQa*J#vJXk-+)-czn_Du_A2s4W*5QvpPnc8C`u3;`DvjY=Br4mK*Ozd6LH?VebK zOdtp`8?gxSTjv;y@sIOiETN&O_ARYmFA;N?*6qX&B7{RyYJ_owr^$64{N|~5wt3*k zT2~$a^oY~7`~j6h5+Xq+MB#^7^6H6&KN=O2V&s5WX~K+HYIIEG;XPx ze7JEDQ=HdwBE&;Tbb`DpR+8L9z15qDInl49VW5e%86DY|>%g1@u9Xe^3XcfMptRam zR=(?adlXX8U>Xh)nR}H4Ce^5(q|%JaNy?gT%&(Hi$4TMV3?mL;>pXTy8v&-ckw(m0 zeta(=rcqu6@s-r5p0m{3N(UPF^gsqS227Srtu-wfb0JG>97|%x%H45Nbow|WcH(s& zVj7PoWtkwt1n`AUG-|uC9Ur%2CUI&hR>($^m}A`EQooJ}lTmO?;YvC&Z==)P)~T0_ zKLWU#NYhcL9OsmqbM;QyIzu5`=p7=y7>KzLi>p&HPmQyveB*v+9ZwSAK9w!108O}r z_p34$a!06lseGE~XeCP;A+)mrO3wKZeDd|QH)Zd_oLPrYxoy2UHC_J!J*F2a}= zJG5oBY#YD13%kmwydB8N?8t-l*2R7#B?a5Kh7nh5UV_267{G;%9An zYH24z4fjBX(--JiFiHwaT}>ovsXD+uMaa-P`G%oVLYzyH=Dnr#Nt2ezM~6z*{CYpt zkQ=Ytx)67tjgTocpgYsGJOb7#VY&k4s74;9S{}#M&LGJvWie4oN^e55*sKn-)WW04 z$)KPo4>_fWD=Dl3MMA4QH&KeuYlFgk2^&v@cFwrkh`V}(-5M06>%8HKJWuIl)H)Kf z&gd8?*SXe_*z1+3mm{#y7v7-D5!XY+IwvvRs8!)g-wkQ88x@^cQS)kiNLZnMYv(Js z=uu;3;wCw0m^2}Ivp4?yu4~L&AWVrs?>@vEsKJgo}kUd7^n*0h+ zyp_+2wM6(cD8p{^mrumKnriYO)x!39`%E=C0bPZC}bOepsI(I*0hdhAYOjg#N2UY3fL)zqh zSev}vO8Beeh;1{s1rzb8rpd8Enmppu#El7S`kSJPqRHO}X%g}%pC`&i`*F1=`(sK^ zei>4S-!`VMrjILu?R~$Xy$yIm?M8s#+P!pe1T_rpZPe#1J?NK_F z>>$<)oaLj2q1!uvuRmtUxI-y~GVtKA}th(fTj-@Bd}Bf72^`@Zdt+kG-n;FuGSA zEj4Z5sif+e#Pk{uGOSSu-Pg4+%&)R2&)$#}b2Z+S=l&cR<$jBg(mEo(ZB#F<{|im{ zB7`7*2V~;AT5$BK-3@zB=}t@4c1|xX^xM*KZT3DlPJIBN%pvQCsPH4g>p2qfk&nm? zDlAH;(3R<9P04PrQzhzCHQ?0QGd2TN;%8iS%%Xm%uFgO4jHdPHs@9e- zkZ0kX(59?$UuveDg(+^hM7e9)?mYnM8;I}~xBqK3@TYwPopTHFwL$THb@voDHLqS? z?`dsrUdb;3+W6NwPkTKsGuo6_khtg&1|Z3N&O64)RK7(;=69G&ZfyAWtPbelDTmwh z*0sAlc$TDyX=qyRfqS^rg52s{l5}2|&{4j+oqqt<^zgK`IBW5N^8&=ie9t|uCxhOP z{o)VG_CtgpL1X>NOXK$N{ZW}};zhpStR>c;6_eS>EJYLLipBbiI`27gbydlt!cl9H zd3)8#_Nv1>^HeFi#QpB=Lg~ThFd~uwz7Z117_k3Zw{`;ac|9NiUJnFGBepdm!0%y! zCPNwXpa3Oog(0A}iV)rdWNP_~~9WsbZ-) zK)J1t5{Y1epoCEQ@k}Y+9TuSOe3%^JsE&`|YWi*Iiv1WeT)9W8Mha1&i?#k=W=NVD z(V!Az0+h{qEDi8KRQNpSanEtKu29YkF7^Ar)<%R_u1%az8|QK-Zc@DJ5HUVLNdY4h z0(>bZZzWMfRn?RXb3Xq-OH7FYJj3Pr4W82Y)4SW9*!m>fU=~zblcBUP>eRK{?r*jt zJc9(M1gMWc#Nh$TIY3AaxPzF|0vtKnxX-{#o^<@0qofkbqqRaudHEb7W@;1JEM-bz?&&^BGq|LgYS@@^wR$Y4d8m)b zSBFtoK`h|G1`ighUE7N;B^b4CGrV}oiX+a_;-=Ua2kv4ua7qS80Wn?S3!K?L28Eu- zP3d3`o=45$_Lp78g<^%;w=~x)O5MfN`FnFBReFW_?d_&2xPWJ-*(9bqK;C7?hhK5N zDkfw>fR-c*S0dn|76u@7)<>2Pthfjwm4k}6LnU0o7JGYAil(czKE{)XYZQn2(pF&! zj2T%IpyZ(ZL{`y`kl9kjzmr!qroT zabaG_TtRV}HU*ZeQy{utnF52Z#HN;zF*TwmaU~BB zYy?f}c=|8;!(iOp8 z9&w%OY&~eh*7~~z-xxGi$C8Na1IF`s_H+LY+)eBGTvAe+4SWLOJN%8hlLa@{_1=-l z#Nsz|Zz{_iH?Po9J*T8moEN)TbKz#iw{hzSIr&eQbMkhd zlWz)0g_n0|UcUJ8M~cJ!oPQD&c9Q4zIc~9 z6UDo=g})Pm;_vyt$KilF4u#@hwSl--9f-t(%0Q^ERQQsANeU_*QoV0i!q%al7-H{} zU&%ng9_IFU4IVPQ;_(g6{U8Z>fG-xxrOAVuvJdgpJsnPw%K@*Rv11cN?sp%1w z0GnvU-?U*-vrT^Y@hJCRGbVR>3tvo?<^H(lxW_cdJ+6;|@B{>k|4^lyo zb^52iEIh5b>4fU0sAm*6Y4>nDx!UfSXR+=1zA^BNU*+A%b1F;3^9l>EcH|ZmY$M_e z+L--Im2K?Xp0ptJA_|M4ofs#lZ$nkql$4eog5Oyz(6 zlHSCS@l&2&iEHA}w@_JBG0#&3O>lFMPP8vT|Al1f9fjr6bDTTmUG6P@1`Y4?Su$r{ zDG}e(GI% zoVj0k&4ngJ`tma7iDxzOU#a55zxJs=r@VlKyT9>OR27$!@B#laUe28Jl}kzJx4zOW z684?1gm-aa=Y7RlC|>Xt3+Ixs?|sFxLK6OiT68OcRaQX4e)P5D#ZLH7zG5ND5f^>s z(p=Do|Lj)*0`WJ^(%)4}MG~lFgC;{D{yazdWGfogs)&FQPj4v`IP(6_N=B+6Zy9_pEbD)yYiIza+RyQV8qf|0$ zMP|mR6fBHkf$D8+c%Yj8Mg(ppA(4RyOP>AGs6aUs&%flQ<0NYk{yuM5OrSj7Aq|~R zbtS}Dwadu3KPVHgDiMKedmyRR|f(^mRN7*n}iVI4}|cZ zvC-L%=ZsaWm$sb{aQe$uDPnRItC0+sSKyL%o07EPo5bY6J4witKx_eghl`yWC|fe6 z7|S%x>TDv-2vk0`jhcxno`)j8&4o@Od4X8fxIJRNs;XF^byXNBw`59EL=l%gOP5`& z%C?v2vJ++p>W5tKlbiC^f`;Yy?Yhxo%xq{Urcz(8b9k?1davbLuN7*qNpl1DW=X@0 zm4R|nmXu(u3Y2GLNzp;oiU9dx{BFlXzj-RPG~ervGJNybKDg5bf$9l4kR)EIiCL(K zkpkit1Y}2zTgU+>7BjeGBsdK%lUM}E`Ug{S5-=B7;I#R_Fw~leQ;>9 zWORq&rLr&GB&J)n*PY`?1RgH?TKJ*nHvVXIFTn{zvkTAaMi1Zcn*q>V5-XASB;c2uYv8AGlXE;%KAFbcKF2mPI zESh*N&F^`Xr_%hagR8%X;Ea%m32w`|*igKZ_Fl2#Z(s0ES}85SWA!;zvmAx_#pU^x z2!QBgN}pADE$!c@gcs9(eJXz=hX)s0uXr}CrBWe}@t4B9!*D#3_I8*yI*mj>p$K;4 zjkLdD{#@Emuwo3JOLJpHyo6TnBk>qo8F0KJ#_MNdeFo3e)!b%*I?T8Wcoq$zcmwV2 z5^sf`*GjsLm6aq~wm%mXA={=&!bCia_SZ!E_a&NWCgORta?}2z`exSllI+Y0iju#c zE}7*wu1=U_9QT?$ZiX~A;dSEg$8C<>MV{ovt&5wIiR}&9Gea5{{H7`*{w+m>@+amc zxGz>~`BP{|!Mr(h7LpJ=g?5xzdNPUqT~bixsCsm!^!nc8@4PLg^Z$>DphNFSahd$3 z@(xEyS)ONJRppqf%6#Sjq=IkI1tg@8vlU{y7x8r3QHX!vKmKu%IE=F&J#=159#dAm zS^Z-IEZb|;+p1;SU;AN!#-EoEQ@vgm8+7htj7BpW!zg7mmeDvy;~7n0bSR^Vj1FVe z#%L0w$&A_=O<{C6qp6IhF`CY32BRYw9m(h@Mn^O1U~~+lnT%#JI+oFKjE-k?0;3Zd zoy2H1qdAODW^@XpQyHDc=yXPBFglabTt@R4&1bZL(LzRx7@fsvF{34nUcu;WMoSr; z!)O_!<&0J^I+xK(MynXDW^^8-^BG;h=#`8vWONauS24Pn(W@D~hS4RA)-dX1bSa~? zjMg#gVssg!%Nea_w1LrU8C}6>Bcm%BZDO>U(H2HmG1|>8)vu4Z%%qt`LImeF;L zUeD+ajIL*N1EV)G>SlB!qaH>#F}j)2EsS0;yM(<_x zAftyEy^qnujCL`4gwgvMeSpyi8GVS+hZ*f=^eCgp7=47%zcKoEMjvJLIHQj-`Z%Lc zF!~QhpJenYM*qp^(~O>A^chBFQe};`Yxk=jK0U{`;30T=!cAc#ONtTKW6kaqn|MP zDWjh;+Ry0!7(K)2=Zt>A=$DM1W%MgXzh?9sMh6%@$LP0=e#hu}MlUe>J)=J``Xi%1 zF?x~FpBepy(O((;jnUt?Q^QVb0E|EY5C{lB5HJJ~fnXp6Fac)30)zr#KsXQqL;_KO z6_9{vAO_&_V}Upz9!LO&0*Sydzy>4%$$%Y50fqyqKpKz^WB?<8k-#WmG~fWn0GU7* zFcugGj0YwF6M;!UHjo2M2BrX0foZ^WUKz70?Q_0qwwQU=45`uohScTo2p;tOqs#Hv(>8Bj5ox0h@s>KnK8p zt-v1NH(kun*V|`~|ojxC6KoxC^)&=mhQo z4gh}z?gb74hk*Nl!$22s1h^k~0C*612zVIi295&9fJcD80e=S`1ÀgnSu0RI4< z1fBx^2|Nv)0G^zz4vGz(>F-;A7x4@CooK@EOn#{0}$-d=7j8d1mz5xb+ mbHKO2cffhz0`NWX1Mnm86L1mu8TbYG75L5Y5dGcI|Nj8D0`@up diff --git a/BIN/CSH.D.txt b/BIN/CSH.D.txt index 1ff05129..1e1b4e1a 100644 --- a/BIN/CSH.D.txt +++ b/BIN/CSH.D.txt @@ -20,12 +20,6 @@ CSH.StackPtr .BS 1 CSH.CmdSave .BS 1 -CSH.ACCT .BS 1 -CSH.ACC .BS 5 - -CSH.ARGT .BS 1 -CSH.ARG .BS 5 - CSH.LookupOpt .BS 1 *-------------------------------------- MAN diff --git a/BIN/CSH.S.CORE.txt b/BIN/CSH.S.CORE.txt index 8c078468..46d6e658 100644 --- a/BIN/CSH.S.CORE.txt +++ b/BIN/CSH.S.CORE.txt @@ -86,7 +86,7 @@ CSH.Run jsr CSH.GetCharNB jmp (J.CSH.KW,x) -.4 jsr CSH.GetVarValue +.4 jsr CSH.GetVar bcs .5 jsr CSH.GetCharNB @@ -100,7 +100,7 @@ CSH.Run jsr CSH.GetCharNB jsr CSH.ExpEval bcs .9 - jsr CSH.StoreACCToVar + jsr CSH.SetVarValue bcs .9 jsr CSH.GetChar @@ -153,8 +153,8 @@ CSH.IF jsr CSH.GetCharNB cmp #'{' bne .9 - jsr CSH.IsACC0 - bcc .6 eval returned ACC=0, skip {{....}} + jsr CSH.IsValue0 + bcc .6 Value=0, skip {{....}} jsr CSH.GetNextCharNB Skip '{' bcs .99 @@ -322,7 +322,7 @@ CSH.TYPE stx ZPVarType bcs .99 - jsr CSH.StoreACCToVar Update value to this var + jsr CSH.SetVarValue Update value to this var jsr CSH.GetChar bcs .9 @@ -451,9 +451,7 @@ CSH.ExpEval ldx ZPPtr2 phx sta ZPPtr2 save Type - - jsr CSH.ZeroACC - + .10 lda #$ff sta ZPPtr2+1 Reset BOP1 @@ -463,9 +461,10 @@ CSH.ExpEval ldx ZPPtr2 .20 jsr CSH.IsLetter Fnc or Var ? bcs .2 - jsr CSH.GetVarValue + jsr CSH.GetVar bcs .1 + jsr CSH.GetVarValue Get value on stack bra .11 .1 jsr CSH.FnEval X = function index @@ -475,7 +474,7 @@ CSH.ExpEval ldx ZPPtr2 .2 jsr CSH.IsDigit10 number ? bcs .3 - jsr CSH.GetNumInACC + jsr CSH.GetNumOnStack bcs .9 .11 jsr CSH.GetCharNB @@ -500,7 +499,8 @@ CSH.ExpEval ldx ZPPtr2 stx ZPPtr2+1 - jsr CSH.ACC2ARG + jsr CSH.PushValueOnStack + jsr CSH.GetCharNB bcc .20 go check for an ARG bra .9 @@ -576,10 +576,10 @@ CSH.AddContCharP phy lda #CSH.Q.CONST+CSH.Q.POINTER+CSH.T.CHAR - >STA.G CSH.ACCT + sta ZPVarType >LDYA ZPCSHConst - >STYA.G CSH.ACC + >STYA ZPVarData pla sec @@ -691,7 +691,8 @@ CSH.ZPPtr1AddAp1 inc ZPPtr1+1 .1 rts *-------------------------------------- -CSH.GetNumInACC >LDA.G CSH.ACCT +CSH.GetNumOnStack + lda ZPVarType cmp #CSH.T.FLOAT bcc .1 @@ -699,9 +700,6 @@ CSH.GetNumInACC >LDA.G CSH.ACCT >LDYA ZPFileBufPtr >SYSCALL StrToF -* bcs .9 - >PULLF.G CSH.ACC - clc rts .1 >PUSHBI 10 @@ -710,37 +708,9 @@ CSH.GetNumInACC >LDA.G CSH.ACCT >LDYA ZPFileBufPtr >SYSCALL StrToL - bcs .9 - >PULLL.G CSH.ACC - clc + .9 rts *-------------------------------------- -CSH.ZeroACC lda #0 - ldx #5 - ldy #CSH.ACC - -.1 sta (pData),y - iny - dex - bne .1 - - rts -*-------------------------------------- -CSH.ACC2ARG >LEA.G CSH.ACCT - >STYA ZPPtr1 - - >LEA.G CSH.ARGT - >STYA ZPPtr2 - - ldy #5 - -.1 lda (ZPPtr1),y - sta (ZPPtr2),y - dey - bpl .1 - - rts -*-------------------------------------- * Input : ZPFileBufPtr, A = Var Type, Value on Stack * Output : Y,A = ZPVarID *-------------------------------------- @@ -787,11 +757,7 @@ CSH.AddVar sta ZPVarType .9 rts *-------------------------------------- -* Input : ZPFileBufPtr, A = Var Type -* Output : Value on Stack -*-------------------------------------- -CSH.GetVarValue - sta ZPVarType +CSH.GetVar sta ZPVarType >PUSHW ZPFileBufPtr >LDA.G CSH.hSymbols @@ -808,33 +774,65 @@ CSH.GetVarValue inc ZPFileBufPtr+1 -.1 +.1 ldx ZPVarType + cpx ZPVarData + bne .99 + clc + rts + +.99 lda #CSH.E.TMISMATCH + sec +.9 +CSH.GetVar.RTS rts +*-------------------------------------- +* Input : ZPFileBufPtr, A = Var Type +* Output : Value on Stack +*-------------------------------------- +CSH.GetVarValue sta ZPVarType + +.1 >PUSHWI 0 + >PUSHWI 6 + >PUSHWI ZPVarData + >PUSHWI ZPVarID + >LDA.G CSH.hSymbols + >SYSCALL SListGetData + bcs CSH.GetVar.RTS + +CSH.PushValueOnStack + ldx ZPVarType + cpx ZPVarData + bne .99 + + ldy CSH.TSIZE,x + +.2 lda ZPVarData,y + >PUSHA + dey + bne .2 + + clc + rts + + +.99 lda #CSH.E.TMISMATCH + sec .9 rts *-------------------------------------- -CSH.StoreACCToVar - >LDA.G CSH.ACCT - cmp (ZPCSHValue) +CSH.SetVarValue cmp ZPVarType bne .9 tax - lda CSH.TSIZE,x - tax Byte count to transfer + ldy CSH.TSIZE,x Byte count to transfer - >LEA.G CSH.ACC - >STYA ZPPtr1 + ldx #1 - ldy #1 do not trash TYPE byte - -.1 lda (ZPPtr1) - inc ZPPtr1 - bne .2 - inc ZPPtr1+1 - -.2 sta (ZPCSHValue),y - iny - dex +.1 >PULLA + sta ZPVarData,x + inx + dey bne .1 + clc rts @@ -842,11 +840,13 @@ CSH.StoreACCToVar sec rts *-------------------------------------- -CSH.IsACC0 >LDA.G CSH.ACCT - cmp #CSH.T.FLOAT +CSH.IsValue0 ldx ZPVarType + cpx #CSH.T.FLOAT bne .1 char,int,long - >LDA.G CSH.ACC + ldy CSH.TSIZE,x + + lda ZPVarData,y bne .9 .8 clc @@ -857,9 +857,9 @@ CSH.IsACC0 >LDA.G CSH.ACCT tax lda #0 - ldy #CSH.ACC + ldy #1 -.2 ora (pData),y +.2 ora ZPVarData,y iny dex bne .2 @@ -878,7 +878,7 @@ CSH.BOPS.ADD rts -CSH.BOPS.SUB >LDA.G CSH.ACCT +CSH.BOPS.SUB lda ZPVarType cmp #CSH.T.FLOAT beq .8 @@ -888,18 +888,15 @@ CSH.BOPS.SUB >LDA.G CSH.ACCT clc rts -.8 >PUSHF.G CSH.ACC - >PUSHF.G CSH.ARG - >FPU FSUB +.8 >FPU FSUB bcs .9 - >PULLF.G CSH.ACC .9 rts CSH.BOPS.MUL clc rts -CSH.BOPS.DIV >LDA.G CSH.ACCT +CSH.BOPS.DIV lda ZPVarType cmp #CSH.T.FLOAT beq .8 @@ -909,10 +906,9 @@ CSH.BOPS.DIV >LDA.G CSH.ACCT clc rts -.8 >PUSHF.G CSH.ACC - >PUSHF.G CSH.ARG +.8 >FPU FDIV - >PULLF.G CSH.ACC + clc rts CSH.BOPS.MOD @@ -1094,28 +1090,24 @@ CSH.IsDigit10 cmp #'0' *-------------------------------------- * EXEC *-------------------------------------- -EXEC.printf >LDYA.G CSH.ACC +EXEC.printf >PULLYA >SYSCALL printf bcs .9 - - >STYA.G CSH.ACC + .9 rts *-------------------------------------- -EXEC.puts >LDYA.G CSH.ACC +EXEC.puts >PULLYA >SYSCALL puts bcs .9 - >STYA.G CSH.ACC .9 rts *-------------------------------------- EXEC.cos >FPU COS - >PULLF.G CSH.ACC rts *-------------------------------------- EXEC.getchar >SYSCALL getchar - >STA.G CSH.ACC rts *-------------------------------------- MAN diff --git a/BIN/CSH.S.txt b/BIN/CSH.S.txt index dcacfa70..6d041603 100644 --- a/BIN/CSH.S.txt +++ b/BIN/CSH.S.txt @@ -28,7 +28,7 @@ ZPPtr3 .BS 2 ZPVarID .BS 2 ZPVarType .BS 1 - +ZPVarData .BS 6 ZS.END .ED *--------------------------------------