d0p1/tcc-stupidos
1
1
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Test long long to float conversions

Browse source
This commit is contained in:
Thomas Preud'homme 2014-02-01 15:26:48 +08:00
parent 5cbe03b9c4
commit c88c2706a2
1 changed files with 8 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
tests/tcctest.c
View file

@ -1670,21 +1670,29 @@ void prefix ## fcast(type a)\
double da;\ double da;\
LONG_DOUBLE la;\ LONG_DOUBLE la;\
int ia;\ int ia;\
long long lla;\
unsigned int ua;\ unsigned int ua;\
unsigned long long llua;\
type b;\ type b;\
fa = a;\ fa = a;\
da = a;\ da = a;\
la = a;\ la = a;\
printf("ftof: %f %f %Lf\n", fa, da, la);\ printf("ftof: %f %f %Lf\n", fa, da, la);\
ia = (int)a;\ ia = (int)a;\
lla = (long long)a;\
ua = (unsigned int)a;\ ua = (unsigned int)a;\
llua = (unsigned long long)a;\
printf("ftoi: %d %u\n", ia, ua);\ printf("ftoi: %d %u\n", ia, ua);\
ia = -1234;\ ia = -1234;\
ua = 0x81234500;\ ua = 0x81234500;\
b = ia;\ b = ia;\
printf("itof: " fmt "\n", b);\ printf("itof: " fmt "\n", b);\
b = lla;\
printf("lltof: " fmt "\n", b);\
b = ua;\ b = ua;\
printf("utof: " fmt "\n", b);\ printf("utof: " fmt "\n", b);\
b = llua;\
printf("ulltof: " fmt "\n", b);\
}\ }\
\ \
float prefix ## retf(type a) { return a; }\ float prefix ## retf(type a) { return a; }\