mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-07 08:40:21 +02:00
Code Activity

Use jit_word_t for register-sized values instead of intmax_t

Browse source
This commit is contained in:
Andy Wingo 2019-04-26 15:00:29 +02:00
parent bab1f40b5e
commit e9d1567f7f
156 changed files with 322 additions and 323 deletions
Download patch file Download diff file Expand all files Collapse all files

6
tests/rshr_u.c
View file

@ -4,8 +4,8 @@ static void
run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size)
{
jit_begin(j, arena_base, arena_size);
jit_load_args_2(j, jit_operand_gpr (JIT_OPERAND_ABI_INTMAX, JIT_R0),
jit_operand_gpr (JIT_OPERAND_ABI_INTMAX, JIT_R1));
jit_load_args_2(j, jit_operand_gpr (JIT_OPERAND_ABI_WORD, JIT_R0),
jit_operand_gpr (JIT_OPERAND_ABI_WORD, JIT_R1));
jit_rshr_u(j, JIT_R0, JIT_R0, JIT_R1);
jit_retr(j, JIT_R0);
@ -13,7 +13,7 @@ run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size)
size_t size = 0;
void* ret = jit_end(j, &size);
intmax_t (*f)(intmax_t, intmax_t) = ret;
jit_word_t (*f)(jit_word_t, jit_word_t) = ret;
ASSERT(f(0xfe, 1) == 0x7f);
ASSERT(f(0x1fffc, 2) == 0x7fff);