1  /* { dg-do compile } */
       2  /* { dg-options "-Ofast -fdump-tree-optimized" } */
       3  /* { dg-require-effective-target c99_runtime } */
       4  
       5  extern float sinhf (float);
       6  extern float tanhf (float);
       7  extern double sinh (double);
       8  extern double tanh (double);
       9  extern long double sinhl (long double);
      10  extern long double tanhl (long double);
      11  
      12  double __attribute__ ((noinline))
      13  tanhbysinh_ (double x)
      14  {
      15      return tanh (x) / sinh (x);
      16  }
      17  
      18  float __attribute__ ((noinline))
      19  tanhbysinhf_ (float x)
      20  {
      21      return tanhf (x) / sinhf (x);
      22  }
      23  
      24  long double __attribute__ ((noinline))
      25  tanhbysinhl_ (long double x)
      26  {
      27      return tanhl (x) / sinhl (x);
      28  }
      29  
      30  
      31  /* There must be no calls to sinh or atanh */
      32  /* There must be calls to cosh */
      33  /* {dg-final { scan-tree-dump-not "sinh " "optimized" } } */
      34  /* {dg-final { scan-tree-dump-not "tanh " "optimized" }} */
      35  /* {dg-final { scan-tree-dump-not "sinhf " "optimized" } } */
      36  /* {dg-final { scan-tree-dump-not "tanhf " "optimized" }} */
      37  /* {dg-final { scan-tree-dump-not "sinhl " "optimized" } } */
      38  /* {dg-final { scan-tree-dump-not "tanhl " "optimized" }} */
      39  /* { dg-final { scan-tree-dump "cosh " "optimized" } } */
      40  /* { dg-final { scan-tree-dump "coshf " "optimized" } } */
      41  /* { dg-final { scan-tree-dump "coshl " "optimized" } } */