1  /* { dg-do compile } */
       2  /* { dg-options "-O2 -mfancy-math-387 -mtune=generic" } */
       3  /* { dg-final { scan-assembler "fldpi" } } */
       4  /* { dg-require-effective-target large_long_double } */
       5  
       6  long double atanl (long double);
       7  
       8  long double pi()
       9  {
      10    return 4.0 * atanl (1.0);
      11  }
      12