*** 115,125 ****
  P5 = 4.13813679705723846039e-08;        /* 0x3E663769, 0x72BEA4D0 */
  /* INDENT ON */
  
  double
  __k_cexp(double x, int *n) {
!         double hi, lo, c, t;
          int k, xsb;
          unsigned hx, lx;
  
          hx = HI_WORD(x);        /* high word of x */
          lx = LO_WORD(x);        /* low word of x */
--- 115,125 ----
  P5 = 4.13813679705723846039e-08;        /* 0x3E663769, 0x72BEA4D0 */
  /* INDENT ON */
  
  double
  __k_cexp(double x, int *n) {
!         double hi = 0.0L, lo = 0.0L, c, t;
          int k, xsb;
          unsigned hx, lx;
  
          hx = HI_WORD(x);        /* high word of x */
          lx = LO_WORD(x);        /* low word of x */