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
|
/* { dg-do compile { target { powerpc*-*-linux* } } } */
/* { dg-require-effective-target ppc_float128_sw } */
/* { dg-options "-mvsx -mfloat128 -O2 -mabi=ieeelongdouble -Wno-psabi" } */
// PR 85657 -- make sure conversions work between each of the 128-bit floating
// point types.
__attribute__ ((__noinline__))
__float128
ibm128_to_float128 (__ibm128 a)
{
return (__float128)a;
}
__attribute__ ((__noinline__))
__float128
ldouble_to_float128 (long double a)
{
return (__float128)a;
}
__attribute__ ((__noinline__))
__ibm128
float128_to_ibm128 (__float128 a)
{
return (__ibm128)a;
}
__attribute__ ((__noinline__))
__ibm128
ldouble_to_ibm128 (long double a)
{
return (__ibm128)a;
}
__attribute__ ((__noinline__))
long double
ibm128_to_ldouble (__ibm128 a)
{
return (long double)a;
}
__attribute__ ((__noinline__))
long double
float128_to_ldouble (__float128 a)
{
return (long double)a;
}
#ifdef TEST
#include <stdio.h>
volatile __float128 f128 = 1.2Q;
volatile __ibm128 i128 = (__ibm128)3.4L;
volatile long double ld = 5.6L;
int
main (void)
{
printf ("f128 (1.2) = %g (ld), %g (ibm128)\n",
(double) float128_to_ldouble (f128),
(double) float128_to_ibm128 (f128));
printf ("i128 (3.4) = %g (ld), %g (float128)\n",
(double) ibm128_to_ldouble (i128),
(double) ibm128_to_float128 (i128));
printf ("long double (5.6) = %g (ibm128), %g (float128)\n",
(double) ldouble_to_ibm128 (ld),
(double) ldouble_to_float128 (ld));
return 0;
}
#endif
|
