int fsqrts(void *frD, void *frB) { FP_DECL_D(B); FP_DECL_D(R); int ret = 0; #ifdef DEBUG printk("%s: %p %p %p %p\n", __FUNCTION__, frD, frB); #endif __FP_UNPACK_D(B, frB); #ifdef DEBUG printk("B: %ld %lu %lu %ld (%ld)\n", B_s, B_f1, B_f0, B_e, B_c); #endif if (B_s && B_c != FP_CLS_ZERO) ret |= EFLAG_VXSQRT; if (B_c == FP_CLS_NAN) ret |= EFLAG_VXSNAN; FP_SQRT_D(R, B); #ifdef DEBUG printk("R: %ld %lu %lu %ld (%ld)\n", R_s, R_f1, R_f0, R_e, R_c); #endif return (ret | __FP_PACK_DS(frD, R)); }
int fsqrts(void *frD, void *frB) { FP_DECL_D(B); FP_DECL_D(R); FP_DECL_EX; #ifdef DEBUG printk("%s: %p %p %p %p\n", __func__, frD, frB); #endif FP_UNPACK_DP(B, frB); #ifdef DEBUG printk("B: %ld %lu %lu %ld (%ld)\n", B_s, B_f1, B_f0, B_e, B_c); #endif if (B_s && B_c != FP_CLS_ZERO) FP_SET_EXCEPTION(EFLAG_VXSQRT); if (B_c == FP_CLS_NAN) FP_SET_EXCEPTION(EFLAG_VXSNAN); FP_SQRT_D(R, B); #ifdef DEBUG printk("R: %ld %lu %lu %ld (%ld)\n", R_s, R_f1, R_f0, R_e, R_c); #endif __FP_PACK_DS(frD, R); return FP_CUR_EXCEPTIONS; }
double __sqrtdf2(double a) { FP_DECL_EX; FP_DECL_D(A); FP_DECL_D(R); double r; FP_INIT_ROUNDMODE; FP_UNPACK_D(A, a); FP_SQRT_D(R, A); FP_PACK_D(r, R); FP_HANDLE_EXCEPTIONS; return r; }
void fsqrtd(void *ft, void *fa) { FP_DECL_D(A); FP_DECL_D(R); FP_DECL_EX; FP_UNPACK_DP(A, fa); FP_SQRT_D(R, A); FP_PACK_DP(ft, R); __FPU_FPCSR |= FP_CUR_EXCEPTIONS; }