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
6long double atanl (long double);
7
8long double pi()
9{
10 return 4.0 * atanl (1.0);
11}
12
13