mirror of https://github.com/xemu-project/xemu.git
target/sparc: Use i128 for FADDq, FSUBq, FMULq, FDIVq
Signed-off-by: Richard Henderson <richard.henderson@linaro.org> Tested-by: Mark Cave-Ayland <mark.cave-ayland@ilande.co.uk> Acked-by: Mark Cave-Ayland <mark.cave-ayland@ilande.co.uk> Message-Id: <20231103173841.33651-8-richard.henderson@linaro.org>
This commit is contained in:
parent
e41716be4d
commit
16bedf89c1
|
@ -98,22 +98,22 @@ target_ulong helper_check_ieee_exceptions(CPUSPARCState *env)
|
|||
return do_check_ieee_exceptions(env, GETPC());
|
||||
}
|
||||
|
||||
#define F_HELPER(name, p) void helper_f##name##p(CPUSPARCState *env)
|
||||
|
||||
#define F_BINOP(name) \
|
||||
#define F_BINOP(name) \
|
||||
float32 helper_f ## name ## s (CPUSPARCState *env, float32 src1, \
|
||||
float32 src2) \
|
||||
{ \
|
||||
return float32_ ## name (src1, src2, &env->fp_status); \
|
||||
} \
|
||||
float32 src2) \
|
||||
{ \
|
||||
return float32_ ## name (src1, src2, &env->fp_status); \
|
||||
} \
|
||||
float64 helper_f ## name ## d (CPUSPARCState * env, float64 src1,\
|
||||
float64 src2) \
|
||||
{ \
|
||||
return float64_ ## name (src1, src2, &env->fp_status); \
|
||||
} \
|
||||
F_HELPER(name, q) \
|
||||
{ \
|
||||
QT0 = float128_ ## name (QT0, QT1, &env->fp_status); \
|
||||
float64 src2) \
|
||||
{ \
|
||||
return float64_ ## name (src1, src2, &env->fp_status); \
|
||||
} \
|
||||
Int128 helper_f ## name ## q(CPUSPARCState * env, Int128 src1, \
|
||||
Int128 src2) \
|
||||
{ \
|
||||
return f128_ret(float128_ ## name (f128_in(src1), f128_in(src2), \
|
||||
&env->fp_status)); \
|
||||
}
|
||||
|
||||
F_BINOP(add);
|
||||
|
@ -168,7 +168,6 @@ void helper_fxtoq(CPUSPARCState *env, int64_t src)
|
|||
QT0 = int64_to_float128(src, &env->fp_status);
|
||||
}
|
||||
#endif
|
||||
#undef F_HELPER
|
||||
|
||||
/* floating point conversion */
|
||||
float32 helper_fdtos(CPUSPARCState *env, float64 src)
|
||||
|
|
|
@ -67,17 +67,16 @@ DEF_HELPER_FLAGS_1(fcmpeq_fcc2, TCG_CALL_NO_WG, tl, env)
|
|||
DEF_HELPER_FLAGS_1(fcmpeq_fcc3, TCG_CALL_NO_WG, tl, env)
|
||||
#endif
|
||||
DEF_HELPER_2(raise_exception, noreturn, env, int)
|
||||
#define F_HELPER_0_1(name) \
|
||||
DEF_HELPER_FLAGS_1(f ## name, TCG_CALL_NO_RWG, void, env)
|
||||
|
||||
DEF_HELPER_FLAGS_3(faddd, TCG_CALL_NO_RWG, f64, env, f64, f64)
|
||||
DEF_HELPER_FLAGS_3(fsubd, TCG_CALL_NO_RWG, f64, env, f64, f64)
|
||||
DEF_HELPER_FLAGS_3(fmuld, TCG_CALL_NO_RWG, f64, env, f64, f64)
|
||||
DEF_HELPER_FLAGS_3(fdivd, TCG_CALL_NO_RWG, f64, env, f64, f64)
|
||||
F_HELPER_0_1(addq)
|
||||
F_HELPER_0_1(subq)
|
||||
F_HELPER_0_1(mulq)
|
||||
F_HELPER_0_1(divq)
|
||||
|
||||
DEF_HELPER_FLAGS_3(faddq, TCG_CALL_NO_RWG, i128, env, i128, i128)
|
||||
DEF_HELPER_FLAGS_3(fsubq, TCG_CALL_NO_RWG, i128, env, i128, i128)
|
||||
DEF_HELPER_FLAGS_3(fmulq, TCG_CALL_NO_RWG, i128, env, i128, i128)
|
||||
DEF_HELPER_FLAGS_3(fdivq, TCG_CALL_NO_RWG, i128, env, i128, i128)
|
||||
|
||||
DEF_HELPER_FLAGS_3(fadds, TCG_CALL_NO_RWG, f32, env, f32, f32)
|
||||
DEF_HELPER_FLAGS_3(fsubs, TCG_CALL_NO_RWG, f32, env, f32, f32)
|
||||
|
@ -135,6 +134,5 @@ VIS_CMPHELPER(cmpeq)
|
|||
VIS_CMPHELPER(cmple)
|
||||
VIS_CMPHELPER(cmpne)
|
||||
#endif
|
||||
#undef F_HELPER_0_1
|
||||
#undef VIS_HELPER
|
||||
#undef VIS_CMPHELPER
|
||||
|
|
|
@ -4976,8 +4976,10 @@ static bool do_dddd(DisasContext *dc, arg_r_r_r *a,
|
|||
TRANS(PDIST, VIS1, do_dddd, a, gen_helper_pdist)
|
||||
|
||||
static bool do_env_qqq(DisasContext *dc, arg_r_r_r *a,
|
||||
void (*func)(TCGv_env))
|
||||
void (*func)(TCGv_i128, TCGv_env, TCGv_i128, TCGv_i128))
|
||||
{
|
||||
TCGv_i128 src1, src2;
|
||||
|
||||
if (gen_trap_ifnofpu(dc)) {
|
||||
return true;
|
||||
}
|
||||
|
@ -4986,12 +4988,11 @@ static bool do_env_qqq(DisasContext *dc, arg_r_r_r *a,
|
|||
}
|
||||
|
||||
gen_op_clear_ieee_excp_and_FTT();
|
||||
gen_op_load_fpr_QT0(QFPREG(a->rs1));
|
||||
gen_op_load_fpr_QT1(QFPREG(a->rs2));
|
||||
func(tcg_env);
|
||||
src1 = gen_load_fpr_Q(dc, a->rs1);
|
||||
src2 = gen_load_fpr_Q(dc, a->rs2);
|
||||
func(src1, tcg_env, src1, src2);
|
||||
gen_helper_check_ieee_exceptions(cpu_fsr, tcg_env);
|
||||
gen_op_store_QT0_fpr(QFPREG(a->rd));
|
||||
gen_update_fprs_dirty(dc, QFPREG(a->rd));
|
||||
gen_store_fpr_Q(dc, a->rd, src1);
|
||||
return advance_pc(dc);
|
||||
}
|
||||
|
||||
|
|
Loading…
Reference in New Issue