gonzui

t2ex

bsd_source/lib/libc/src_bsd/math/e_pow.c - 11.5KB - 311 lines

214:             else {k=0;n+=1;ix -= 0x00100000;}
215:             SET_HIGH_WORD(ax,ix);
216: 
224:             t_h = zero;
225:             SET_HIGH_WORD(t_h,((ix>>1)|0x20000000)+0x00080000+(k<<18));
226:             t_l = ax - (t_h-bp[k]);
281:             t = zero;
282:             SET_HIGH_WORD(t,n&~(0x000fffff>>k));
283:             n = ((n&0x000fffff)|0x00100000)>>(20-k);
299:         if((j>>20)<=0) z = scalbn(z,n);        /* subnormal output */
300:         else SET_HIGH_WORD(z,j);
301:         return s*z;