From 537fc0ee685db129570be859149f08026878a0bb Mon Sep 17 00:00:00 2001 From: Ivan Bondarev Date: Tue, 5 Jan 2021 12:32:21 +0100 Subject: [PATCH] test assert --- TestSuite/2067.pas | 4 ++-- ...uildReleaseAndRunTestsForGitHubActions.bat | 12 +++++----- bin/TestRunner.exe | Bin 41984 -> 42496 bytes bin/TestRunner.pas | 21 +++++++++++++++++- 4 files changed, 28 insertions(+), 9 deletions(-) diff --git a/TestSuite/2067.pas b/TestSuite/2067.pas index 26dabedc9..3402ada63 100644 --- a/TestSuite/2067.pas +++ b/TestSuite/2067.pas @@ -17,5 +17,5 @@ begin end; begin - Assert(1=0); -end. \ No newline at end of file + Assert(1=1); +end \ No newline at end of file diff --git a/_RebuildReleaseAndRunTestsForGitHubActions.bat b/_RebuildReleaseAndRunTestsForGitHubActions.bat index fba0da3fc..d34aa15d1 100644 --- a/_RebuildReleaseAndRunTestsForGitHubActions.bat +++ b/_RebuildReleaseAndRunTestsForGitHubActions.bat @@ -23,12 +23,12 @@ ExecHide.exe gacutil.exe /i ..\bin\Lib\PABCRtl.dll cd ..\bin REM MPGORunner.exe -TestRunner.exe 1 -TestRunner.exe 2 -TestRunner.exe 3 -TestRunner.exe 4 -TestRunner.exe 5 -TestRunner.exe 6 +TestRunner.exe 1 1 +TestRunner.exe 2 1 +TestRunner.exe 3 1 +TestRunner.exe 4 1 +TestRunner.exe 5 1 +TestRunner.exe 6 1 cd .. GOTO EXIT diff --git a/bin/TestRunner.exe b/bin/TestRunner.exe index 993299acac9c6ab07c24767b5d18f1975272ca5a..e484f0503606fca7dbfcbbacba24889bb570f2cc 100644 GIT binary patch delta 10393 zcmb_i34D~*wLkZMvt=f;e6t3Ukkw>D783}Pc?2OOgd`9lAV_3iL}HPF1gv35CQzZM zsKo28tx~Zf@+ufnur5hOK|~Gil`6QDK#g@@P?UGh{l08!f4}y<_wk!E_kYg0XS?e+ zq2(ZNIn1|gns~bU%Xy$b$AL2&vjO}88C+xLwc~d(evab@#%gVp83^Lj^9{gSU(GeX z_B6mnqJSmD9tVg;`4(g(h$AdV)Ur%#;XTMo#?K$bH7qUWIJU^oHt{H{N_Mql6Q2tF za4^D_25d}1!}x_ClSsKIzikS?lsV1lm;0My=*!n+70)Rds*yl4DPEV1`b{SBgA$k^ zxe*h}{8ARi?5s^z(v1+6%pVP*0Qr=9I{)lhfZr7%7s!#AWk@nhcM+>tXNdQaMIIr} zjdj+dYSL@Y6T1y@c@$gVM;4;wdBlRqS~QsCJkTWL4x+@`L;@6xZwzVu4Ug<+*lJ3q zD1KyqH0L1;n#aIQnYj$EXfm1BTqpOqP9PqJE#1iwj##ly7V)6*f&R|Sx--#anq{F} z$a33p({}cYTDvV@^=gSf#oWMh+RnHBmf_GoXSPT8uyE<9XBwC801VtI@+0yw9Yva=~ic^#X$q4G&x15Gd)oU zXvM${O)7p31y6oD9Kq@46T6)O?3CpSBAx2WNBSFAA=15)e(V~C?PQhcG)Xr~x=$@b z&W~z6(v|KE4;lCN4R(M>RI$TdFG@W=@wmrrBd@^`nCRx@8-3}b-ZPxJ#2-BwOcgJB zMu~I1K9T5kBg*%V5;r1h@#>vI)ahL8WL!$CO?>Q4B#Wr}HLA|^N&ARueWPp?MX;DU z3=_LN3CMlIHwqnn>mx@={!wC`-zUO;-SqjSSxE8h@~5EMEBsV)oTqTU^WiP%07$Z%0{*yvUE8xf0xiwk~VJb#CCsCJf3z^OL5iwpw_E zM25>|YAS}NLE^Ufs~iJ6i=heQnZIpC!i_8+*R-4j3~-9lwxjY$yv|bqXC>`y6b3PQ zWUv@Eq{>2_a011PUCD#Q?}qrzk`aj)j}Iw}rS|5bXbbxYYf>%zhWJPltisaqwZxXq1)?)?m=SX_3>7b@1bhmd(-#UB#!$y23F3pKF_%dltQiMf zM_K|(lVnmI`;z*<>xub8e9lc+e_T&w4J(j{6*$){K_pR}NG?;Uy*XKCPhoCO7S1G} zn3Cd%Cy6;iw66@LV#c0S29gBvoWL>=TQ+4G;)Wp9rbS;mNyrm(hXjN@)odXJj3!Br z$B5Jvl^B~x$|y*2^GF%R+Ehn8Nz4(VeNm8#Ig&(C#F8Y42LVQrBwkJ(m4mrR=L701 znFH&af_gHb>NK;3ws6Kp%#@CTh)o>MOtWW@PB@p=MstQZlNrxq z#jao~vx!lX&J8Bo3Q(t6l3cMdm^DzN?d#w_nL8C#yg{6}+4A%YG^dKMhn|ag_v>&N2N*G<9ebwp6x@gJF?@?)51fo@Rg{q?e@($^9&I?x#?SJfj(}y zQ9P9GH)&cTkh7h+WgZ?8E=Y~V1J4j%OZAKdgqrK`FSL+QA;Ie0WITUv$=wxqF0w*+ zxX2=ZkCe3h|t3&r8x7ZGX>O!uuOe>h+3e2ln^mn_xPA z)AGip+%LYM3?bY^*=m{$RWwb1OA!4v7^!kYMdGjz*w8jMd^cn1ZEb}gnOVBHyLjPw zS*Y_4b;*F>A4yd*5JSWL1o6Z(G~f`LT4=!Q*BD`it$C;zIeMfi2N}&dV%6xZ1S)*P zMAD)0jw z#GsS3{v`U+&Qz*`C*K2AI3eaz5gPWQg0&e7VrW)`sic6LxY%7*z&n^&P@2jVaYIRM z>^w@N8T%MQsp20cgUt=kVYf9!;#5h-umjl42%;Sm6upRgrf@rQ!p|b1i__!OSL6A^ z2TAh0C>iI8l>@5T949_0&GAXuAykl|_IUVbX|8LaBzQoyj*Dk6h^NN~V!!+0>{*$U z3;rsOj2p%t5WC8TvBhF!X^@ZV$>IA6gT?PlJu!#Tx@uIKUK9o6hsWMbk^L_t$SzCN zBCucdql^H{YKJ!Q*;uc&xA0ss7o(xM$=eroYAeFM>BF{aOA zAo!|yyD|xf@4Lzo(I3zfSXAR34X=@DvuX~6U&j`xW`Fn%t?@7IhuwuI6|M^$|9 z#?W4s$PS2it5PzRv)cM#F1kXc!t`IumrUlt4ay@ z`yPq$C4j?K*wa88Sn&N{>T*p_m*&11zvCBpdwY06+@`En#T5KNyfZ149k{W&G>(R~ zzR-fsKg3oDuc}}&-x2(~m{mOq2V{G78q&j(ek!T=0^$@&I$P2fNw-OQ@PgqeJ#)cm z`w28>GuQ7V(BZ`cmpQ^Jt#zoji0#1~@R|rBoRRV$0M* zTl-HJUGUE+iNg&8FUb&y3qFCc{t!99E0A?w5%vMU+)V;4wCjsIYX-L^P8rYHOJdQ~ ziYV>U^_@0Yk$fMj2LFQH;T`Nl%e@5eZ}gCjZtVOqev+|WfhnL8Warwy(F%M|!bs5z;$s z zx*exc{FP%Ba*WO^k3&(U2*I&}>}Z)Nimv-Z~9s#>_!k z_hlM7A7y5MUumc|W;voQI$D7!29l%8G~rrQwZTjswMukSNB738M%l8>_SR84Vl)(9f)DK}PFH}pf* z)~oxWTI+QKkO11C=_xnXT5kuZ1|+(helU^`$?n6six2rH_#oh}Dj!0-aW3?s$K($X zgh}=!`1;A7!6DEdl06T!m(oM%Wr)*&M6bi3e&{G}DDK@Kd|5fwNW?vhB2+lo^*7j{a7k2!_<31T@;wGx{);SY*^hxO1JFGK(5?ZfeE{klfQ}D9pAJAU zO7}Mu6B`4r9w<@r0F*Bg72@N0@li@|46M?5l-?NFq$5gi4BVrmb%@5oUWv34m%wWh zX=#?ghq@-MsS@~7M>}jA5Lt>TKodMHQG!GY{MjMlBwe^)+&n)knqgbXO5w2NEn%>KN3~h}b4p2E{t6M%j3nqN8~z8xM6X>MYb@U7%&X;y-3jFuQpqDrXH5v5rPn{-5JR>3Zbv^1-rT_P>bD(KYF4*b(Z z6?~|phb8(}Lve9p!ov7P&<2jaW??W4LK|aO$ zWSRE;{m^*(VKx=sl2)`Rr@={y{4m4*3Y!L&ab(pGOYBG4bcmyyETSu-_F9+$V|BQ} z{vMkF^L2Esy#{8&+FsPfX2MN6y4~K*YN1_6ciX>Uv!HmqW^{-B8$^3`w8wsi%?3-k zCfj3Yd=4zt(UbP*7i=!vqr*dXGoK5V37TrB-NEO>DjglSd-(!5SfR-bjs$)Qv{Y(H zb=1HTpdY^}r*uauUjn;yROSfsr4Tn!ldZAk@j7VH(Im%+DE}4g*Wo3OVtzS%*^A0~ z7?LMx9alT1@Rd-cqejPcsE2MH-Qk$d@uE_#Y5v}EF>iq4$r>ti%;T%z9v!W*UBXv` zL5`wJ?#RM>NnF(BY~jC#V#)S{A5kOB)X^YkD~~|8j)KlwSPMBdn(>hH7QPmi>1eX^ zF5U#&rfRa;&NHkT+I6(dxs^xZ;7m=n0d1~>lRCOJ>b#$?hm*CMaHn$@-vC=K*3eVV z8rTRsb=2vcj_5TVy&+{Mb#y|a&RJT&FEELX;GL}@=BmM0l%S5Bu1EPM=+x05*T_Hf ztD#$mnW%aV^@0|-CArYm&aZ*Rb2Kv*u2w{MNrdGS3zo#Qt)gj3ypuw?7Ebm`?q4!5 zI@d~XjsL&2McTaT-?1G1ca(mn)8D}xQhHRY=}75?hg75eC`ku$UP2DXmmlJrVu?=p8U4A=PdL%uZr#|K<2w@>8jd%04#h|r zOqO)9wEbONXqoE`iCOzMCH`u;KsKKZ5sBpyJaX7 zC0`qFjhbRzF0K!amaFD|8)_<`<*f||P3j(NTHiF67K#D?%Y_MF)vR#iWqHwdS0_IW z2VGkjV}-WYc?{6YQVcuhdYc!(3D+?m!#;I=!3ME7YZq6MMnGj>xw^4UhazKVTwm}M z7NdU4v!qUeq#@=~@ejLfkZMvwELpW74XQ4r`Kk|TNF9uHTvScMuPQYi=`=MMQbvvs8p-xb0 z;4am|LKxzsyhf%}1KU+MN_VQ06cy+iTnl^D=u~vsp>9Bzht(NMExdsy8sV5a8w2`C zU92o%pR0A)KBF#2I!J9mnyg-lG^jQq%~#hW4XM9HI!@h;v`TGNYOvQW$^)`mHDGX0 zRd&nvZnhn*HGtB5hspLnNgE;2O(EvG z_bPv7W86ovT`oB@-0eySP%<5CK5{zPayM0Fv3e)cweCYo2iEn7a!L-+XKaJ}s1j|2 zn^5UAyVw05(ns7~3gZXd??a6o-5CC^yNku}58NLsD!)RFz-REa`*URwH+pWx@}5!8 zC?Pmx@8U5$-ZLF;$6m}peVHMK=Xp$q6khC!H571pHDkx^Zsb>bY9Yj@d%9Rjl+%Q& z(?oIU@ zg@3~Sjb}VkI^?%b(g2nkizcsv><)Rv%!!6 zdptK7I+)dc1dDc;XM)noJ3O};V&ogsR(=4p-^x3YcEG!y4bTW(9vYO>o^d!~zjFQF z&k=zpt8wP?-S^LhIc=9sPj^18b6g?;k9EP z>%1=*I^ZtP5u{gpZ^2O%-Zu^J@!xs>f%GBor-mc&nD;BB&v?H#yeF#_;)lIpJjLJj znv5a-vDa=qCHbd-`?~lktald=@pzxz7z25}sMlBs=lceuQU(6kkI&?AG{VKcEaPcx zpNsTTA2XbWmA+P7bJ75OT1N{y-#Fsuhvxfk82%45EX$m#U0 z$6w(-@J%rm!{XaA#8(^jKHac!pj-j)a$~Q>Y zNlps01a35@;QT011}Xl)Xyr5{2EOG9uw8`1S*4qy&1ivxum|a3cpPabwjFRCqd!ly zvYp6be5WxFrkNkLNR@G#*x7A!TA=b5T*_5Y-8^4~orSt%a>nLpSNQ1LVz<*QxEMK m(vIKBtto!)YHv;Pwtas0CoBeecydF2ew+G-PgrZd`F{Xk+&cdN delta 10162 zcmb_i33OG})!yga`|_r|;l45RZ1O?|6G2JJ7!n`>A_)j3GAjxJ^g$9@<0E;IibaJ& zI27j!iZj1J;{a9op;AOjYf!A>@Cy!riUq4xvqbp!KKEvlcCD`U|97qTz4Pt8&))m& zbMCq4zNGCiZ#&4>ts0;9i*vKVxQ+v7c4i0IgaWP$oqO;*4L^JF10(e|>Qth5b$`Qg zXn(W7v~xGWWKqnLV)p{XqP__QN#Y307j-Ph=KCFr((toM+{H4jd$C1v9uY6FacSq! zl&(tra4^B`O99S}2VltY6C=tVDe9=<^O-9K<#i0V{hF~naln2LyG+cAy*|gN5&F8IQrb4m zq~vA-nUhgri#Q#d+Uv{Z7}684))8Q;Sm3yZ$#P!ZJ*GU_zu%Zb7|a&RB=8`}A!6VX z>;h73iy7c8QXvPq8$i>`6cDA(Qt3P(?sTqY4iWFlL>%VIL#%fVM%?Vmu{dagloqGx zbY&$Q#6>c-1)Zq_z+03BM{v3M#ST{xJLS4Vh?Cq!h`(|VLfk3wOZOGnPSXe{OT0tk zF0BG37qkY%rJigrIrsHWc92Kh;%QFzuEb%kPFwHK5)IygsCe9)Egtjw zh0UKJe(*X_QsncAWS>V^e7ba&kEDxzhJ#Xaa5*|~E};8PS(cBt3XizN>%MH}7T@}Y z*eQ+B5V9*4+r3Gm*zXrN`EzvnP?BFECZv$-}|%0cgQG<>Hx)?9x&n!C;LH^ z@b*ADD&7cWVVLg%m6{X71TOH>I61F8;uJN(M6AT(U;*0Q9~_VElfi5^RX$vXZkFLv zVl57l6qoPUrz1QSHwEBIgnZ#d&5X;*zjUIwNw=d3W8lMZ$+Q-D#L=-mZaXjWV`r{} zo=0B`TLMH(Ew~$~w0vm=>o*gRkV;)RO*c_n;>5j)w>$fH76Xz-Gk?dDr1h*Q9?kWT zc&F2@r11!D15%~{E?V07C=C+wNW8crWt@dN;rdDt+tcF3Ln#5X6hsolA5tn}sl9rD zoUa67OARHGz#JjOG%*vvB}3lK*r7T##ZQ{hI4m7sPGZ@dD>{>}C{9HB)8ufRMsk<+ zCP%`09!V4*r;b?I-HQX>c>0i(7Ad64_73y^ZYSoX_+6`TM(_qCZ&;HgtjXnONg_$& zWLkwr?bT_r9+c+lG~r71i<)$2B5BMK!rsD=i5YuRVMr62APYlc*_4Gb;nGkCh}YAD z;<^;CaAcS*B*E}0a!RhuNY_ZPdaw+eBAYVo@(gDpY0MGA-mqk1j-*i7Ski>5W!Mz) zdd86aR20xO^edjRFa+zIq1EOf~`i5Pv<3G)ngF8 z1^esIht@3Y5W(kT|6V=PaI@H!m&js8F#k!W$su_}xHuyg_kT6KoJt!B2(2K{S7{-o zLW*StY51_(Sg<{=5JjbU6oA&tv1Kb+i%kf&6^dDfIWZ(^yNKn{&h5Jj(QV=+#68_j*gttMDv zZ_O2hhYgOwC#Tw)Cz^)k%1LP)PgYb?U+5KVW{2>3X=}^x*fp$-v25|f@VWSOoH?R8 zi0elUv{9)7ZB!H8u&86-2ro;<=~v}rx8XF#(jUN71#gi9j)>yXKE_2%SutC)zUm5A zDHfGwqF`-V9UCb8qp~XwV9e~$PFkTQZ8(aU@LrUJ|Aat?r<+h@$O7S4NpldPb0L;2 zG!a`N-1==ITv6zj%GXGQHMWHg2wQm~J0xBo6Ld6QxOh>owgc8+N?tLeJeAF)gyO`u z@(@1@VsTjp=5@ZjAokDLT{9^yhspDvu?b>gMSxd`YcAhEx_@n)@x4DJ9;E7cYhmVM4}ow7@J}wXkM_l!$MN9Mri@FC zmCn1}wv7vw{}oLgCBty=*6{1tjs=UM?pbPo>m6>l%o6HETYd76h%d(FDK1zo;>Tx3 z$)8s(8G#NpReE%Q^`{>Hc&SHgug75M4Rk`?2jch7p2wbJ-v>T8c*6BZb#=>A6!Hy{#BQ|y1TUYuHdJ8W#ay; z6WB-M`KvS70rAe&<#9B#4TCJ0-N)D}b)xqe^ZlVu#K4IY@UCr}NPEf_i3cT~k?5|; zwD$&BC!U=ck9N~)$a=ZNO*I3teY9qn<5P5OH#cmhAfJkq+QJHb8REh9-!H>SWK9L@ z9Y>#Kh>J$7s~wwMBfKvqW zUM#~C30Y`_)@<;elD!(+8KT73U2tbN0ikK&{)V2Z? zc*OP<;$yadB0gp7Lfj^Cv6b2#vc1Q49^3nDz!cbTQxON-ixJ_ZVp+DEb&D7VkR_A2`v#B1!=BW|!$fP)eb8SQl_KV&C7Xx}W`gePOk^7Ggg z;03GW1va&9vvUOw<2mPI9)Oo5?sG1|_QWGnanjj^>a)%!6kT-Qf_SZaKjJL+LB#9a zhY=UM$;GV_*Gqg1E3xNp)LDXLi|6Ys$2t>rzIvSvN1Yi$2CK8)jBKaDmLRi2Wptr# zx*SdI&}Oi9$=r){-J{lJsM}z$-KcZG>BYM4HOZ3X87BbmNH)P>XCymrurA3yS)%v5 zC|Tvws7}o`a=HY6B*WV-F3uJ~re9-Bqiietu(7r~`>@HjHT{?X+F0otW14Kc4_rEt z>|y%hL|&wO3|B2)6rbobfP0|4i0#0&(92$wZ`#C3w;ONZUfnA=b-nC0zzs)UWcfP8 z^}>8RYv5W@4i z&IF`DWe>X#QejRHdlIEX7sS#a2edv z!(PEHY(o!w4Sx>X-osvp5Onsiw;&fn@`OMU-otIL(qL5WJh)e9m5j=r2flngH!5%* zRQ9khARp!#j0#);4@#!RJ%CHL0Jcho&@|GmLp6*ztbsTt5awjCccZU?afYO(jd~$BHDQLR_4i z7^UHjfF?sm!y5ss3`WBn0hwDF)XQ^W$=x`w%Au9vkcWs zy;ZU#$rO0rDd_}5xko&4U2ZhZzLb^2VJW+j9mbh0hfgHa! zyAmqkcFFXVDqw?T`fXkTTMV|vekWS)G}u*L5EI*xb*f&=9A0>$+6Ti zWU$L)TUZ4QHP~3xjfNV7)uC=Q%rn>`)Qy2#4AvrcTu;MX#j4o-}!Kxw4U~h}J=jFQScB_Ha zhHRB^-H;g7We2-uxMpg|0Uk0Aumndhy8~~?J*-!k?%3aljc^=hli(fcMbC0FoR%yA zHI6sfWU!1PuK}3jc#lniI6A{3TM~8D!BiM&(5T}Cn+kIbw$f1x(_ncIJH@8K27?L5 z8CC~-4R)X7Yc?H*j@F%SaeRktr@^*4&a)X{8KdjAIT)V_3k>$6Bl+omInZRVcO5=H7YCEn|g&To><)tyDI5YT-u-#z8oguye z;>PQ`CVL^Thc<(aab6kai(tP&XFG@To8X%sHim~GZGzr0?5yESp~PT~&MD9UXAHK% zIfXX>t`ZskUgx#E5r$6G*>LA<-UOQr)?~kdF9TK1qFe6B(O*JM8ky?nm|sGcR0hE2 zYU96zp$2m!YldkC^Sau31kM;N!&L{%A-`4+IMB6`FNehjt8zWaTVTs1T{qQrp0&bW zgWc%b%%f2_I89eZ(dlh)+FJ7BB94!NcvJ8G~_ zsXJ}3Q=#`kU_2P7x*gZG?>@@62BA97%bggD_^ky+F)Z^ zp?fdC3+Bz#-HdX#BYRLXy`*=;yfo736}=k{cI(921&J<7@NPKWBiprLc66GJ-a7w( z@mA@x^*`|({ZEW8vFRJ2Q)=Imcnp!_D-aFoY#+I91;`@ib47=MWWh$ekT%T_p zA=d5Y#?(fDty4#!HH`%SHqM|_zzSP-3cor8%|KRTAUGPWuI>uO` z{Vi?~Hg$}H^x#9w$0Df_UlN0iUx1bxM#p7)e!GyDdP zy4XXW6Nt}xPAQD<^Lzxga(1o!9nUFdHGs)~~$ z3tqLwsk>l`H;EIbpoFwpICF7oDNOg~ATIQxy=+&>b~7yT7N~Q94)1e;j_FjtA^1n! z7Vl_8db;PMpFOOe|H?a2rD?6fhw5G41!^;o&eFp8wb9$Grn85=ZHP~KSE@;{&AV3J z$5hV|EZRozSf!o6+_N@DNYBR+8 zXd%b@9#ePmENs7qv;MTYj~DpJa)|Hus>Z6KzLzn4jc-48xZX#dY5p{}1pkX6oke_q zR`nuboFANM*Cdm8Z8oYyVHFZIGpqilLhv}^N0uG4~U1c?SwV>ptL|c+lms# zx0(uJy!i!7Axt*Ej5yu=3gQrRJ7T%`dT9k=!|W~wnt)6qBB-V z385}oDX!Uabj}Up$jWt?%02CrzOAppXfMt&LIzYt$P??(&UQC6Q9om+& Iti8zmzk;j>r~m)} diff --git a/bin/TestRunner.pas b/bin/TestRunner.pas index 5fc2e81ee..f94a0503e 100644 --- a/bin/TestRunner.pas +++ b/bin/TestRunner.pas @@ -11,7 +11,8 @@ uses PascalABCCompiler, System.IO, System.Diagnostics; var TestSuiteDir: string; - + nogui: boolean; + var PathSeparator: string := Path.DirectorySeparatorChar; @@ -56,13 +57,19 @@ begin comp.Compile(co); if comp.ErrorsList.Count = 0 then begin + if nogui then + raise new Exception('Compilation of error sample ' + files[i] + ' was successfull'); System.Windows.Forms.MessageBox.Show('Compilation of error sample ' + files[i] + ' was successfull' + System.Environment.NewLine); Halt(); end else if comp.ErrorsList.Count = 1 then begin if comp.ErrorsList[0].GetType() = typeof(PascalABCCompiler.Errors.CompilerInternalError) then + begin + if nogui then + raise new Exception('Compilation of ' + files[i] + ' failed' + System.Environment.NewLine + comp.ErrorsList[0].ToString()); System.Windows.Forms.MessageBox.Show('Compilation of ' + files[i] + ' failed' + System.Environment.NewLine + comp.ErrorsList[0].ToString()); + end; end; if i mod 50 = 0 then System.GC.Collect(); @@ -96,6 +103,8 @@ begin comp.Compile(co); if comp.ErrorsList.Count > 0 then begin + if nogui then + raise new Exception('Compilation of ' + files[i] + ' failed' + System.Environment.NewLine + comp.ErrorsList[0].ToString()); System.Windows.Forms.MessageBox.Show('Compilation of ' + files[i] + ' failed' + System.Environment.NewLine + comp.ErrorsList[0].ToString()); Halt(); end; @@ -130,6 +139,8 @@ begin comp.Compile(co); if comp.ErrorsList.Count > 0 then begin + if nogui then + raise new Exception('Compilation of ' + files[i] + ' failed' + System.Environment.NewLine + comp.ErrorsList[0].ToString()); System.Windows.Forms.MessageBox.Show('Compilation of ' + files[i] + ' failed' + System.Environment.NewLine + comp.ErrorsList[0].ToString()); Halt(); end; @@ -159,6 +170,8 @@ begin comp.Compile(co); if comp.ErrorsList.Count > 0 then begin + if nogui then + raise new Exception('Compilation of ' + files[i] + ' failed' + System.Environment.NewLine + comp.ErrorsList[0].ToString()); System.Windows.Forms.MessageBox.Show('Compilation of ' + files[i] + ' failed' + System.Environment.NewLine + comp.ErrorsList[0].ToString()); Halt(); end; @@ -186,6 +199,8 @@ begin comp.Compile(co); if comp.ErrorsList.Count > 0 then begin + if nogui then + raise new Exception('Compilation of ' + files[i] + ' failed' + System.Environment.NewLine + comp.ErrorsList[0].ToString()); System.Windows.Forms.MessageBox.Show('Compilation of ' + files[i] + ' failed' + System.Environment.NewLine + comp.ErrorsList[0].ToString()); Halt(); end; @@ -235,6 +250,8 @@ begin // Sleep(5); if p.ExitCode <> 0 then begin + if nogui then + raise new Exception('Running of ' + files[i] + ' failed. Exit code is not 0'); System.Windows.Forms.MessageBox.Show('Running of ' + files[i] + ' failed. Exit code is not 0'); Halt; end; @@ -344,6 +361,8 @@ begin try TestSuiteDir := GetTestSuiteDir; System.Environment.CurrentDirectory := Path.GetDirectoryName(GetEXEFileName()); + if (ParamCount = 2) and (ParamStr(2) = '1') then + nogui := true; if (ParamCount = 0) or (ParamStr(1) = '1') then begin DeletePCUFiles;