blob: 0db7976a4801c4356a8297eb1504f25c571179b9 (
plain)
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
|
/* { dg-do link } */
/* { dg-options "-O2 -ffast-math" } */
/* { dg-add-options c99_runtime } */
#include "builtins-config.h"
void link_error (void);
extern long lround(double);
extern long lrint(double);
extern long long llround(double);
extern long long llrint(double);
extern long lroundf(float);
extern long lrintf(float);
extern long long llroundf(float);
extern long long llrintf(float);
extern long lroundl(long double);
extern long lrintl(long double);
extern long long llroundl(long double);
extern long long llrintl(long double);
void test(double x)
{
#ifdef HAVE_C99_RUNTIME
if (sizeof(long) != sizeof(long long))
return;
if (__builtin_lceil(x) != __builtin_llceil(x))
link_error();
if (__builtin_lfloor(x) != __builtin_llfloor(x))
link_error();
if (lround(x) != llround(x))
link_error();
if (lrint(x) != llrint(x))
link_error();
#endif
}
void testf(float x)
{
#ifdef HAVE_C99_RUNTIME
if (sizeof(long) != sizeof(long long))
return;
if (__builtin_lceilf(x) != __builtin_llceilf(x))
link_error();
if (__builtin_lfloorf(x) != __builtin_llfloorf(x))
link_error();
if (lroundf(x) != llroundf(x))
link_error();
if (lrintf(x) != llrintf(x))
link_error();
#endif
}
void testl(long double x)
{
#ifdef HAVE_C99_RUNTIME
if (sizeof(long) != sizeof(long long))
return;
if (__builtin_lceill(x) != __builtin_llceill(x))
link_error();
if (__builtin_lfloorl(x) != __builtin_llfloorl(x))
link_error();
if (lroundl(x) != llroundl(x))
link_error();
if (lrintl(x) != llrintl(x))
link_error();
#endif
}
int main()
{
test(0.0);
testf(0.0);
testl(0.0);
return 0;
}
|
