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
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
|
/* Copyright (C) 2004 Free Software Foundation.
Check that rint, rintf, rintl, lrint, lrintf, lrintl,
llrint, llrintf, llrintl, floor, floorf, floorl,
ceil, ceilf, ceill, trunc, truncf, truncl,
nearbyint, nearbyintf and nearbyintl
built-in functions compile.
Written by Uros Bizjak, 25th Aug 2004. */
/* { dg-do compile } */
/* { dg-options "-O2 -ffast-math" } */
extern double rint(double);
extern long int lrint(double);
extern long long int llrint(double);
extern double floor(double);
extern double ceil(double);
extern double trunc(double);
extern double nearbyint(double);
extern float rintf(float);
extern long int lrintf(float);
extern long long int llrintf(float);
extern float floorf(float);
extern float ceilf(float);
extern float truncf(float);
extern float nearbyintf(float);
extern long double rintl(long double);
extern long int lrintl(long double);
extern long long int llrintl(long double);
extern long double floorl(long double);
extern long double ceill(long double);
extern long double truncl(long double);
extern long double nearbyintl(long double);
double test1(double x)
{
return rint(x);
}
long int test11(double x)
{
return lrint(x);
}
long long int test12(double x)
{
return llrint(x);
}
double test2(double x)
{
return floor(x);
}
double test3(double x)
{
return ceil(x);
}
double test4(double x)
{
return trunc(x);
}
double test5(double x)
{
return nearbyint(x);
}
float test1f(float x)
{
return rintf(x);
}
long int test11f(float x)
{
return lrintf(x);
}
long long int test12f(float x)
{
return llrintf(x);
}
float test2f(float x)
{
return floorf(x);
}
float test3f(float x)
{
return ceilf(x);
}
float test4f(float x)
{
return truncf(x);
}
float test5f(float x)
{
return nearbyintf(x);
}
long double test1l(long double x)
{
return rintl(x);
}
long int test11l(long double x)
{
return lrintl(x);
}
long long int test12l(long double x)
{
return llrintl(x);
}
long double test2l(long double x)
{
return floorl(x);
}
long double test3l(long double x)
{
return ceill(x);
}
long double test4l(long double x)
{
return truncl(x);
}
long double test5l(long double x)
{
return nearbyintl(x);
}
|
