mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-28 22:10:29 +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

4
tests/stxr_d.c
View file

@ -7,13 +7,13 @@ run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size)
{
jit_begin(j, arena_base, arena_size);
jit_load_args_3(j, jit_operand_gpr (JIT_OPERAND_ABI_POINTER, JIT_R0),
jit_operand_gpr (JIT_OPERAND_ABI_INTMAX, JIT_R2),
jit_operand_gpr (JIT_OPERAND_ABI_WORD, JIT_R2),
jit_operand_fpr (JIT_OPERAND_ABI_DOUBLE, JIT_F0));
jit_stxr_d(j, JIT_R0, JIT_R2, JIT_F0);
jit_ret(j);
void (*f)(void*, intmax_t, double) = jit_end(j, NULL);
void (*f)(void*, jit_word_t, double) = jit_end(j, NULL);
ASSERT(data[0] == -1.0);
ASSERT(data[1] == 0.0);