gonzui

t2ex

bsd_source/lib/libc/src_bsd/math/s_nextafter.c - 2.8KB - 89 lines

43:         if((ix|lx)==0) {                       /* x == 0 */
44:             INSERT_WORDS(x,hy&0x80000000,1);   /* return +-minsubnormal */
45:             y = x*x;
69:             if(y!=x) {         /* raise underflow flag */
70:                 INSERT_WORDS(y,hx,lx);
71:                 return y;
73:         }
74:         INSERT_WORDS(x,hx,lx);
75:         return x;