target/m68k: fix FPSR quotient byte for frem instruction
The FPSR quotient byte should be set to the value of the quotient and not the result. Manually calculate the quotient in the frem helper in round to nearest even mode (note this is different from the quotient calculated internally for fmod), and use it to set the quotient byte accordingly. Signed-off-by: Mark Cave-Ayland <mark.cave-ayland@ilande.co.uk> Fixes: https://gitlab.com/qemu-project/qemu/-/issues/1314 Reviewed-by: Richard Henderson <richard.henderson@linaro.org> Message-Id: <20230114232959.118224-5-mark.cave-ayland@ilande.co.uk> Signed-off-by: Laurent Vivier <laurent@vivier.eu>
This commit is contained in:
parent
ad6dae3b33
commit
1a282f60a9
@ -538,18 +538,27 @@ void HELPER(fmod)(CPUM68KState *env, FPReg *res, FPReg *val0, FPReg *val1)
|
||||
|
||||
void HELPER(frem)(CPUM68KState *env, FPReg *res, FPReg *val0, FPReg *val1)
|
||||
{
|
||||
uint32_t quotient;
|
||||
int sign;
|
||||
FPReg fp_quot;
|
||||
floatx80 fp_rem;
|
||||
|
||||
res->d = floatx80_rem(val1->d, val0->d, &env->fp_status);
|
||||
fp_rem = floatx80_rem(val1->d, val0->d, &env->fp_status);
|
||||
if (!floatx80_is_any_nan(fp_rem)) {
|
||||
float_status fp_status = { };
|
||||
uint32_t quotient;
|
||||
int sign;
|
||||
|
||||
if (floatx80_is_any_nan(res->d)) {
|
||||
return;
|
||||
/* Calculate quotient directly using round to nearest mode */
|
||||
set_float_rounding_mode(float_round_nearest_even, &fp_status);
|
||||
set_floatx80_rounding_precision(
|
||||
get_floatx80_rounding_precision(&env->fp_status), &fp_status);
|
||||
fp_quot.d = floatx80_div(val1->d, val0->d, &fp_status);
|
||||
|
||||
sign = extractFloatx80Sign(fp_quot.d);
|
||||
quotient = floatx80_to_int32(floatx80_abs(fp_quot.d), &env->fp_status);
|
||||
make_quotient(env, sign, quotient);
|
||||
}
|
||||
|
||||
sign = extractFloatx80Sign(res->d);
|
||||
quotient = floatx80_to_int32(floatx80_abs(res->d), &env->fp_status);
|
||||
make_quotient(env, sign, quotient);
|
||||
res->d = fp_rem;
|
||||
}
|
||||
|
||||
void HELPER(fgetexp)(CPUM68KState *env, FPReg *res, FPReg *val)
|
||||
|
Loading…
Reference in New Issue
Block a user