mirror of
https://github.com/xemu-project/xemu.git
synced 2024-11-23 19:49:43 +00:00
target/s390x: Use unwind data for helper_nc
Reviewed-by: Aurelien Jarno <aurelien@aurel32.net> Signed-off-by: Richard Henderson <rth@twiddle.net>
This commit is contained in:
parent
a5cfc2235b
commit
349d078a26
@ -119,23 +119,28 @@ static void fast_memmove(CPUS390XState *env, uint64_t dest, uint64_t src,
|
||||
}
|
||||
|
||||
/* and on array */
|
||||
uint32_t HELPER(nc)(CPUS390XState *env, uint32_t l, uint64_t dest,
|
||||
uint64_t src)
|
||||
static uint32_t do_helper_nc(CPUS390XState *env, uint32_t l, uint64_t dest,
|
||||
uint64_t src, uintptr_t ra)
|
||||
{
|
||||
int i;
|
||||
unsigned char x;
|
||||
uint32_t cc = 0;
|
||||
uint32_t i;
|
||||
uint8_t c = 0;
|
||||
|
||||
HELPER_LOG("%s l %d dest %" PRIx64 " src %" PRIx64 "\n",
|
||||
__func__, l, dest, src);
|
||||
|
||||
for (i = 0; i <= l; i++) {
|
||||
x = cpu_ldub_data(env, dest + i) & cpu_ldub_data(env, src + i);
|
||||
if (x) {
|
||||
cc = 1;
|
||||
}
|
||||
cpu_stb_data(env, dest + i, x);
|
||||
uint8_t x = cpu_ldub_data_ra(env, src + i, ra);
|
||||
x &= cpu_ldub_data_ra(env, dest + i, ra);
|
||||
c |= x;
|
||||
cpu_stb_data_ra(env, dest + i, x, ra);
|
||||
}
|
||||
return cc;
|
||||
return c != 0;
|
||||
}
|
||||
|
||||
uint32_t HELPER(nc)(CPUS390XState *env, uint32_t l, uint64_t dest,
|
||||
uint64_t src)
|
||||
{
|
||||
return do_helper_nc(env, l, dest, src, GETPC());
|
||||
}
|
||||
|
||||
/* xor on array */
|
||||
@ -1213,8 +1218,8 @@ uint32_t HELPER(ex)(CPUS390XState *env, uint32_t cc, uint64_t v1,
|
||||
get_address(env, 0, b2, d2));
|
||||
break;
|
||||
case 0x400:
|
||||
cc = helper_nc(env, l, get_address(env, 0, b1, d1),
|
||||
get_address(env, 0, b2, d2));
|
||||
cc = do_helper_nc(env, l, get_address(env, 0, b1, d1),
|
||||
get_address(env, 0, b2, d2), 0);
|
||||
break;
|
||||
case 0x500:
|
||||
cc = helper_clc(env, l, get_address(env, 0, b1, d1),
|
||||
|
@ -3048,7 +3048,6 @@ static ExitStatus op_nabsf128(DisasContext *s, DisasOps *o)
|
||||
static ExitStatus op_nc(DisasContext *s, DisasOps *o)
|
||||
{
|
||||
TCGv_i32 l = tcg_const_i32(get_field(s->fields, l1));
|
||||
potential_page_fault(s);
|
||||
gen_helper_nc(cc_op, cpu_env, l, o->addr1, o->in2);
|
||||
tcg_temp_free_i32(l);
|
||||
set_cc_static(s);
|
||||
|
Loading…
Reference in New Issue
Block a user