1 /* Copyright (C) 2004  Free Software Foundation.
2 
3    Verify that integral FP expressions are optimized.
4 
5    Written by Kaveh Ghazi, 2004-03-16.  */
6 
7 /* { dg-do link } */
8 /* We need -ffinite-math-only so that we can fold "foo != foo", where
9    foo is a floating point expression.  We need -fno-math-errno so
10    that various math functions are marked const/pure and can be
11    folded.  */
12 /* { dg-options "-ffinite-math-only -fno-math-errno" } */
13 /* { dg-require-effective-target c99_runtime } */
14 /* { dg-skip-if "" { *-*-* } { "-O0" } { "" } } */
15 
16 extern int link_failure (int);
17 
18 /* Test that the various FP truncation builtins detect integral
19    arguments.  */
20 #define CHECK_FN(MATHFN) \
21  if (__builtin_##MATHFN(i1) != i1) link_failure (__LINE__); \
22  if (__builtin_##MATHFN##f(i1) != i1) link_failure (__LINE__); \
23  if (__builtin_##MATHFN##l(i1) != i1) link_failure (__LINE__);
24 
25 #define CHECK_FN_RET(MATHFN, RET) \
26  if (__builtin_##MATHFN(i1) != (RET)(double)i1) link_failure (__LINE__); \
27  if (__builtin_##MATHFN##f(i1) != (RET)(float)i1) link_failure (__LINE__); \
28  if (__builtin_##MATHFN##l(i1) != (RET)(long double)i1) link_failure (__LINE__);
29 
30   /* Check that various other integral expressions are detected.  */
31 #define CHECK_EXPR(EXPR,NAME) \
32  if (__builtin_ceill(EXPR) != (EXPR)) link_failure (__LINE__); \
33  if (__builtin_lroundl(EXPR) != (long)(long double)(EXPR)) link_failure (__LINE__);
34 
test(int i1,int i2)35 void __attribute__ ((__noinline__)) test (int i1, int i2)
36 {
37   CHECK_FN(ceil);
38   CHECK_FN(floor);
39   CHECK_FN(nearbyint);
40   CHECK_FN(rint);
41   CHECK_FN(round);
42   CHECK_FN(trunc);
43   CHECK_FN_RET(lround, long);
44   CHECK_FN_RET(llround, long long);
45   CHECK_FN_RET(lrint, long);
46   CHECK_FN_RET(llrint, long long);
47   CHECK_FN_RET(lceil, long);
48   CHECK_FN_RET(llceil, long long);
49   CHECK_FN_RET(lfloor, long);
50   CHECK_FN_RET(llfloor, long long);
51 
52   CHECK_EXPR (5.0, REAL_CST);
53   CHECK_EXPR (5.0F, REAL_CSTf);
54   CHECK_EXPR (5.0L, REAL_CSTl);
55   CHECK_EXPR ((double)i1, FLOAT_EXPR);
56   CHECK_EXPR ((float)i1, FLOAT_EXPRf);
57   CHECK_EXPR ((long double)i1, FLOAT_EXPRl);
58   CHECK_EXPR (__builtin_fabs(i1), ABS_EXPR);
59   CHECK_EXPR (__builtin_fabsf(i1), ABS_EXPRf);
60   CHECK_EXPR (__builtin_fabsl(i1), ABS_EXPRl);
61   CHECK_EXPR (((void)i1,(double)i2), COMPOUND_EXPR);
62   CHECK_EXPR ((double)i1+i2, PLUS_EXPR);
63   CHECK_EXPR ((double)i1-i2, MINUS_EXPR);
64   CHECK_EXPR ((double)i1*i2, MULT_EXPR);
65 }
66 
main(void)67 int main (void)
68 {
69   test (1, 2);
70   return 0;
71 }
72