29,36c29,30
< /* Please send bug reports to
< David M. Gay
< Bell Laboratories, Room 2C-463
< 600 Mountain Avenue
< Murray Hill, NJ 07974-0636
< U.S.A.
< dmg@bell-labs.com
< */
---
> /* Please send bug reports to David M. Gay (dmg at acm dot org,
> * with " at " changed at "@" and " dot " changed to "."). */
65,69c59
< #ifdef Sudden_Underflow
< static FPI fpi = { 113, 1-16383-113+1, 32766 - 16383 - 113 + 1, 1, 1 };
< #else
< static FPI fpi = { 113, 1-16383-113+1, 32766 - 16383 - 113 + 1, 1, 0 };
< #endif
---
> static FPI fpi = { 113, 1-16383-113+1, 32766 - 16383 - 113 + 1, 1, SI };
103,104c93,96
< L[_0] = 0x7fffffff;
< L[_1] = L[_2] = L[_3] = (ULong)-1;
---
> L[0] = ld_QNAN0;
> L[1] = ld_QNAN1;
> L[2] = ld_QNAN2;
> L[3] = ld_QNAN3;