gcc/testsuite/gcc.dg/builtins-61.c

   1 /* { dg-do compile } */
   2 /* { dg-options "-O -ffast-math -fdump-tree-optimized" } */
   3 /* { dg-require-effective-target c99_runtime } */
   4 /* { dg-require-effective-target libc_has_complex_functions } */
   5
   6 double test1 (double x)
   7 {
   8   return __real __builtin_cexp(x * (__extension__ 1.0iF));
   9 }
  10
  11 double test2(double x)
  12 {
  13   return __imag __builtin_cexp((__extension__ 1.0iF) * x);
  14 }
  15
  16 double test3(double x)
  17 {
  18   _Complex c = __builtin_cexp(x * (__extension__ 1.0iF));
  19   return __imag c + __real c;
  20 }
  21
  22 double test4(double x, double y)
  23 {
  24   _Complex c = __builtin_cexp(x);
  25   x = __builtin_exp (x);
  26   return x - __real c;
  27 }
  28
  29 /* { dg-final { scan-tree-dump "cexpi" "optimized" } } */
  30 /* { dg-final { scan-tree-dump "sin" "optimized" } } */
  31 /* { dg-final { scan-tree-dump "cos" "optimized" } } */
  32 /* { dg-final { scan-tree-dump "return 0.0" "optimized" } } */