1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 03:30:27 +02:00

Simplify API for loading call arguments

This commit is contained in:
Andy Wingo 2019-04-18 17:47:01 +02:00
parent 668196aa27
commit 0be4f7a2a1
183 changed files with 641 additions and 1498 deletions

View file

@ -4,13 +4,7 @@ static void
run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size)
{
jit_begin(j, arena_base, arena_size);
const jit_arg_abi_t abi[] = { JIT_ARG_ABI_INTMAX };
jit_arg_t args[1];
const jit_anyreg_t regs[] = { { .gpr=JIT_R0 } };
jit_receive(j, 1, abi, args);
jit_load_args(j, 1, abi, args, regs);
jit_load_args_1(j, jit_operand_gpr (JIT_OPERAND_ABI_INTMAX, JIT_R0));
jit_rshi_u(j, JIT_R0, JIT_R0, 31);
jit_retr(j, JIT_R0);