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
|
// PR c++/50060
// { dg-do compile { target c++14 } }
// sincos and lgamma_r aren't available in -std=c++14,
// only in -std=gnu++14. Use __builtin_* in that case.
extern "C" void sincos (double, double *, double *);
extern "C" double frexp (double, int *);
extern "C" double modf (double, double *);
extern "C" double remquo (double, double, int *);
extern "C" double lgamma_r (double, int *);
constexpr double
f0 (double x)
{
double y {};
double z {};
__builtin_sincos (x, &y, &z);
return y;
}
constexpr double
f1 (double x)
{
double y {};
double z {};
__builtin_sincos (x, &y, &z);
return z;
}
constexpr double
f2 (double x)
{
int y {};
return frexp (x, &y);
}
constexpr int
f3 (double x)
{
int y {};
frexp (x, &y);
return y;
}
constexpr double
f4 (double x)
{
double y {};
return modf (x, &y);
}
constexpr double
f5 (double x)
{
double y {};
modf (x, &y);
return y;
}
constexpr double
f6 (double x, double y)
{
int z {};
return remquo (x, y, &z);
}
constexpr int
f7 (double x, double y)
{
int z {};
remquo (x, y, &z);
return z;
}
constexpr double
f8 (double x)
{
int y {};
return __builtin_lgamma_r (x, &y);
}
constexpr int
f9 (double x)
{
int y {};
__builtin_lgamma_r (x, &y);
return y;
}
static_assert (f0 (0.0) == 0.0, "");
static_assert (f1 (0.0) == 1.0, "");
static_assert (f2 (6.5) == 0.8125, "");
static_assert (f3 (6.5) == 3, "");
static_assert (f4 (-7.25) == -0.25, "");
static_assert (f5 (-7.25) == -7.0, "");
static_assert (f6 (3.0, 2.0) == -1.0, "");
static_assert (f7 (3.0, 2.0) == 2, "");
static_assert (f8 (0.75) >= 0.20 && f8 (0.75) <= 0.21, "");
static_assert (f8 (0.75) >= 0.20 && f8 (0.75) <= 0.21, "");
static_assert (f9 (0.75) == 1, "");
|
