1 /* { dg-do run } */
2 /* { dg-options "-save-temps -fno-inline -O1" } */
3
4 #define FCVTDEF(ftype,itype) \
5 void \
6 cvt_##itype##_to_##ftype (itype a, ftype b)\
7 {\
8 ftype c;\
9 c = (ftype) a;\
10 if ( (c - b) > 0.00001) abort();\
11 }
12
13 #define force_simd_for_float(v) asm volatile ("mov %s0, %1.s[0]" :"=w" (v) :"w" (v) :)
14 #define force_simd_for_double(v) asm volatile ("mov %d0, %1.d[0]" :"=w" (v) :"w" (v) :)
15
16 #define FCVTDEF_SISD(ftype,itype) \
17 void \
18 cvt_##itype##_to_##ftype##_sisd (itype a, ftype b)\
19 {\
20 ftype c;\
21 force_simd_for_##ftype(a);\
22 c = (ftype) a;\
23 if ( (c - b) > 0.00001) abort();\
24 }
25
26 #define FCVT(ftype,itype,ival,fval) cvt_##itype##_to_##ftype (ival, fval);
27 #define FCVT_SISD(ftype,itype,ival,fval) cvt_##itype##_to_##ftype##_sisd (ival, fval);
28
29 typedef int int32_t;
30 typedef unsigned int uint32_t;
31 typedef long long int int64_t;
32 typedef unsigned long long int uint64_t;
33
34 extern void abort();
35
36 FCVTDEF (float, int32_t)
37 /* { dg-final { scan-assembler "scvtf\ts\[0-9\]+,\ w\[0-9\]+" } } */
38 FCVTDEF (float, uint32_t)
39 /* { dg-final { scan-assembler "ucvtf\ts\[0-9\]+,\ w\[0-9\]+" } } */
40 FCVTDEF (double, int32_t)
41 /* "scvtf\td\[0-9\]+,\ w\[0-9\]+" */
42 FCVTDEF (double, uint32_t)
43 /* "ucvtf\td\[0-9\]+,\ w\[0-9\]+" */
44 FCVTDEF (float, int64_t)
45 /* "scvtf\ts\[0-9\]+,\ x\[0-9\]+" */
46 FCVTDEF (float, uint64_t)
47 /* "ucvtf\ts\[0-9\]+,\ x\[0-9\]+" */
48 FCVTDEF (double, int64_t)
49 /* { dg-final { scan-assembler "scvtf\td\[0-9\]+,\ x\[0-9\]+" } } */
50 FCVTDEF (double, uint64_t)
51 /* { dg-final { scan-assembler "ucvtf\td\[0-9\]+,\ x\[0-9\]+" } } */
52 FCVTDEF_SISD (float, int32_t)
53 /* { dg-final { scan-assembler "scvtf\ts\[0-9\]+,\ s\[0-9\]+" } } */
54 FCVTDEF_SISD (double, int64_t)
55 /* { dg-final { scan-assembler "scvtf\td\[0-9\]+,\ d\[0-9\]+" } } */
56 FCVTDEF_SISD (float, uint32_t)
57 /* { dg-final { scan-assembler "ucvtf\ts\[0-9\]+,\ s\[0-9\]+" } } */
58 FCVTDEF_SISD (double, uint64_t)
59 /* { dg-final { scan-assembler "ucvtf\td\[0-9\]+,\ d\[0-9\]+" } } */
60 FCVTDEF_SISD (float, int64_t)
61 /* { dg-final { scan-assembler-times "scvtf\ts\[0-9\]+,\ x\[0-9\]+" 2 } } */
62 FCVTDEF_SISD (float, uint64_t)
63 /* { dg-final { scan-assembler-times "ucvtf\ts\[0-9\]+,\ x\[0-9\]+" 2 } } */
64 FCVTDEF_SISD (double, int32_t)
65 /* { dg-final { scan-assembler-times "scvtf\td\[0-9\]+,\ w\[0-9\]+" 2 } } */
66 FCVTDEF_SISD (double, uint32_t)
67 /* { dg-final { scan-assembler-times "ucvtf\td\[0-9\]+,\ w\[0-9\]+" 2 } } */
68
69 int32_t ival = -1234;
70 int64_t llival = -13031303L;
71 uint32_t uival = 1234;
72 uint64_t ullival = 13031303L;
73
main()74 int main ()
75 {
76 float x;
77 double y;
78
79 FCVT (float, int32_t, ival, -1234.0);
80 FCVT (float, uint32_t, uival, 1234.0);
81 FCVT (float, int64_t, llival, -13031303.0);
82 FCVT (float, uint64_t, ullival, 13031303.0);
83 FCVT (double, int32_t, ival, -1234.0);
84 FCVT (double, uint32_t, uival, 1234.0);
85 FCVT (double, int64_t, llival, -13031303.0);
86 FCVT (double, uint64_t, ullival, 13031303.0);
87 FCVT_SISD (float, int32_t, ival, -1234.0);
88 FCVT_SISD (double, int64_t, llival, -13031303.0);
89 FCVT_SISD (float, uint32_t, uival, 1234.0);
90 FCVT_SISD (double, uint64_t, ullival, 13031303.0);
91
92 return 0;
93 }
94
95