1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
|
/* PR tree-optimization/56064 */
/* { dg-do run } */
/* { dg-options "-std=gnu99 -O2 -fno-builtin-memcpy" } */
extern void abort (void);
extern void *memcpy (void*, const void*, __SIZE_TYPE__);
#define f_pun_i(F, I, VAL) \
{ \
I i1 = VAL; \
I i2 = VAL; \
F q1, q2; \
memcpy (&q1, &i1, sizeof (I)); \
__builtin_memcpy (&q2, &i2, sizeof (I)); \
if (q1 != q2) \
abort(); \
}
#define i_pun_f(I, F, VAL) \
{ \
F q1 = VAL; \
F q2 = VAL; \
I i1, i2; \
memcpy (&i1, &q1, sizeof (I)); \
__builtin_memcpy (&i2, &q2, sizeof (I)); \
if (i1 != i2) \
abort(); \
}
void __attribute__((noinline))
test8 (void)
{
#ifdef __INT8_TYPE__
if (sizeof (__INT8_TYPE__) == sizeof (short _Fract))
{
#define TEST(X) f_pun_i (short _Fract, __INT8_TYPE__, __INT8_C (X))
TEST (123);
TEST (-123);
#undef TEST
#define TEST(X) i_pun_f (__INT8_TYPE__, short _Fract, X ## hr)
TEST (0.1234);
TEST (-0.987);
#undef TEST
}
#endif /* __INT8_TYPE__ */
}
void __attribute__((noinline))
test16 (void)
{
#ifdef __INT16_TYPE__
if (sizeof (__INT16_TYPE__) == sizeof (_Fract))
{
#define TEST(X) f_pun_i (_Fract, __INT16_TYPE__, __INT16_C (X))
TEST (0x4321);
TEST (-0x4321);
TEST (0x8000);
#undef TEST
#define TEST(X) i_pun_f (__INT16_TYPE__, _Fract, X ## r)
TEST (0.12345);
TEST (-0.98765);
#undef TEST
}
#endif /* __INT16_TYPE__ */
}
void __attribute__((noinline))
test32 (void)
{
#ifdef __INT32_TYPE__
if (sizeof (__INT32_TYPE__) == sizeof (_Accum))
{
#define TEST(X) f_pun_i (_Accum, __INT32_TYPE__, __INT32_C (X))
TEST (0x76543219);
TEST (-0x76543219);
TEST (0x80000000);
#undef TEST
#define TEST(X) i_pun_f (__INT32_TYPE__, _Accum, X ## k)
TEST (123.456789);
TEST (-123.456789);
#undef TEST
}
#endif /* __INT32_TYPE__ */
}
void __attribute__((noinline))
test64 (void)
{
#ifdef __INT64_TYPE__
if (sizeof (__INT64_TYPE__) == sizeof (long _Accum))
{
#define TEST(X) f_pun_i (long _Accum, __INT64_TYPE__, __INT64_C (X))
TEST (0x12345678abcdef01);
TEST (-0x12345678abcdef01);
TEST (0x8000000000000000);
#undef TEST
#define TEST(X) i_pun_f (__INT64_TYPE__, long _Accum, X ## lk)
TEST (123.456789);
TEST (-123.456789);
#undef TEST
}
#endif /* __INT64_TYPE__ */
}
int main()
{
test8();
test16();
test32();
test64();
return 0;
}
|
