1 /* { dg-do link } */
2 /* { dg-require-effective-target ia32 } */
3 /* { dg-options "-O2 -march=pentiumpro -fgnu89-inline" } */
4 
5 extern __inline  double
__expm1(double __x)6 __expm1 (double __x)
7 {
8   double __temp;
9   __temp = 1.0;
10   return __temp;
11 }
12 extern __inline  double
__sgn1(double __x)13 __sgn1 (double __x)
14 {
15   return __x >= 0.0 ? 1.0 : -1.0;
16 }
17 double
tanh(double __x)18 tanh (double __x)
19 {
20   return  __expm1 (__x) * __sgn1 (-__x);
21 }
22 int
main()23 main ()
24 {
25   return tanh (3.45) != 0;
26 }
27