diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2018-09-09 19:10:36 +0300 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2018-09-09 19:10:36 +0300 |
| commit | a25a9896d51bbf340675713bc45d15e3846fb816 (patch) | |
| tree | da48b20a97c13662dade35a4106b5a2be421d0d8 | |
| parent | 9efa35eea067199a4cd0a773da6dd1304410daba (diff) | |
| download | emacs-feature/libjit.tar.gz | |
Minor type and signature fixes in jit.cfeature/libjit
* src/jit.c (get_type) [!USE_LSB_TAG]: Use jit_type_void_ptr
for 'shift'.
(compile_wrong_type_argument): Use the correct signature for
wrong_type_argument native calls.
| -rw-r--r-- | src/jit.c | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/src/jit.c b/src/jit.c index 6813f291de5..c6a1d199343 100644 --- a/src/jit.c +++ b/src/jit.c @@ -397,7 +397,7 @@ get_type (jit_function_t func, jit_value_t val) ~VALMASK); return jit_insn_and (func, val, mask); #else /* USE_LSB_TAG */ - jit_value_t shift = jit_value_create_nint_constant (func, jit_type_uint, + jit_value_t shift = jit_value_create_nint_constant (func, jit_type_void_ptr, VALBITS); return jit_insn_ushr (func, val, shift); #endif /* not USE_LSB_TAG */ @@ -755,8 +755,7 @@ compile_wrong_type_argument (jit_function_t func, jit_label_t *label, jit_insn_label (func, label); jit_insn_call_native (func, "wrong_type_argument", (void *) wrong_type_argument, - /* FIXME incorrect signature. */ - binary_signature, args, 2, + specbind_signature, args, 2, JIT_CALL_NORETURN); } @@ -1625,7 +1624,6 @@ compile (ptrdiff_t bytestr_length, unsigned char *bytestr_data, args[2] = POP; args[0] = POP; - /* FIXME this lies about the signature. */ jit_value_t result = jit_insn_call_native (func, "internal_catch", internal_catch, internal_catch_signature, |