From 834ea1bec180aeed1dcb2538a813d76089ad288b Mon Sep 17 00:00:00 2001 From: florian Date: Fri, 7 Sep 2007 19:27:06 +0000 Subject: [PATCH] * tests part of Olivier Coursier's BeOS patch git-svn-id: trunk@8397 - --- .gitattributes | 4 ++++ tests/test/cg/obj/beos/i386/ctest.o | Bin 0 -> 6268 bytes tests/test/cg/obj/beos/i386/tcext3.o | Bin 0 -> 3741 bytes tests/test/cg/obj/beos/i386/tcext4.o | Bin 0 -> 2283 bytes tests/test/cg/obj/beos/i386/tcext5.o | Bin 0 -> 5344 bytes tests/test/cg/tprintf.pp | 5 +++++ tests/test/cg/tprintf2.pp | 5 +++++ tests/test/cg/tprintf3.pp | 5 +++++ tests/test/units/dos/tdos2.pp | 10 ++++++++++ tests/utils/redir.pp | 3 +++ 10 files changed, 32 insertions(+) create mode 100644 tests/test/cg/obj/beos/i386/ctest.o create mode 100644 tests/test/cg/obj/beos/i386/tcext3.o create mode 100644 tests/test/cg/obj/beos/i386/tcext4.o create mode 100644 tests/test/cg/obj/beos/i386/tcext5.o diff --git a/.gitattributes b/.gitattributes index 09a20f73c4..c6e3c6b902 100644 --- a/.gitattributes +++ b/.gitattributes @@ -6413,6 +6413,10 @@ tests/test/cg/cdecl/taoc4.pp svneol=native#text/plain tests/test/cg/cdecl/taoc5.pp svneol=native#text/plain tests/test/cg/cdecl/taoc6.pp svneol=native#text/plain tests/test/cg/obj/amiga/m68k/ctest.o -text +tests/test/cg/obj/beos/i386/ctest.o -text +tests/test/cg/obj/beos/i386/tcext3.o -text +tests/test/cg/obj/beos/i386/tcext4.o -text +tests/test/cg/obj/beos/i386/tcext5.o -text tests/test/cg/obj/darwin/i386/ctest.o -text tests/test/cg/obj/darwin/i386/tcext3.o -text tests/test/cg/obj/darwin/i386/tcext4.o -text diff --git a/tests/test/cg/obj/beos/i386/ctest.o b/tests/test/cg/obj/beos/i386/ctest.o new file mode 100644 index 0000000000000000000000000000000000000000..b68c94456d5c5fb5a8972161014b23dc11e79994 GIT binary patch literal 6268 zcmbuBYit}>6~}MvCEXZPyRd*!tJbukq>pTD$G9d`;5gZ28#%;~OoK?!L z?z%V?k01x+&B!Db1tB#bsun7wmZ(A^SQSVit!xAdDzpftQA#2e6cK+&A4Ea1y!`(& z=g!=HOdQdbX3zZ2>z;e=y)*OO*ua(*D^@7|TcH}2PfDFy@?g`_YS~g-2gGQr|aIiY>X$8QWUQl(c*43j8Y* zJ1K1|OrJ%jbbRWJ|ABMXAJ^XATxu=FLo#|`eK+KHCKf)^X3nF|nCD{QbIbXh9SfiB zT_z8D)_usO!x!e6GP;tn2wTpS{;xF#6%V%wavSo!xb*v!89N z+1}oYQ=9QP>5=zfNP zGud4AOmHSGPllj*`!Viesd=OXjKzt%ZE+9KjmB}3Zk&6l>c`dDCx@&sJLo@?0)3p6 zc+la5>41Q}a>!~zPRAcd$afEVF1j^{KiAeRC-AIS_(!~rFP4`{msbfI67~%Z6Utqw}ngbu>IBM(qJxCyG>-s#G!P(otf9Wd+8>!j4Y14-GHCw-I-P7I`{ru;m>(>sYbA`1XJsl5p zb|@7s>>n#8haii2SB~hrd^#H~rYDOkI-D#fRdlFOP|2c)LH;K!0Kpx=->tah^UvYUA6KfkQ7O7Io{ixBXM|yLe!XT8G`eB;;hz4>`Joj~ z{su_?`jGE__tyE>_4R_xZ`CaPI5+*%wp*akW71~BZ=-gC)P9tDOqw70uu?}*Jg392 zUe1GKlg)e!ElOD*f>M4upJpvheMr57)9(K&zq*;<9D%I6=*BcEV?d}Hv6`%lKlb^f znAIm8a{pNOT3oDw*DdPZ@&-uuHHwS=4?%MNylCGI`3SB%anYWEWEH$<=Z-soOUF;) z-i&_|{1Pr5{|xTU_+#KVaIL|`{J#@B_XzX<2@;3hv%gtozX)E9$>{w56}zr)C2VoS z-iCYT*7@%SXAS#}b;1R=rANX6~PmBLS@H1dOlQ`Z_!6yv6tWIj2T znCMlBtphvyHx49rY}v9iwkxq~WB))bq4s8TL&+@cL!-rtfX*Jz*4a~ST;Jsx*LPJJ z3w|VStBrnSp*FIoTc<7bbXP@A_(t4T88g{jvZ!NSFeX2on;6QbwOPopXLI9wD}AU* zn2yPOKDpoTr4wAC!=!7Km~4%b?WtAP^~8*8JlTdCr7>f(sGtcL^L0|WTjcR%p4-IG zjEzpFhZ7UJVAoBQx?od@MXL=DN^8_?<}hnE^))Nv8u8&Ykt!yNqvQL{p+#L7OJ=h{ z`b43QWh^~BIx$wqkWJ?IrcJ%uhk)@bj5Sr%S}SX*u-8^pVK(Z@OpK?Bqq%W!6@7(X zLSLiT&)4Y1^EBR0^))q7-jaJh`%)vxyxS;GXRNiSGZ)%ZR_{#Dzy(gY&92Jrba#1^ z?y#59?Q1}wv#Z>JWKcX?@%g8k@Z9D1a^otcz91YY;~R2Bc$|!v^J!E|3?GpYv`BO^qyM+GVA)~0H!u%d#eXk1tk&OB- z3tu6lzBata8Gkz@>)R~6jg0!ng^Og=_pIsZ&A1b?_<`t8j|_>J;3@B z!hGMeo`aOA^EuJ~nvA+mi2fg$(LXKv=P5Dnyy#yS{acjC^KVLwJB@D= pj`KsvRT%q4;a>@#68@|3g7CY-M-j{TpW|wbD|JldNs)gR`9EyKOKSiC literal 0 HcmV?d00001 diff --git a/tests/test/cg/obj/beos/i386/tcext3.o b/tests/test/cg/obj/beos/i386/tcext3.o new file mode 100644 index 0000000000000000000000000000000000000000..2aea6281264fd8a1efbc6b90fca5815215a191c2 GIT binary patch literal 3741 zcmb`KPiRy}9LMM7ZQ@Ia?&=09t-7lOjbfH;Hqk0l0{WVZdh+STKWsJ&QW|ZuZ;OR) z3$>Tw8SqfVqlcb6^$>d8kXVd(5)tD;Z!HAkA!5*nEXMC|{`e-@kSM%iXMXdU`Tf50 zo0+%E+uz)i-&&T%bg`JtB4X@zyPO#iriVGKRl5r7@&C`AP1dUpe>=UL;fws;0-Gp@ z7ccRb7w%2`#N_2P%;nR9^&GnK~$~Reew^%c#s*U|M?KP-6L9J69#G3PvN%5KKcNy$r&aOIX<=i&$ z4;^Te9@hU1|LZSPxQ^x!th$Z6Vc>-vpGVVShPw^B8m4OveP{D4?<_c#;t%-4=0u|u zah77e02#WW+?3Y{s$o!rHth_{c8PK8{?@rw3yJ&MD1K_g`0Tl}>#T3aBbn{oT@1WM zj*mQpCA+$qt}Thw)bsXi)j5d!w5zFftxNAfJ>Fvfw7%hDSHDQtb_8zLI1zcyxRvgY zXMtSyu9piAc|{)LoMznyJtDJiD4rDYyj-t^?AMlsRN#im`k5Zb@*2x-xG*2Mja6Th z75BTIo)xoROU!z9%zBBK^;%=rYl~TLQ_Ol!%zEuH>vhDew18mci=Nwx0j))ICHM_$Cs^%Aw#68K*1_0K3~a&}?TzxI zy-?bw-sR2E(;}ENx}d0-;|ca^Ihr9obC%f5gxFk>IKhyfC_B+^LpG6N3H%HAf|~yh_BlAK_(#|VxUBdZ>?n@ul;YoECk>{( zCUA**{ucO*!FRxa8GIMKWbh>T1pa#H_&WGcgCBtZGx#xh01uA#e*yl(;Cb*9gI|NY z@vv$C_h8@PcAV9}26utGoX9@|9yRy?c+z0zm+)0Dq8$+JplA@PX<#@##2v9P)}w; iJ(&&lWJc6eS&446ib_O`MoRfesz2%)X%>v^3hV<2-U>nh literal 0 HcmV?d00001 diff --git a/tests/test/cg/obj/beos/i386/tcext4.o b/tests/test/cg/obj/beos/i386/tcext4.o new file mode 100644 index 0000000000000000000000000000000000000000..1cb25bec42e3d22c8cb0b0821adc8bd1e8487819 GIT binary patch literal 2283 zcmcJQL2DC16vy8tF^wXo^`HlXi5@h9T{hXIwWSB8to0!3B`F1~Bxyj9SaG+a(5leW z5(0jJd<<_&p?c_7@Q|yg^iUySC=2obW@m7`s0cGK??3-HZ+`nWgq^qE-P@LBks1~y z>6arqIuY+wgcK=5G9eGt!f&hfu9wN~IpL4}Nj^LZkB8K2j~_h_57)oE$NuhNVYPnX zjrhcYH;yG@>Aj@goydBV80LWJZbiM*>Fk~re%?RMTi$4O1x)>?aRF6)52R)FP3W5T>7SPQOHi&$O5fLNIF*w5tI!PQ-|DWTM!$cUmzN9{ zwKs#cVsZW>>Z-huL)Eb+R1)e;5j{W>BHoSr<99iUsq@~U*{8^>ec ze~7kJ{UZD)&EJC0p-r`a2Yy@g_u&Vcufs3lM^*K#ea&ycN1CUgg}-XWZqf6G@0Ua@ ji|C425wR-byofhMToADoZu?HU=5-FvOWm^pfV_-$>GZC>23*p>~)t2N)) z671bJ`!(EN_xMJmC9Ye>4P#u!p)G{5D29A{{HE^7Y-o$$&vP%Z@vmn5qq^6)=8k%d z+s5Q#`Vos?_$ajTukwv8(Z0xLA6&5ajq0VYYibnv6yHK2GUem3<-^v)OnA(smo27) zeHpJuvCY0p)WdIFyZWFKRh@JvJOSaXX!ue!ZK%xg2!ACR{Eg{L^B1JOD*P?8`P(A) z%cK5Kxs`^VGNUO2f48otD-AvEPNV|KG^+z*{yD>*793vtdYF6s#)R?x;sO*7f0Z$R z7H>JP=W<)Tbri3O^z{_4Xf$mmQf3mdQCSgo8N2Vgv0{=1>c$!`idFSrx+MQ&OZM-x z`EPwp{HlK>v&ztC%;=1PKfVUD?!-(WIqS3rqHccM8m#1d*q!hPl4a6boJ#z8WHkx# znpfIv+f-Y3qCAkSF!i9a0(@WKsjFJ3Jz}rUBKGy1KWO8p^ECAM^HkVAW2?73PoLa= zt<7GZry-oD&pV!{-a`iu+@sxm7oGV^EHRNZ?^%<1K(@%->LU~{C^JPpADd$TtkgQ@$teh`L z_`_=a!_Ho|*7WWg*V7aY;)~fzUOzIfr${qG`*kRp(%#LR_M3XjH`*5RxT5KKJvDvL z)YFf=CmuNyGVr_}U!jCw&-_a=@VIitbIduPyj<}dch1M1JrBJbt@U}sIiLJo@tknZ zryy56Z#w5wm@A%>&iNE&&qMDzYkhj1^YP@0=ah3k#ku0?bIzwEdmef}S#=w5&Zjh2 zJaOlIeA)9<*z!p@=i|?wr^?22&N-je+4ImhfVDnD&iOo@E1vhA^Qp|9hrSD}d_Hi_ zC%7aYdPAZeZn!jYyJDhg?z8(p?&;d!_|acy8z(E$O5O-3;jV!JE!^M7L3dwo zZ|qc@lRrUUi8=K9wouG%f-Dxlap@L)b5L7@tC)>=cezZ{LKxCl3fbq2@v{QcXAZSi z#TQ|kN9_e%Wc#>zC&XYTEx6R*>BljTa+6K!R^W!@B;ALYw_Q$x zl=DbRPEsF6A!c!dYCymEDG#a*Vb$Nu0ZltCoj|7yfvl$9&)4qHTN?7GY6+_hgk=@E zm0K%N&7m*E|0Q^9fLIBC6zeuzFA2N~@+_{M0#`tOi%ZU5i}4(;W?W=XYu$vf8U+qR z4g&8MnEoGf6IlA+3hYI__6U6wWV?b}fWH9l6#Bi8exxb=MQJ|pQK4^#yrST4;0lx> zA@nC8F9N?P@LQ0#fRh5Bf!vQW$@~U^F96GU&ja5Cmh~6`_T!=W9Fp??1X4Dt<(Igw zKp%r7{Wp+R*ccLz17A?^55Oq}{|elW%`4~M1^!OKe*>?_=92pVfG;Z8jattscsXzn z7G2IS2fnG`b-;DYEPWXGV+A(==X)*vPT-RY-Us}Xf?oyRw%nQ@1O8OOTD%)aRDHNx zJKZ@j5MljB*4MJWj`j7d-^BXOtlz@=2G-*oWX9Y&!p$SxKEfSDxQ7ULQOjr6Mx+#s z(k9Z=6{+dz(mGmN_wCr;+Ocoft^;~oN89!tt$GLJ>geq6=f*VR<}~7@G~&E8;?y+a z>@?y@(1<5OBc2S6L_%z6v4|YlUCUF%a<$PKiVSIPtrA_W_6+u72_E7`$l?M`dqv20 IA&&|9Ka@I9kpKVy literal 0 HcmV?d00001 diff --git a/tests/test/cg/tprintf.pp b/tests/test/cg/tprintf.pp index 1d492e73c0..2084cbe4d6 100644 --- a/tests/test/cg/tprintf.pp +++ b/tests/test/cg/tprintf.pp @@ -10,6 +10,11 @@ uses {$define TEST_EXTENDED} {$endif FPC_HAS_TYPE_EXTENDED} +{$ifdef beos} + {it seems that BeOS doesn't support extended...} + {$undef TEST_EXTENDED} +{$endif beos} + {$ifdef WINDOWS} const {$ifdef wince} diff --git a/tests/test/cg/tprintf2.pp b/tests/test/cg/tprintf2.pp index 92f6f13500..255c768f17 100644 --- a/tests/test/cg/tprintf2.pp +++ b/tests/test/cg/tprintf2.pp @@ -10,6 +10,11 @@ uses {$define TEST_EXTENDED} {$endif FPC_HAS_TYPE_EXTENDED} +{$ifdef beos} + {it seems that BeOS doesn't support extended...} + {$undef TEST_EXTENDED} +{$endif beos} + {$ifdef WINDOWS} const {$ifdef wince} diff --git a/tests/test/cg/tprintf3.pp b/tests/test/cg/tprintf3.pp index 4394eecb3d..986da862d0 100644 --- a/tests/test/cg/tprintf3.pp +++ b/tests/test/cg/tprintf3.pp @@ -11,6 +11,11 @@ uses {$define TEST_EXTENDED} {$endif FPC_HAS_TYPE_EXTENDED} +{$ifdef beos} + {it seems that BeOS doesn't support extended...} + {$undef TEST_EXTENDED} +{$endif beos} + {$ifdef WINDOWS} { the msvcrt.dll doesn't support extended because MS-C doesn't } {$undef TEST_EXTENDED} diff --git a/tests/test/units/dos/tdos2.pp b/tests/test/units/dos/tdos2.pp index d089bf3dea..f67a96881b 100644 --- a/tests/test/units/dos/tdos2.pp +++ b/tests/test/units/dos/tdos2.pp @@ -245,8 +245,18 @@ Begin WriteLn('----------------------------------------------------------------------'); WriteLn(' Note: GetTime should return the same value as the previous test. '); WriteLn('----------------------------------------------------------------------'); +{$ifndef beos} + {This should be disabled under BeOS : maybe this is a BeOS bug (or a feature ?) + in stime function. + When you set 36 hours, the time AND the date are changed + It seems it is a valid value under BeOS, but you have jump in the future : + 36 hours in the future from the begining of the starting day, more or less + depending on your timezone. + For example in Paris, in summer (2 hours from GMT time zone), + this call set the clock to 14::: the next day !} SetTime(36,Minute,Second,Sec100); CheckDosError(0); +{$endif} GetTime(Hour1,Minute1,Second1,Sec1001); CheckDosError(0); WriteLn('HH:MIN:SEC ',Hour1,':',Minute1,':',Second1); diff --git a/tests/utils/redir.pp b/tests/utils/redir.pp index 6a4636d09d..215a6d852f 100644 --- a/tests/utils/redir.pp +++ b/tests/utils/redir.pp @@ -42,6 +42,9 @@ Interface {$ifdef BSD} {$define implemented} {$endif} +{$ifdef BEOS} +{$define implemented} +{$endif} {$ifdef macos} {$define shell_implemented} {$endif}