From 8c7d478d8659cf34c63da99dbc08b6b65b985115 Mon Sep 17 00:00:00 2001 From: xmm15 Date: Sun, 16 Feb 2020 16:03:16 -0600 Subject: [PATCH] ClassRep u8_chars --- src/0000Boot/0000Kernel.BIN.C | Bin 188912 -> 188912 bytes src/Compiler/Compiler.BIN | Bin 194048 -> 194048 bytes src/Home/Tmp.DD | 96 ++++++++++++++++++++++++++++++++++ src/Kernel.BIN.C | Bin 188832 -> 188832 bytes src/Kernel/KExterns.CC | 2 +- src/Tmp/MyDistro.iso | Bin 38928384 -> 38932480 bytes src/Zenith/ZDebug.CC | 41 +++++++++------ 7 files changed, 122 insertions(+), 17 deletions(-) create mode 100755 src/Home/Tmp.DD diff --git a/src/0000Boot/0000Kernel.BIN.C b/src/0000Boot/0000Kernel.BIN.C index 39131ec0b0d7f4c6df8bc2c93d9e9c78be5afb05..2d1732e0650f0b5a76c8e6f11a41d77e8fba5601 100755 GIT binary patch delta 288 zcmexxnES(F?g=LBt*--DXghIlUdVEhc{2~oL|0~0L!-?LJcFbdCvX0o+#${4zi}Gl z^nxr#@y*lfa~W9zHcexk+~1@)S)ch`sW0S1A`QMW$j>$9L z@=s2GYdAULE&t}_Z~rkea&2Drev>ro`e}>|4AT=gGm335=4PxkWYpUJ)`n4D07&!t zGRlhsY26gYXTpptw~JITc8D;qg*totwjRb@E2gVkwyPdztYc?lEt#$-#VE0T?>WY= eCXB(`H#0NIc`!zAzvRuN@5tD&ovD}UT?hcENNZ03 delta 281 zcmexxnES(F?g=LB4f%14wVk*(FJ!sMyqSk(qARlk1H)`WyXwQwQk<=zwfWzZD2~Z9-ttdQe``27 z;w}H?t`*bW$=g+rGuE*)>8+ctC&ehSeeXHOuO^H++cz^a X$$2p5ZolNsr0>W$Z97vh)4LD=x~FN9 diff --git a/src/Compiler/Compiler.BIN b/src/Compiler/Compiler.BIN index ba4999ce032608272238868cd3ccf99311ea65fe..e9971ac8fd3201829deb142c8777b813f18c9017 100755 GIT binary patch delta 47 zcmV+~0MP${>$PT$ExeFile2("C:/Home/K.CC",CCF_CMD_LINE); +$PT$$FG$$BG$Errs:0 Warns:0 Code:2BBCF Size:2F600 + + +In anticipation of the drives you will +define shortly, enter the drive letter +of the drive with the account directory. + +($FG,5$$FG$ for cur drv) Boot Drive:$PT$C$FG$ + +$BK,1$$FG,5$Mount drives so they will be present when you boot.$FG$$BK,0$ + +****** Mount Drives ****** +$FG,2$A$FG$-$FG,2$B$FG$ are RAM drives. +$FG,2$C$FG$-$FG,2$L$FG$ are ATA hard drives. +$FG,2$M$FG$-$FG,2$P$FG$ are ISO file read drives. +$FG,2$Q$FG$-$FG,2$S$FG$ are ISO file write drives. +$FG,2$T$FG$-$FG,2$Z$FG$ are ATAPI CD/DVD drives. + +Drive Letter ($FG,5$$FG$ to exit):$PT$C$FG$ +Partition Num (Default=All):$PT$ +$PT$$FG$$BG$ +We're going to probe hardware. +$FG,4$Exit all other applications.$FG$ +Press '$FG,5$p$FG$' to probe or '$FG,5$s$FG$' to skip. + +Subcode:0x8A Bus:0x0 Dev:0x1 Fun:0x1 + +$FG,5$ $BT,"1",LM="1\n"$$FG$$LM,4$$FG,4$Hard Drive $FG,9$ATA Primary IDE$FG$ +Base0:0x01F0 Base1:0x03F4 Unit:0$LM,0$ + +$FG,5$ $BT,"2",LM="2\n"$$FG$$LM,4$$FG,4$CD/DVD Drive $FG,9$ATAPI Secondary IDE$FG$ +$FG,5$(Drive originally installed from.)$FG$ +Base0:0x0170 Base1:0x0374 Unit:0$LM,0$ + + +Enter dev number or +port with $FG,5$0x$FG$ prefix. +I/O Port Base0: +$PT$1 +$PT$$FG$$BG$ +****** Mount Drives ****** +$FG,2$A$FG$-$FG,2$B$FG$ are RAM drives. +$FG,2$C$FG$-$FG,2$L$FG$ are ATA hard drives. +$FG,2$M$FG$-$FG,2$P$FG$ are ISO file read drives. +$FG,2$Q$FG$-$FG,2$S$FG$ are ISO file write drives. +$FG,2$T$FG$-$FG,2$Z$FG$ are ATAPI CD/DVD drives. + +Drive Letter ($FG,5$$FG$ to exit):$PT$ +$FG$ +Disk Cache Size in Bytes, +gets rounded-up funny, +($FG,5$$FG$ will use default.):$PT$ +$PT$$FG$$BG$$FG,5$ MemInit$FG$:Off +$FG,5$ HeapInit$FG$:Off +$FG,5$ VarInit$FG$:Off +$FG,5$ StaffMode$FG$:Off +$FG,5$ HomeDir$FG$:"::/Home" +$FG,5$ NoMP$FG$:Off +$FG,5$ TextMode$FG$:Off +$FG,5$ DontProbe$FG$:Off +$FG,5$ MountIDEAuto$FG$:Off +$FG,5$ DebugDistro$FG$:Off + +Type '$FG,5$Help$FG$' for help. +Option ($FG,5$$FG$ when done):$PT$ +$PT$$FG$$BG$Errs:0 Warns:0 Code:29420 Size:2E1A0 +Copying /Kernel/Kernel.BIN to /Kernel.BIN.C +Del Kernel.BIN +Modifying partition boot record. + + +Successful? (y or n)? $PT$NO$FG$ +1.611867s ans=0x00000000=0 +C:/Kernel>$PT$F("ClassRep("); +$PT$$FG$$BG$$LK,"C:/Demo/Disk/BlkDevRep.CC,0007",A="PL:C:/Demo/Disk/BlkDevRep.CC,7"$ ClassRep(&blkdev.blkdevs[i]); +$LK,"C:/Demo/Disk/DataBase.CC,0046",A="PL:C:/Demo/Disk/DataBase.CC,46"$ ClassRep(&a); +$LK,"C:/Demo/Disk/DiskRaw.CC,0011",A="PL:C:/Demo/Disk/DiskRaw.CC,11"$ ClassRep(drive); +$LK,"C:/Demo/Disk/DiskRaw.CC,0014",A="PL:C:/Demo/Disk/DiskRaw.CC,14"$ ClassRep(bd); +$LK,"C:/Demo/DolDoc/Form.CC,0045",A="PL:C:/Demo/DolDoc/Form.CC,45"$ ClassRep(&fds); +$LK,"C:/Demo/LastClass.CC,0031",A="PL:C:/Demo/LastClass.CC,31"$ ClassRep(Fs); +$LK,"C:/Kernel/KDebug.CC,0507",A="PL:C:/Kernel/KDebug.CC,507"$ ">ClassRep(Fs,\"CTask\",1);\t//Dump current task record.\n" +$LK,"C:/Kernel/KDebug.CC,0508",A="PL:C:/Kernel/KDebug.CC,508"$ ">ClassRep(Fs,,1);\t\t//(It knows lastclass.)\n" +$LK,"C:/Kernel/KExterns.CC,0007",A="PL:C:/Kernel/KExterns.CC,7"$ import U0 ClassRep(U8 *_d,U8 *class_name=lastclass, +$LK,"C:/Zenith/ZDebug.CC,0161",A="PL:C:/Zenith/ZDebug.CC,161"$ public U0 ClassRep(U8 *_d,U8 *class_name=lastclass, +$LK,"C:/Zenith/ZDebug.CC,0243",A="PL:C:/Zenith/ZDebug.CC,243"$ ClassRep(img-tmpf->size,st,max_depth,FALSE,TRUE,rbp-img+tmpf->size); +$LK,"C:/Zenith/ZDebug.CC,0246",A="PL:C:/Zenith/ZDebug.CC,246"$ ClassRep(rbp,st,max_depth,FALSE,TRUE); +0.378766s ans=0x0000000C=12 +C:/Kernel>$PT$ +$PT$$FG$$BG$C:/Kernel>$PT$ +$PT$$FG$$BG$C:/Kernel>$PT$ +$PT$$FG$$BG$C:/Kernel>$PT$ +$PT$$FG$$BG$C:/Kernel>$PT$ +$PT$$FG$$BG$C:/Kernel>$PT$ +$PT$$FG$$BG$C:/Kernel>$PT$ \ No newline at end of file diff --git a/src/Kernel.BIN.C b/src/Kernel.BIN.C index c4ffba0463c9e3550c08c63d7e949de4b55e2b90..29fa516390361b7ae70a68e6d4a3c0ce5266a40c 100755 GIT binary patch delta 397 zcmXX>T_}TL6yAB?Z~i_%6Emr4#0YEoS-H@P{4_E*uI6{ml~UqnE;OTDt&R69pA^Oo zZn${my}`}Im6g>>)LalZTdXLVeBQ>nIOjRfdCt>0!H^gXi7PFcn+E%SeTPVQgd0qA zh1D)l(Jh-vi#`dx9<5em@rTe4*R~cV30<2z#EAFZ^A;q$qzK5>UtB{uQN?;whxJUKjig@ICkPFRhnD2CdoctwP*ryc@KV=1ri!OIgH< zl2471Y>bCugf>OpYC+*a5APncfKc)n;67Nuh+ziZFvf#h&vZ!;Ix5VXtkV*Q8NFKj?L7WS)ShBHVsKScw~!i}C0G zm+Zs`V}QAxyx@lh*6D|bR@|=;X1s#NOn$N=JHlYYM(w#&RK6 z`08O4M|}hGT0>Hy#~*JNd+@m+IiRK*WPz2P0&uYMquvrCWD}jB!^}^a`L9$ZY1?#{ zAav1ytnS{UktGo<^!S~zB=1{}`qx{?t z<3NR-x)gwF-X4JGM!KGlyzClkwNzZFjzpn{d|TBT1L#jKqfiDdJp2V;Hex`2R!Qzn URBuP_?<3|`S}ayC{N!!u7Z2->B>(^b diff --git a/src/Kernel/KExterns.CC b/src/Kernel/KExterns.CC index 623295b6..505c5006 100755 --- a/src/Kernel/KExterns.CC +++ b/src/Kernel/KExterns.CC @@ -5,7 +5,7 @@ before import is resolved, you can use var and check it before calling. */ import U0 ClassRep(U8 *_d,U8 *class_name=lastclass, - I64 max_depth=2,Bool fun=FALSE,I64 offset=0); + I64 max_depth=2,Bool u8_chars=FALSE,Bool fun=FALSE,I64 offset=0); import U8 *DocSave(CDoc *doc,I64 *_size=NULL); import Bool DocUnlock(CDoc *doc); import Bool Ed(U8 *link_st,I64 edf_dof_flags=0); diff --git a/src/Tmp/MyDistro.iso b/src/Tmp/MyDistro.iso index fb7ba321dcff96406f040b5b1d96329a816bf23b..8fb6222bcf9147b20369bbf2e160127fd03d53a4 100755 GIT binary patch delta 10484 zcmbuF3wRXO-Nu>8g|G?t0Fmn?Y%W7K$!-!73<)t;5+E0oAP5#3!UhI%GrNJ%t^`mU zsEK9DtUXIJ*IY)``FOSpZB9$zB+xUUQ)F7!|> zw=dD-OJsjwiQE>0A<lMiU z&?2nrQa;QT)^@4HbzM4fLznzfu5d?}LcFs}C2s7}iFbF&CvwGsa@UFzZ}+{{li9&{ zes$x{z3!9k!a$@FF++!g_C}oAQWP}Rma1)+g{rYam-bD8uyI^)#h$GKYndgE(Y7uY z8inA>XX*8(B|^J=7{3*9T)#FcP zzZsN05KESB)fQp>)`LNw70j{^dK=JO2ZP*pW01WwQ-j@^eKI>;D}puGiV(NjC!o0^ zL*0w}WHOgC)N`Sl+ZpN#@`l^JnVqioP|ejo&^@S6J#tnMVe?bNgjRhPg-f z$?S9`glVpXLGB%W0?hT!Am4c28RQ?&5nrb3$RPJCed=hgttNMPzs$!>?q`fl|31K6 zRpFk8LvvS!yTgpSA@yY;Ct%WsZ8x)RHGz<_%j4KK@|>xlL|?graKv`ZmT zGlKgL&=loccK%e4Kb0Nsi@N+NH&WP)SdTxI9pTG!`BQFxs>h$o9_%mYPr3c69$!k! z9un2#TL4l1A^1|7J1WY5qsDu~ov!gwr0X=-__6Ml-h1P(;o3OXozpM#^|9^={W4FD zbt`=`nX7!9Z;h0XbNNO#-<#R#nm>*-o-~0pku-@Uk)la4q{$>RDV7vRiYFzIWYQE; zBFUn;<|nyt^UQ5FhK^b8bRA71C2OvuDem=sf>gumj_sGZ*6RLgzsyTkx2<2M#YPXB zaWnlLYOV~MdvKr3PFJCgluAk?rE9LjsqPbf3TdvG40m+D%)$)!^?fosU28K)nWSl? z>q%Lp>7;B@4rzwwTAS+*GAbI+lV>tE6TF~#sXZ$-Kfj<@s-}0itkmKRtJP#O zl{QJWO-_Z~SGQ{z+ZMibH;yVGfJl>&6?Y?kcpic{{@3*Yuoxj23Vy1nY!P3+MPMH53!=sunO zc)K_y7}vlyZx=^*7+2%KDB>k*)3H)%Nj90P+m_T}imdI^@}&GWnzDAQRA^sCZj*}J zn&5O*MrFyIUt@`}#aQN)<;2)-X^Qbo`kXRLx^czn=91dhrJgyFBng$SH|N#lQM$6V zLussST_cqi7GVgc{91?Iiq34sRtYa`c#&3|F3oLHoLN>gwThYQ-E*p^=hQ$w7Zj!x z-c;!A+uw6#sZ?#RYi?Rv+dA}0-$tA4Q7$HQTp31Y?_p&29fql>3AbmdeU;SI*0_X{ z&8?=E=2oXfpO2OsmpavKZO5faEv@!?r9IhHno=QEqKKyx<4)PGzF+_6b%1#>o7h)r zrPpSyfjJ%9tH9 z-81?tvp1H~?LcQ)74`MLyMa)Ny|%@O(ZcE%ly0hR{SOtZowfD#Wwhi1H7eoBFH~BM zSWK2@Cy43YExImmE~~s!+q1BdFV)!Fo&TZf!saGtWoz@2e%+SQyg6xA=CwJSuQcje z@AM!nXI zOPibQ0p>m6#&vyqs@1!371{Evrh?{{HA>SmDP^|3waMN9OCV3qFD=JI?aju^ z(#Tt6p&ZXb^^YO07K7;5FFLQPUG3@BMmw0d*WP36RfbB?7+!gI?8saGTU+V>wXJkx zjQ$ZWS?V7l|73cBILf%Rss3g>nGKfosaMyFt6%Ey*Yu8iPOZafH0-&sw0;+MRRIc{ zCI2{zue8QK4X+qE*gCcM?Lby2a%du6>MYIi-3(vRY5oBlwW;Vd6#aK+X=`_SBeA2t5JEuum8>D0;T?2{2fu=bu594y4$^Zk9sH?Q-%7@WR&HQ}Ho zA>#P`c>U#2<0E8O?gw({BLBDaswCdwUxl>FKre5!22@cH5MqMBzMBsf2KW>15)7ST-fGXofI^DT$OD#Z*`< z(_v{$wvd%D1y;dS*dnIGRxmk>^Xi!~t>abPA0kmdRGiO=Ak|3{znyrjtdM#CtB~)cPPJfm1A&ZKDYs#1vamcfh+s zUpaam(|PZJ=SHSd%_o?eNH?}rod8}3d>|VY!;I<$Zli`YyneYi@bsWC;OZ!urHVj`N&XwGDcu3o{#dXVTTOB#ZMx%Z5YU$*W`^+)>ge}7& zV&=a#(0CFDm@oU!LWa@(iMq@4`uS0vm)=vI?fa_AwRKr0Ha0;M&>aqmoAYn!RdSMO0aY zVN8vn7RE3gMpHAGOkxTwo~f`Tro&R0JcKNjDXPgE;%Sj4p1!*Ozfz(K9 zA~lm*NVk$&Ne+^e)J9rGT1{#vts(t{^iz_HbQ@_cse`nRw4StqbUWz|(w(HAkvd5m zNk1puMY@}G59t@AUy?SFHj}oH?j?1R?jzk#+Dc-i2S^W+ex<2Hw{@5TpR!|3;JBUc z{5H#&t-ka2UI+2UnRuSCb^Nx3$Ut#C5o7!(_};sYCXI^gg{>2*V&H>(f8P_g(SGFX z+xzQ)F)BAAk4eV6l>hBxcgR9I!$ahlFXA1q5uvj`dSi+9*73d>84=ecsxx|WfY#iI zocBd~*XcoIbDXzMsOS1T{YVrs#Rq83MG;{YQ>AUW!g{8|HZnPy>@KFjwlWp=Fw zm>fg4hbb`Hr^rTK@;1C;yr;|J!5upi+4nKq5^1}YCsV-)rocuq6(%zsmds=`8SSjF zo0$q*$aGjelVi7C4mi=qw&uS{y>23N#nH7q%+xq)KxH~?FO%cRUZ8hqvIF!EP4))8 zLz4~bloPg*9wI$VdW6JD+ewd-9wYsl^f>7W(vzeeq@5&{w2Sl`(o>}0lAb0#L)uN+ zLwc69m-IW*KGJg}jr2U}1=8nAtOOc> zMxY6323mkyfmXl)IDs}`6|fp;2i5>T0e%X&fZKqzKnJi6SPyIfZU^oF?gV}YbOIZJ zp96ORcLVnTzW{y-Yyvg|TY!6kF5o`keqbxWfCqpFfnNdJfQNvGfkyxiYzH0%9s_<2 zJPteoJPGUob^mi zpc{A@cm;SB_#^Nd@F(DP;LpH*-~jLj@Fs8&cnf$NI0U={90uM6{sJ5U-UE&T?*qqx zdjV}K~&I$$g?4j2zi044&H011c&Vt~nj8HfeqfOx>T4jHK_ zKq6oPl7M6&1+W4(AQeah(t)W!29OC%1Fi?MfayRskORyBa)BGfZrc9D%i#e(iv|4f zfR9Mrm7XVBgvYr`o+~`Xb;FINjmMexo$5q4sz;(l4=5hw&2e@MRL9QD9ezy)+ z0)Fhf#vrz15XZSnPT%pkZuogFKZ@6vyA|^8@_?ThuhHmPYE%r4=DR2{LkQxQr3@;?!8;ELfLTs3?f*A1ts`3CXdbH(u2xN7)YTsQm(m(L^q zH?A1|HCN$ca11|9i5Y^K%ip5FRIV64kE@0+-{jN>f+IGx^Cn68}OvuLGwbob!zE5x&+5VA*T7UCmc s?=rqJS9%=(?t^pYgu>5^Bd;$fc)oqISLE{OUqn}mFGk-ee*FFa0Q(8ohX4Qo delta 7563 zcmaKw33wD$+J(8**;&F8AcjB^)>P;~0?67V0TRL@5aX!0W&lA7h@zn2SU^A}xU#h5 zs*$-UDi#WYjFyh25m!_caY0;waZe$*J0cU{Kc_m~KZce(&-vT*wBRK{7hV?B_ZMm>vV*hszti-y9tgy2$*&E-%wDgH@-*?V{mUq^qEpQM&(#PycbwMIuBi}}BBt8G>y=YQmdu_a z`itA-rBlSDm=~T1y(?9otPpMNeN)6V(by9=+jmS8Q!`{vg|CyHc$4VaPZ%=qDX}na z#_(&W&l_fMc}kp<95ZirW{!R06>)KbyytC^EU$c9=Zk{ zMl@?Crv$YQ_Pp=J4f&$TK9a6wv_`hf)iOFFbBnca+KD9i%867Bkt*X+I(21WSK|t7 zbC=JV?(O8MgZ*NhK}`m$%~>(FIV;w&nlx-PCC;g6GAPaYaiI@tJM-gAUt@b=<6yP9 zFwQm?#yg2kmb1-e@y@xY4So>s6rMJilHjy!GFWY9C)j3oqO-9{Lz?d)#K``9 z5FRu?NOX2IS;jVNlAPwJ4L+FUJmC#SegLFd-aHUfzWK5Zwo~5RNeGqZCCwMq#7>=l zZN(h>=uge%Byo|wYD9~85q;euvL%6a7tx_ApCqQas7s8e8q^3p=RC;5(+DuOc zXW3?Ynlroc*hH2vSEM<^PaAwK&FOsF;8$sm(PU7X6FY^^k%^tm@SaU>9IQ4ccLM34 zGw1>`KqklnT|qa{9rOS_K`)REbdUpj1HWxf&UF@r<~G1x=PXy7dvie_+uYmNS=ywD zCGwmerwuO7b8b9s@K~Ocf7+lwA73=@U`94*n*;NmmQ4n$&EkB}5A+8EY_s@mXMdA7 z*=E;)PS$CI#RHuoO$MvY#RI`0Fc=I0L%}c*0K-9nZ7wc!eBOfI_bD_P%L=Q_Wkp~F z7>OT+QTRr)6?u;|bBaS#XFEB?rfA%>KRjsqi=87)7fCC*Wwr0*Bk3hc!J<#HqhEA+ zRrjXK99ZH{xi@@WZoHU!9fzGA-5S4kr(Bq213O2ONrO=;Eye}XWlWX& zaKub$Fe;_RxK+9gDfI%xgVJC;EiJ|l=`voIdLd%3G#Ech3!xqDArBQ|FFH%T2&28F z!T4HQ3{AR-l%igtkMh-0pI7jHLk31*0);e2l+;B%DmXJvxs3{~pjqfZj>MAdq%{&- zaHPxFCG}B=ebQhYkQSp}x{P0?UW~w|7>Uwiw3aTTgVak9nbKh7NQ==|x{Q%hAB`9* z4Mw@N7#B*HF;nWLh&j?=td|z!#cH>-1dO)b($d0lQO~F|e5y62e(|!j)|7IlUB(+y z4dE<+8(C|P@oRr{Tf1pYfoQwd9aAXUNnMO7tZ6S2 zs^^L^_FOUc`aSB0_%htywRwMRTsx&baIV%)Zmo@LBe$MRh?fUjCyuRYo48$W-Iu*t zezdM!UtT|UdHuNM_2ZYGv!t(lw%j+jCuP=ML{@m=m==Zz-|D8-N_ou`~xh0ln z8V>Sc>86$!ih$J5LX=8_u~}M-8MceiqAu-CK;%yQPv=g0xnCqmD;;Y{mM#NR&>4{` z4Mv8v7(JxR=q2?oh#YA!`bdkBCtXHAsb?V0mIh-`wUtp0&I5k~=YtEtg!6WoaVYqL|L^?B4gMjoRY zk2+WBEx1(F^udDBpQa+)?o*2&o$$6BuLRy+Iqck*>D{X}3qQOqdVL1&r`UNn+-clj zuY>zATs^{_#w(83G5cbfR^6hk&0*(oxO3_<4eYGw*|!ElQqM;$lLq51X))GHm!YKI4`E4zfgdA8`=1+Ee7sX=lOInx^mC3p-mkW| zRCg4|%H007!-P*7{jo?3X)!XT%jhBX0f;fuV3bLVQ7&D^Wl}%8_GHw#_P)K5<8;b# zl;%KuoVC&#h!s2_UB+WlAB5P3D=}gRuEdC!a3w}0RO^Fl!Tn$z_$N?cJ$L{-2sVI+ zz{B7Xun{~8EU*bY1|A2S!4~iY*b26RC&6~`FYpw28ra|&@GST@cn&z=dGG?L122Ld z;3e=fcm=!)UIVX#o!|}dCU^_%0&jzNz;5s^*aO}J?}HD(hhQ)G2nZ3@H6-Y{0e>p{{_E;qu>v4 z4Ezr?faBlP&T^GN?={i|R^sqqQmKOQ=h!%c#q#3hM9F6ly9pjk+J+**ZNZmmFgSwG2sYTRcY6(?EEv1%GH&HiJ zw@}NeYH9^_D|H)nJ9P(jCv_LKl3GQrrq)nF>TYT+RYOVY9_n7|KB|_wpIS%#lTy@r z>H+FOY6JBU^)U4awUK(1vZzheW7Ol+W@-!d1htjgMmtO%UDVsuJJfFKU1|^Y9`!!;0rerZ zm->j>M}16vLVZeoM(w8#PzS01P@hv@P+wACQD0NvP~TGZluI3=zM~FPN2u?qAE+Ox zpQxXyU#MTH->Cmmzf(u4Kd58W|ELD)ICX+LDe&{Bp%9ct`KTBwmWrd|sRSyKN}`%m zEvS}MD=L|4O|_xgQthY|sy)?#>PV$hXHjWXCn}xlOm(3$s7xx0>PmH^x>G%VU? zo6@NqsyF4Qa;ZL4Un-Bvr}|O-sR7j4)Ie$w<;}|wRzs;_RDc>z6;Op#kyeMFKka1m zsJCNLZytD;q|D+GnqSd_`Ga z?yhs0M$|jMGwj4x?!+EtA@MAyTrUqReH&l@US}ZdCPuw!{L7WDGe>HEts!&Wrjc5K z@U3%4VpZ8n7tFrO@N%NEygXmIUQSiI#{Lz`@N$8&ybLPWOU#Rp{U?>-rK2n_UsbM` zyObWo{(fb6`K_{;T0@pPgrY#CD?OHP$W?}yla%FUg>t>b2IAP?rVKA_WqJ9sa=qNG z^mz7@RvJiX6je->Xmv*XXsxb$)LZDkoF`@aM`Q9^D+^gDx+vF6%v3I4=P1L=e#-K4 zsB*m=ru07S&s}LC>x@37THUizZ_&@N<@!==`A20T3$^3j)FBiFVw%!j42bKM;pJV* z@^Y1Oy-%%GCHYaGPtGtc znG-NAw<`;Y|B)%z%ZHSn#n+pa;pL0U^71X^dbvmGUD^Lo8D8#HmX}{B*UN8}-i`eu z%3x|od#X(+3bbQA)giBF=vkN3eS&u4hp10YXV~AAiP+y5Wg!binsUADru6oFJx&>3 zj#rkK7bw@uX)E;(6Y-u zp1*R+!ip=V&z(QhKYGMD=c$h{JoNNoJ+Vw%q*md7JmbB!3>SvV#aq{?o$%PYH1xmo t$+G?>X{txdGHpOz1)SvL|L)|DArrG!X0ayCNs~tSPrKm*H{tqfm#;pJV diff --git a/src/Zenith/ZDebug.CC b/src/Zenith/ZDebug.CC index 47b117d9..7a1245bc 100755 --- a/src/Zenith/ZDebug.CC +++ b/src/Zenith/ZDebug.CC @@ -1,5 +1,5 @@ #help_index "Debugging/Dump" -Bool ClassRep2(CDoc *doc,U8 *_d,U8 *class_name=lastclass, +Bool ClassRep2(CDoc *doc,U8 *_d,U8 *class_name=lastclass,Bool u8_chars, I64 depth,I64 max_depth,Bool dynamic,I64 types=HTT_CLASS,I64 offset=0) {//See $LK,"::/Demo/LastClass.CC"$. I64 i,j,stars,*ptr; @@ -43,7 +43,7 @@ Bool ClassRep2(CDoc *doc,U8 *_d,U8 *class_name=lastclass, } } else if (!stars) { j=MinI64(ml->dim.total_count,32); - if (tmpc2->raw_type==RT_I8 || tmpc2->raw_type==RT_U8) { + if ((tmpc2->raw_type==RT_I8 || tmpc2->raw_type==RT_U8) && u8_chars) { if (j==1) { if (dynamic) { doc_e=DocPrint(doc,"$$DA-TRM+RD+UD,RT=U8,A=\"%%c\"$$\n"); @@ -143,9 +143,9 @@ Bool ClassRep2(CDoc *doc,U8 *_d,U8 *class_name=lastclass, DocPrint(doc,"$$TR,\"%s\"$$\n",ml->str); DocPrint(doc,"$$ID,2$$"); if (!stars) - ClassRep2(doc,ptr,tmpc2->str,depth+1,max_depth,dynamic); + ClassRep2(doc,ptr,tmpc2->str,u8_chars,depth+1,max_depth,dynamic); else if (stars==1) - ClassRep2(doc,*ptr,tmpc2->str,depth+1,max_depth,dynamic); + ClassRep2(doc,*ptr,tmpc2->str,u8_chars,depth+1,max_depth,dynamic); DocPrint(doc,"$$ID,-2$$"); } } else @@ -159,30 +159,38 @@ Bool ClassRep2(CDoc *doc,U8 *_d,U8 *class_name=lastclass, } public U0 ClassRep(U8 *_d,U8 *class_name=lastclass, - I64 max_depth=2,Bool fun=FALSE,I64 offset=0) + I64 max_depth=2,Bool u8_chars=FALSE,Bool fun=FALSE,I64 offset=0) {//Displays members of a record by using the compiler's info. CDoc *doc; + I64 type; + if (IsRaw) doc=DocNew; - else { + else + { DocMax; doc=DocPut; } - if (fun) - ClassRep2(doc,_d,class_name,0,max_depth,FALSE,HTT_FUN,offset); + if(fun) + type=HTT_FUN; else - ClassRep2(doc,_d,class_name,0,max_depth,FALSE,HTT_CLASS,offset); + type=HTT_CLASS; + + ClassRep2(doc,_d,class_name,u8_chars,0,max_depth,FALSE,type,offset); + DocPrint(doc,"\n"); DocRecalc(doc); - if (IsRaw) { + + if (IsRaw) + { DocDump(doc,100000); DocDel(doc); } } public U0 ClassRepD(U8 *_d,U8 *class_name=lastclass, - I64 max_depth=2,Bool fun=FALSE,I64 offset=0) -{//Dynamic ClassRep. Uses hex_ed widgit for live changes. + I64 max_depth=2,Bool u8_chars=FALSE,Bool fun=FALSE,I64 offset=0) +{//Dynamic ClassRep. Uses hex_ed widget for live changes. CDoc *doc; if (IsRaw) doc=DocNew; @@ -191,9 +199,9 @@ public U0 ClassRepD(U8 *_d,U8 *class_name=lastclass, doc=DocPut; } if (fun) - ClassRep2(doc,_d,class_name,0,max_depth,TRUE,HTT_FUN,offset); + ClassRep2(doc,_d,class_name,u8_chars,0,max_depth,TRUE,HTT_FUN,offset); else - ClassRep2(doc,_d,class_name,0,max_depth,TRUE,HTT_CLASS,offset); + ClassRep2(doc,_d,class_name,u8_chars,0,max_depth,TRUE,HTT_CLASS,offset); DocPrint(doc,"\n"); DocRecalc(doc); if (IsRaw) { @@ -232,10 +240,10 @@ public U0 FunRep(U8 *st,U8 *rbp=NULL,I64 max_depth=2,CTask *task=NULL) img=MAlloc(size); MemCopy(img,rbp+tmpf->size,size); UpdateRegVarImg(tmpf,img-tmpf->size,task); - ClassRep(img-tmpf->size,st,max_depth,TRUE,rbp-img+tmpf->size); + ClassRep(img-tmpf->size,st,max_depth,FALSE,TRUE,rbp-img+tmpf->size); Free(img); } else - ClassRep(rbp,st,max_depth,TRUE); + ClassRep(rbp,st,max_depth,FALSE,TRUE); } else { tmpm=tmpf->member_list_and_root; while (tmpm) { @@ -268,3 +276,4 @@ public U0 Uf(U8 *st) U(HashVal(tmpf)); } } + \ No newline at end of file