*** 70,79 ****
--- 70,80 ----
  
  long double
  tanhl(long double x) {
          long double t, y, z;
          int signx;
+         volatile long double dummy;
  
          if (isnanl(x))
                  return (x + x);         /* x is NaN */
          signx = signbitl(x);
          t = fabsl(x);
*** 84,94 ****
                  else if (t > small) {
                          y = expm1l(-t - t);
                          z = -y / (y + two);
                  } else {
  #ifndef lint
!                         volatile long double dummy = t + big;
                                                          /* inexact if t != 0 */
  #endif
                          return (x);
                  }
          } else if (!finitel(t))
--- 85,95 ----
                  else if (t > small) {
                          y = expm1l(-t - t);
                          z = -y / (y + two);
                  } else {
  #ifndef lint
!                         dummy = t + big;
                                                          /* inexact if t != 0 */
  #endif
                          return (x);
                  }
          } else if (!finitel(t))