From d9bedaeda2a9a86f4eb3270f38e9e98c78f27b54 Mon Sep 17 00:00:00 2001
From: yury <jura@cp-lab.com>
Date: Sun, 2 Jul 2006 14:12:33 +0000
Subject: [PATCH] * updated ctest.o and tcext*.o files for arm-wince. *
 tcext5.c test file do not use floating point operations in softfloat mode,
 otherwise missing links are created to softfloat C functions.

git-svn-id: trunk@4078 -
---
 .gitattributes                       |   1 +
 tests/test/cg/obj/readme.txt         |   2 +-
 tests/test/cg/obj/tcext5.c           |   8 ++++++++
 tests/test/cg/obj/wince/arm/ctest.o  | Bin 288 -> 7204 bytes
 tests/test/cg/obj/wince/arm/tcext3.o | Bin 288 -> 5915 bytes
 tests/test/cg/obj/wince/arm/tcext4.o | Bin 288 -> 3886 bytes
 tests/test/cg/obj/wince/arm/tcext5.o | Bin 0 -> 9400 bytes
 tests/test/cg/tcalext5.pp            |   6 ++++++
 8 files changed, 16 insertions(+), 1 deletion(-)
 create mode 100644 tests/test/cg/obj/wince/arm/tcext5.o

diff --git a/.gitattributes b/.gitattributes
index 3b38d3769a..ace69d3bd4 100644
--- a/.gitattributes
+++ b/.gitattributes
@@ -5830,6 +5830,7 @@ tests/test/cg/obj/win64/x86_64/tcext5.o -text
 tests/test/cg/obj/wince/arm/ctest.o -text
 tests/test/cg/obj/wince/arm/tcext3.o -text
 tests/test/cg/obj/wince/arm/tcext4.o -text
+tests/test/cg/obj/wince/arm/tcext5.o -text
 tests/test/cg/ptest.pp svneol=native#text/plain
 tests/test/cg/taddbool.pp svneol=native#text/plain
 tests/test/cg/taddcard.pp svneol=native#text/plain
diff --git a/tests/test/cg/obj/readme.txt b/tests/test/cg/obj/readme.txt
index 7ef7c30fd6..eb5a55b630 100644
--- a/tests/test/cg/obj/readme.txt
+++ b/tests/test/cg/obj/readme.txt
@@ -19,4 +19,4 @@ NetBSD-m68k : GCC 2.95.3 on NetBSD elf 1.6
 Macos-powerpc : MrC C Compiler 4.1.0f1c1 for MPW (dont know yet if it
     can be used with FPC, but at least ctest.c compiles)
 
-wince 4.21 : GCC 3.3.1 (can't use eVC, LONG LONG not supported)
\ No newline at end of file
+wince 4.21 : GCC 3.3.3
diff --git a/tests/test/cg/obj/tcext5.c b/tests/test/cg/obj/tcext5.c
index 35dcb37304..ae16468c77 100644
--- a/tests/test/cg/obj/tcext5.c
+++ b/tests/test/cg/obj/tcext5.c
@@ -1,5 +1,9 @@
 #include <stdint.h>
 
+#ifdef __SOFTFP__
+  #define NO_FLOAT
+#endif
+
 struct struct_arr1 {
   int8_t v[1];
   };
@@ -287,12 +291,16 @@ int64_t pass313(struct struct31 s, struct struct3 s3, char c) {
 }
 
 int64_t pass11db10db(struct struct11 s11, double d1, uint8_t b1, struct struct10 s10, double d2, uint8_t b2) {
+#ifdef NO_FLOAT
+  return 0;
+#else
   if ((b1 != 35) ||
       (b2 != 36) ||
       ((d1 - 12345.678) > 0.001) ||
       ((d2 - 98765.453) > 0.001))
     return -1;
   return s10.v1 + s10.v2;
+#endif
 }
 
 
diff --git a/tests/test/cg/obj/wince/arm/ctest.o b/tests/test/cg/obj/wince/arm/ctest.o
index 42b545cffa3f249533a451d6f9fe03690daa28d9..7134c91b749fc1191ce061bfa2f03819d3cffaf0 100644
GIT binary patch
literal 7204
zcmd6rUufG^6vuCxtkyMcGl`I~jYagKLao2Hv38?M_XjPugFQHyxKYwSTMOx0lGOcC
zq1K5*itF6oCK%L*i9;&vVTfR-D0^^F*+5^Ev@?*R4?av7IGx{f&%M9g`}-xSm4W`C
z$;s!QfA^g8yZJQ>fsml<M57SLq!j9J&5j()N||5I)eCV6;`3qt{3O3Ev<@e;NtUa<
zF0>A2GSw7lZCZ$h*0k-A!u6_{q(fH^^cog&OX7#eRzmar%b~?R%fiVmH8_2Ry7+sA
z2Is|saK0>v3!7F*znpF(bay4#CJLK~v#IcK7kt8wc%X`XMAXYTWFwrJ|1?e=_8y7%
zEeAzSG3;O;kZZ*Q#ai)tvE2UGs!z48w%>^Af%NN89>J9`)ict!91|N>Vq&HkG5WAp
zeY3}uM>O(YArQ~qq}m6anY?hWqX$<i_JC|2flZBR6Te;vz%H1WLBFr4epmNFaYLpL
z=PcsB_P>bh823R;)u;}+##D_Qakl7)*NTqOhks*Jt{1D-ME9HKC~D*uRk_8GTMW6C
zn~}BHcypuq*oPX3_*b$=<{3b<s?Q6|X<-NM_a>YNH8?{y;C-_?56rWGW_p9?T=AYQ
zVdXa(smB?_{vO0ToiDUsIxEP}gRA(7kRP0H^&)>WobOu};_ZB`m@Wq6xuvi==P1{W
z@EwQ0dIx#}_ntGI52Bty+;bFX<0^6FJ&T?M)V?WCy~ju#^>a|a3g=)sTYVl@tCgMy
zs#Qdt7kV!-#5d0ka}Rnxbj|OTAMf1I_eaE2H*<FMc}R8FdNObHx6=2A&e<D_=B!c0
z(%(Vm%<1#nYj2#jMV>AGzN32S9#pcW+1k9&x7;LViwWp&R`FY0+b`YkKgzG%Y?;2x
z=4Q+k)l<)uwlnMLog=EN)?aH~y}l@a?Q1RdHD<F&v#IZ4ec%3*I!BE<hn(|;Ex1>y
z-dpZ*z3Cne3Ou*qY&Yw=ZhP)#lk+;hkISsJW39_xbMGhTG`_db7DJKT64}yyckSbA
zo4kF#+nu|4tAhWdIFHP@)qKalyDKj<_Yj_Aw7oa3x%T}BqdUm1n*Zo0&n}&aKHjsM
z-umx9n0)FjN9vjPDb*L}l)SHWPFAjTR-;y0uL=5l@x4ROmkn{YqvwP`nLf~2Lblq5
z;xxgAe33oh%eJlFE6uuybKDqo*QuUHo%%wghn~Hn^4Y6K_0Y^&<a0~Cm_>?1=S?^2
z?L<!Fx$z7=H?FkcSx4s-#`94_{7NAPoyG;^irJvEqY-{-=5+t4PrW0l)I|K~L^?Gr
zn(?^{e*rOy*X>f8!)v#c7V-MDly2j-M@r2BA$Ce>KcwAKnuhd@l;$DzN+}QNIVnYJ
zbd3FwIL0g_6$28-2nBVFE=W72Z3+^{$U)*5Hz0A0I{ZV#F{UB0=aZ0lM^_<njBj1$
ztka$okXUchl`cY3`*7JUNF439%erfI+#X1(ey()El`cZ!tk5u}_p8euxlglZNSx`k
z%T7XK+f$IZ8kgNwQKxM~kXWzRW&JLjb=e#wj`5qzZn=85A#sf2{X#q{Yd?qoC67v}
z_0U*q1QK0;-4)_+U?@A1$+iwLlCS;k{Gl0dXuYTv{ZB9%EfFdeE}Af<)7B;lO`0YN
zNp2g2|BI!`Q#$RA)S(H~q(hQvgLFzl6RCB!Ns=#-4o;dTROxhZ(ln`>aMCofiX>Fd
z2H~7(g0&9kOp~n06Pz<mv?iQ0O|~YSGflWAoHI?jBAsfd24O3jcdf%#H0_E!$vdT4
z*MxUUGp`BnlqO!0F5W54yC%HTQG@VKY3h~EHr^@Cye6D8O}r+YGtIjuoHNb1B5e*Q
zjoEaGOqwR$B{FH6b4_@pXv$q8Q%qs9HEEZgua?Lz&Y1=TWfVct-_|Z;(f#0B$ylNF
zCDI`a)NB%2puGm+aXE#%iT#+r*$@c^=vN!ABE_f6{JjQa1|5m57xT9o3`}_)<98al
zuYl)A8s(AJ=%O$bPlyNbrzw-IAT9VS>9qQE=!8jGI(<H!7eLNgI-@?Fmq2b<I&b)N
z&Vt;rbl%4&v|V1D^E~7hBwWh*3lLl98pr`l=O++*@4tYYv~>RT`KibHB}?Zae6nLD
zKz_D#dhscSWbvjde-PpUi=;v3Eb=DE4U4=BQm4)hEa3VSq}w9jfJ|ECN01LK@;k^6
z7TExIVUz<4D#M3C9E)^;oU+IskVT6Of^?~~1tP8!c*|Pk49F#md<1gGBHw`QR%Z)D
zTtDJ1Ws%=O<}K2MJ^f~pW{?(j+OVG<kXefy1o_+|FN4&fsikV12ia?p&p^&ugerQ+
zA}b(Kb+&NyKR_IdG@yR{7TF4twMZMtoJDqlT(HPKkVT7(f&6NbS3&C3sm1xc1L9cZ
zW03t8`5NREi{wErTjWoWTNc@femd$r<XEjB5!p+cvF-Ro4;TZJ$#imjV5&<TPE8CZ
zQ;-J7ver^tr@PkH>0QLvyEg1-_bg^gmJq#*CCiN8vNNIGW;zod%c;^LM9<=()I>6?
zZTW+-&EbiuK|E%ujMXP&JvDLUu&qO6z*J18)5+tds!3yuVbgwy&H5mf#}CVDV#hvB
zDuWLiJ2sQ5v;kwk(iIQGOUX11gh9r~j*SctOzDJKO+lTo3DGpac_p_-&ZZADXOsIn
z!i$+~dTJ;;kR3a6+zhR7W;~fnRpJAgGArXF!(&t9WfoG&^x+Yca~&$gw-$X__*d;*
ztaX1z*0Pb;p{XN7*|CWuZWl{Hx3ENX|4KwR&n51pmWa>FZMmy6IW(F~bD>;j^x9=+
kqh08oOm~4AJix{F_?FdOeMwi?^~iOtU?``G1F4{Y0}rBcEdT%j

literal 288
zcmeZaWM%+?9w6obvsfARN>VFIz--)v0s}*WUP@v~B5oyM83zW21A0lt#RQZwG=S8l
xW#*(p75@9rz>v<EmY59_fQlo#jS(ou3?k3~vb&goa#+<Mxd{{k*wnB9#Q{UV6YT&1

diff --git a/tests/test/cg/obj/wince/arm/tcext3.o b/tests/test/cg/obj/wince/arm/tcext3.o
index 42b545cffa3f249533a451d6f9fe03690daa28d9..30c8a3b5c194f330dd016085de80d8f644286632 100644
GIT binary patch
literal 5915
zcmd6rKTI4)6vk(74>%iaR%nY=d`eap1%*TQxC0I;1xiv_F;OhVg(afI#CBp!DUhL{
z3x*U?pdfN0MKZ-DqKFg<3M-Y1vyvi(3uHH^q}c<VbZ4PdDO^M$-`h94`_|@;KMLrs
zU}t|b^S(Fly_w;zY?z8ZU-c?A6|_1g24`>1%?54$^UqnOmc_enmIrT4&GMX=I|V5Z
zeljy7-uG<ID^)&IE>*3{>y7lr#8!Iqy)9dH*KBvPmby@?zV&9Q`s@3pYT7DQO@(nk
zoonnp{?eARp41HY3C}CuJ=i=C^W3L3!+TmYq4oB_LbcDE<Tl<-Z^1v1zIU$HYFq~E
zvY=%uvtft!u|5a$_R~ntec9jt&4#<+A7<@=UoNdF)v)k%R9~Z6o_etUEY{zp7VF)f
zzfI#!wctmw$d;;)-atImO5O18`Kj?W|4_EdWDBuTBA3p*wz+yNHcjgrKkfeL_o>O6
z>M2#nb*+XxHD0P3Uh~>*9uw3A>iwYcun=3fd}*s!E!TTRY=gQGc0#}GBl>$#9RvF`
z73|j)<nRaIMy^#^?#<<3Z<>nx4a7;ch|_WD_Pub%9N8a*TK4AsPIa$tq3tNE(X@u?
z9Kcy;(^*$u3UZclOWSF0X)EO|!p8lE13O`^EX92aeUfLr`@wk=j&s!#V!T;1)F#(r
zQO8)<=y~<$k!zIBW8`Ps@%Wj=GmCResSmbssQ-a$;+g6C+r%u3VsY1}wW#n+)#n^B
zvO(hvZxQD~cWq~P_Zih`tFx2#Ni!deHt-?U20oZ4<OA(RC%DHJ>r@kzLwdS+y2xW%
z_|b)$Al9rVs1B$m$Oet0njkw=6V%tLCie5AqfPwiY!g4aPRI`%^%36lVO`L(A9?LZ
zPBX%fZqx^{X7xceLG?j3LF1@C$PU#9^|h*x{rou9CVregAwL}CCHx;D%m+OO5YGX`
z@~rTq7kMGpEH9J`$_wR!#!+6#4&{aVTIFRwKYEYb55yt7f9e0%@D8R}*jNKS>5ig1
z$<n^`;C^#loNfA!miL;iV?lFi4#k4z|Akmk-=48Jgb%N@fe){?fe){>fe-F6_%QhC
z?ay!OZ^r-bD)pH$dmZ1x^Mltl#A6~i7Q8&@P|857Q%wvF1>`qDynvuH8dC^JQIOGq
zTohzDAYTf?S`TBAXRXJAuvVrk(#o^exFD=`SrFD*7KF8ak4b^GDuS?<or$yxtaVus
z*19GLYpn{xT9ud#vsPUY*6KeMX$`a1H9=TwS`gM+7lgIyF&Sa4=Yp_S;dG=m!dlaU
zu-3dFto2Y3)_NY3QP#?IN0vuf>m5N@YhDo6S`mb`9t*-+861eZ4vVbi2*O%d1Yxaj
z1!1i<L0GFI2x~cKBCRpj8W4oFJ`{wtRs~_LbwOCm7lgH3e38-X%6Wm9CrKc7Ly|yj
zO_D(Dfh2)gJtFcqHqtT;`jsvDk-x8{f-%W{dXvAc(Jy%>8GGR~JvB3v(~P=PiU=)?
zmJ*XZ-fkrbEo>t}Xc?6R8Nr(kBe5M?{M7_0f~+S9MY@t8IXKggWyW@LaC$CD;Pg(C
z!07@OE@r{$)g*z_b~-TzPOl|M9$NK?z&V8%wW7~eioQ~mAX}e)OdOE!6XZNdR-alt
z<^o75K`3Ga`n2IO;~*Oe@-9eGpAtOg3P?FYJ_5O@_dAcd4YHXavmjUX&gC&*fcOdW
zHOMW!<9N(>AUg?C0-4r3g~$91@^^y#0y3v7Jf$Ad4Aj}jQ+Mv<qSjE<%15n2)EbUj
oBT;KKY89i_Skyw*L?W?DE;f{lE#+cULva(C4=vz^i<)`$ADy@>761SM

literal 288
zcmeZaWM%+?9w6obvsfARN>VFIz--)v0s}*WUP@v~B5oyM83zW21A0lt#RQZwG=S8l
xW#*(p75@9rz>v<EmY59_fQlo#jS(ou3?k3~vb&goa#+<Mxd{{k*wnB9#Q{UV6YT&1

diff --git a/tests/test/cg/obj/wince/arm/tcext4.o b/tests/test/cg/obj/wince/arm/tcext4.o
index 42b545cffa3f249533a451d6f9fe03690daa28d9..bf0c7ac2e0075901097ae5341e8d4ebce2b74a66 100644
GIT binary patch
literal 3886
zcmdUyJ#W)c6oyY?Hw_f1he$+91s)hna2zKsQU*R2B!Z{}18Zo@hm@gGGIUHoh7K8!
z%D|ApLkGr=9T<XGJ5<o2VzLtjxrm`Z08!4(dzE_=7?F@8CAJ@*d!F~&H<H~=7$iRL
zE)v}x?oCzm&DHhha34RH_*`2%mb=~jO08M@lTVUv{&}M@2`7(RMBU3>KeSG6o|^mB
zo_X}Bm!X+K#?B4M{ya#|`{BKcAAWl5ho<F+2665C+^Igsl4E9_pl?|Zdxo<SknQ)$
z^7|>;ipcT%S!ZUDb#j9QJ?V3XuNk86!+M+RyPLsiENukBEou#CGa%>7z+nIVIY0b(
z%MY{kCQ3NFLGsRCkfnAs?CEUvME`H+=c*@<&C+i4FES@%nAwP7W;2GFQ!&gu9mCA&
z7-qf_!_2cW%xuLl^VJw;z81sG*JGI3{*RgSFJ9MI<wN4HbE21t<}yE(diiAuc~dQ7
z{}pc%{7q4{46?3>2Xd&$BFG#Mk)sNQA(~g@Hfmam6d*g&2xNgqAoG%{Gi2L}xNyBy
zqySl@hzr*uKbmuMF)tUc2O5E^qY=1%C{l#$ry?#~OXjF^5iVaNaP4aZE^|tag6pXw
z9$YJm6yZ8h#DgoH8ujtu%4!6zx<=sophyX>Lq$Be?CDYG5?pH<fvcqvxQ;af*Nyb3
zPZ=&xkrG@xij?6x(Fk0TM&PPkP@UmwE3yDrN0BmIXCtD&n~AkyB*fd<_(y*)<3+_a
z<LAYZ{!Yfr<F7SqwMGMpkU2?$xLhsfBASAT*+*kUobPafswpv9k}Dje7MPfFWrB$7
zaWF>2?CWwJqNc!&Y`LN&;Y)oyPPp}sTpOryIZ#F3Wf1Y#I2$KCu|0XeWDQU3nY{8z
H;u!QB3<Q<7

literal 288
zcmeZaWM%+?9w6obvsfARN>VFIz--)v0s}*WUP@v~B5oyM83zW21A0lt#RQZwG=S8l
xW#*(p75@9rz>v<EmY59_fQlo#jS(ou3?k3~vb&goa#+<Mxd{{k*wnB9#Q{UV6YT&1

diff --git a/tests/test/cg/obj/wince/arm/tcext5.o b/tests/test/cg/obj/wince/arm/tcext5.o
new file mode 100644
index 0000000000000000000000000000000000000000..b7d770a6dceccc3b58236cf3a82d79bbc1a422cb
GIT binary patch
literal 9400
zcmd6tPiz~<6~>2JT2?GMT1#}w#7w#l*g^+YS(5rg0Xhhc4gsW~1{xp+Y@m^2Cr+cb
zMx+)x6sRnzfC2O1)&d&9KCpogKD0mz_~3&N4B|r%MnNPw2(=F+RRUxn6h8FegHiW;
z^JY1Z6xX7i)R6#6v%j64_syF(GjCQbL>xsw%imM#Z@RQ^Ze;1q@{%s|uk9C<%86@J
zER39<Uz*>^TS;N$)Z$_*Y`tDls&KH7FT0yRsz*PatGLBCD>2nujrjTUVSl!I*gsK?
zsGn{{l{%pO(w6c{Ti*0+rBAKb_9^vs%sWx-8qSx0Je4nh{*!#!^JXh?wOaH1*@~ks
z*WBwz>btey71I8G-TrJvxnEQx-WO~qd;Y2II3ad=$qw`??@RRi%c_IEygsyA9zfr9
z8P|@#T6)_4MMLZ&0$}$@wUc&Z7#COj)Twu2Y+l6Jya;{!+O{37Y2O9<F+OqFY3@Up
z8Kc1+V-#kqJH*y=A^!U|Z0--SdGK*Iz133q*gbi_dqOnO__;dX2kIR6;cdq;eu=_t
zWxvYRUdGtHjInvHeY<sv$6m}eYTHq(rC2bIiG2C9*D#jqQZ3?NE_F>`D;c|Wo^ONo
z*7?@X?tu`y<kN=T0@=l!P-0HRSB(9u-^hM%i2cDQu<y8kC`G+bN(1UdRrTe|(`Nk%
zIQgSnIdxjA92M)xFMT1p4oF>kJTRBsCm)LhV!%TT^dknM{*~%c#KBRF?ZFniJ~U%}
zt-G+>FXBMYCt)|}Yb?YEzV^Xdo!WEM#tt8Z>3KdxPiz-G5tT1@L7$^8m7?ySOEC}e
zQ;=(SPOsg;ebVQsC)d{>qVJ_|S>Hg*-u6v(yCJ%1{nX>E;17SL)J^*)%5mk^gL&@5
zm)KY9?6b>uENNfB-W|i<-G_3ta8bus67h8i@pTCC_5BvRX8*2xu-oJ1x1#>VN|(O|
zyI1OQ*bd^#ReVq3p5zI%O?y^Q&r=sM&PC)2MV^aUGtOp?zN+p%W{$3zIV$2aq)$Vl
zPhLo$C?`pJciZJ8W{uq4chb($5IeNLCOz~!JU4kNd#{Grqdg&saca#`e(2u~%TadN
zj~c)Bm^?4ok1+n#KKM52UBSLITc!Ns75r7x`7Pxm2K1apj@XjR(cU6+MXH<ddv(ru
zCg=z9Mdc!AH0yC3{h)dt>UqdX6zU--{pa)G4&|0$?ljGV^%BLT3i2`JFbUivMmDHk
z#9ymWJKK*QeNFdt9_7+JiRk^<Q3H0KnEdu}n&0bCGv&j3Mf3X|YNi}}uV_Bop=Qe0
zpQUEn597Qi)q)&5h*iq9KWNb%?5{ygClQND#3AMTf$sf?X<}h9O>s;yO>s>1D5j|$
zifOt>G41P^K3}Ijz)^qP5!1Wr{&|PG=`69Abbr{PZaSCjCEW`h>ZY^Jv()V&zJoQN
z)_IC;iZwcm{Gz?)S`gbqs5gXoq_a?<xfiibEG)Juo+-A;2Gyh3rgkW{>7Iz~nu+Zl
zXVJ%L{$+=n>72D!H2<nY&2&b4mYS1@jn=aX#RrWSolzFs>UJ9OF^qb{7*jes1iJeX
zAH>4qgJOc>gKSVeiVtds;)Cwl_=uSJ7}yaXyXju)P&b_^o{4VwImp-PJxh?U$4zca
zK99o(l(+vn(BAakEn35CL7hWU9z=N$ohwLtA9%vU{$uianLE+hk$g>U(=+62dj8+=
zHQm#>lRjg#d500A*=wWucO7be={wRKoQtHN*E-bv${y0Z-l1kX`+XO&5uBl<pMT$>
zW;)ybzci1$_rby$G)_PNeWcX;k)?O>)_rW`U1s!qF3sgB{E6Vxt>#ip-m+wr$yG}-
zOm0~+&LoOPOgm#tMlH!Q`K=`rOmdc_e2q3OndCYTEJ?BGnXZPd6pLOEghk&Jghk&M
zghfv|wjCBdCkTt)5QIhFwj|A(`|ytgh}1r0(KD8$S#wSh)_hM8)||w_-n5fu&Bp{`
z%~u6s%_Tut^KiFqhc&NQl3~qvEJ?HGEROredWJQx3&NWJA_!}KC<tp_>9Osw=At01
zxh4o}&f*18V4XD|w`7zxU$-Q~nl~*OW$WkgBGa@p%DwnX5Z1gb2-~_K2rIlT2-`~H
z^+eDzYrbH~7%LnWg!N1b!aiIUgl%mK!V0Ib%^6!`?8B0%!+P!u!o3)_PmQy!oFJ_5
zz98(M4MAAXH9@!+B|+HM3|^!gh2yO7x*+VIIZGy3&q+(hxfdT>GQqYU3c?EC!HW}P
zYl8g~6@>M~1mRvB6NGKu5QG)R`x`B1**~{zoh<9QBMA4RM?A&076f61MM2m<OM<YT
zbwRin1xqH`mghDUPO`#vLD)Y-g0P;fAl!>3LD<$;g0RBuA#02MbI;aE`C8DnC6nBX
zA^TLy*TybLq9txiq8)Te5-lh%iSEWdNwl%)fri4AuO(g+gtw44B++_~OOm2pWkV8e
z>wzR%;mJX3E5#0yMC)-S(Y=@xB&}`Tki;kJZp^mK+ruqcN9(yGNrs+M@+ocWtR!0D
zZAr9$&IyvydR7GCrT>N?8Eq?Z*ec}BU|Et;l9QA~>lu|~jOv_~M0>0#iB>rLg0;m9
z{idkH%X&=`-HU{LYK&~HOQIE)BpIhVIZ3phtCHwm6dOc-SAo_aCqmy=X#SDkQ$T`&
zI?ea#N`6NH$wS*Z=jIm|b;od@n&?tQ(kQ*tL}+;a-bARY(|E)_Meg{xiHw6pP5#3z
zQ&*Rp2o1)=CPEH6Zn7PIie^}`nLzY0lgXGm5M65~5Pi~QDW(oYZ#NT&&Y7IV)Pd+3
zlU*>O_`TUeQYvS1iJ(qe{ilUw)M=9^&<Md3`24Gh90D0OJ3iMr0#a%sKLFV<doI^`
z4de~8GcqBMJ!~ScgWNDX8rOLfWWnqyOx^}bnw6i)JjlH!@*&72v-WbG-+;_OIFCCn
z)Oma!G?5(0r)Fj2r~U+Tc2GX`2}mL)$zMT=P2?uXx|xIA&gURm%m%jp4_xU8PMtoL
z@=u@A7eAZ-=%ZAllx~zVjnZhNG}b7MH%b$YQnpc=Y?Kg+WKkQjR#LVhtl5nUwyCr&
OBAkK>SmPSSjQSsYb#{^f

literal 0
HcmV?d00001

diff --git a/tests/test/cg/tcalext5.pp b/tests/test/cg/tcalext5.pp
index edaf8a3626..c395ee972b 100644
--- a/tests/test/cg/tcalext5.pp
+++ b/tests/test/cg/tcalext5.pp
@@ -9,6 +9,10 @@
 program calext3;
 {$MODE DELPHI}
 
+{$ifdef UNDER_CE}
+  {$define NO_FLOAT}
+{$endif}
+
 type
   int8_t = shortint;
   pint8_t = ^int8_t;
@@ -599,7 +603,9 @@ begin
   verify(pass311(s31,s1,32), check1(s1), 32);
   verify(pass312(s31,s2,33), check2(s2), 33);
   verify(pass313(s31,s3,34), check3(s3), 34);
+{$ifndef NO_FLOAT}
   verify(pass11db10db(s11,12345.678,35,s10,98745.453,36), check10(s10), 35);
+{$endif}
 
   verify(pass_arr1(sa1,101), check_arr1(sa1), 101);
   verify(pass_arr2(sa2,102), check_arr2(sa2), 102);