target/ppc/fpu_helper.c

1669                    ppc_vsr_t *xa, ppc_vsr_t *xb)                             \
1679         t.fld = tp##_##op(xa->fld, xb->fld, &tstat);                         \
1709                     ppc_vsr_t *xt, ppc_vsr_t *xa, ppc_vsr_t *xb)  in helper_xsaddqp()  argument
1722     t.f128 = float128_add(xa->f128, xb->f128, &tstat);  in helper_xsaddqp()
1745                  ppc_vsr_t *xa, ppc_vsr_t *xb)                               \
1755         t.fld = tp##_mul(xa->fld, xb->fld, &tstat);                          \
1782                     ppc_vsr_t *xt, ppc_vsr_t *xa, ppc_vsr_t *xb)  in helper_xsmulqp()  argument
1794     t.f128 = float128_mul(xa->f128, xb->f128, &tstat);  in helper_xsmulqp()
1816                  ppc_vsr_t *xa, ppc_vsr_t *xb)                                \
1826         t.fld = tp##_div(xa->fld, xb->fld, &tstat);                           \
1856                     ppc_vsr_t *xt, ppc_vsr_t *xa, ppc_vsr_t *xb)  in helper_xsdivqp()  argument
1868     t.f128 = float128_div(xa->f128, xb->f128, &tstat);  in helper_xsdivqp()
2024                  ppc_vsr_t *xa, ppc_vsr_t *xb)                          \
2031         if (unlikely(tp##_is_infinity(xa->fld) ||                       \
2037             int e_a = ppc_##tp##_get_unbiased_exp(xa->fld);             \
2040             if (unlikely(tp##_is_any_nan(xa->fld) ||                    \
2045             } else if (!tp##_is_zero(xa->fld) &&                        \
2231                 ppc_vsr_t *xa, ppc_vsr_t *xb)                                 \
2239         r = tp##_##cmp(xb->fld, xa->fld, &env->fp_status);                    \
2241         r = tp##_##cmp##_quiet(xb->fld, xa->fld, &env->fp_status);            \
2269                        ppc_vsr_t *xa, ppc_vsr_t *xb)  in helper_xscmpexpdp()  argument
2274     exp_a = extract64(xa->VsrD(0), 52, 11);  in helper_xscmpexpdp()
2277     if (unlikely(float64_is_any_nan(xa->VsrD(0)) ||  in helper_xscmpexpdp()
2298                        ppc_vsr_t *xa, ppc_vsr_t *xb)  in helper_xscmpexpqp()  argument
2303     exp_a = extract64(xa->VsrD(0), 48, 15);  in helper_xscmpexpqp()
2306     if (unlikely(float128_is_any_nan(xa->f128) ||  in helper_xscmpexpqp()
2326 static inline void do_scalar_cmp(CPUPPCState *env, ppc_vsr_t *xa, ppc_vsr_t *xb,  in do_scalar_cmp()  argument
2334     switch (float64_compare(xa->VsrD(0), xb->VsrD(0), &env->fp_status)) {  in do_scalar_cmp()
2347         if (float64_is_signaling_nan(xa->VsrD(0), &env->fp_status) ||  in do_scalar_cmp()
2353         } else if (float64_is_quiet_nan(xa->VsrD(0), &env->fp_status) ||  in do_scalar_cmp()
2379 void helper_xscmpodp(CPUPPCState *env, uint32_t opcode, ppc_vsr_t *xa,  in helper_xscmpodp()  argument
2382     do_scalar_cmp(env, xa, xb, BF(opcode), true);  in helper_xscmpodp()
2385 void helper_xscmpudp(CPUPPCState *env, uint32_t opcode, ppc_vsr_t *xa,  in helper_xscmpudp()  argument
2388     do_scalar_cmp(env, xa, xb, BF(opcode), false);  in helper_xscmpudp()
2391 static inline void do_scalar_cmpq(CPUPPCState *env, ppc_vsr_t *xa,  in do_scalar_cmpq()  argument
2399     switch (float128_compare(xa->f128, xb->f128, &env->fp_status)) {  in do_scalar_cmpq()
2412         if (float128_is_signaling_nan(xa->f128, &env->fp_status) ||  in do_scalar_cmpq()
2418         } else if (float128_is_quiet_nan(xa->f128, &env->fp_status) ||  in do_scalar_cmpq()
2444 void helper_xscmpoqp(CPUPPCState *env, uint32_t opcode, ppc_vsr_t *xa,  in helper_xscmpoqp()  argument
2447     do_scalar_cmpq(env, xa, xb, BF(opcode), true);  in helper_xscmpoqp()
2450 void helper_xscmpuqp(CPUPPCState *env, uint32_t opcode, ppc_vsr_t *xa,  in helper_xscmpuqp()  argument
2453     do_scalar_cmpq(env, xa, xb, BF(opcode), false);  in helper_xscmpuqp()
2466                    ppc_vsr_t *xa, ppc_vsr_t *xb)                              \
2472         t.fld = tp##_##op(xa->fld, xb->fld, &env->fp_status);                 \
2473         if (unlikely(tp##_is_signaling_nan(xa->fld, &env->fp_status) ||       \
2492                    ppc_vsr_t *xt, ppc_vsr_t *xa, ppc_vsr_t *xb)               \
2500         first = tp##_le_quiet(xb->fld, xa->fld, &env->fp_status);             \
2502         first = tp##_lt_quiet(xa->fld, xb->fld, &env->fp_status);             \
2506         t.fld = xa->fld;                                                      \
2524                    ppc_vsr_t *xt, ppc_vsr_t *xa, ppc_vsr_t *xb)               \
2529     if (unlikely(float64_is_any_nan(xa->VsrD(0)))) {                          \
2530         if (float64_is_signaling_nan(xa->VsrD(0), &env->fp_status)) {         \
2533         t.VsrD(0) = xa->VsrD(0);                                              \
2539     } else if (float64_is_zero(xa->VsrD(0)) &&                                \
2542             if (!float64_is_neg(xa->VsrD(0)) ||                               \
2549             if (float64_is_neg(xa->VsrD(0)) ||                                \
2557                !float64_lt(xa->VsrD(0), xb->VsrD(0), &env->fp_status)) ||     \
2559                float64_lt(xa->VsrD(0), xb->VsrD(0), &env->fp_status))) {      \
2560         t.VsrD(0) = xa->VsrD(0);                                              \
2589                      ppc_vsr_t *xa, ppc_vsr_t *xb)                        \
2600         if (unlikely(tp##_is_any_nan(xa->fld) ||                          \
2602             if (tp##_is_signaling_nan(xa->fld, &env->fp_status) ||        \
2612             if (tp##_##cmp(xb->fld, xa->fld, &env->fp_status) == exp) {   \
3425                     ppc_vsr_t *xt, ppc_vsr_t *xa, ppc_vsr_t *xb)  in helper_xssubqp()  argument
3438     t.f128 = float128_sub(xa->f128, xb->f128, &tstat);  in helper_xssubqp()