diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/jit.c | 6 |
1 files changed, 2 insertions, 4 deletions
| @@ -397,7 +397,7 @@ get_type (jit_function_t func, jit_value_t val) | |||
| 397 | ~VALMASK); | 397 | ~VALMASK); |
| 398 | return jit_insn_and (func, val, mask); | 398 | return jit_insn_and (func, val, mask); |
| 399 | #else /* USE_LSB_TAG */ | 399 | #else /* USE_LSB_TAG */ |
| 400 | jit_value_t shift = jit_value_create_nint_constant (func, jit_type_uint, | 400 | jit_value_t shift = jit_value_create_nint_constant (func, jit_type_void_ptr, |
| 401 | VALBITS); | 401 | VALBITS); |
| 402 | return jit_insn_ushr (func, val, shift); | 402 | return jit_insn_ushr (func, val, shift); |
| 403 | #endif /* not USE_LSB_TAG */ | 403 | #endif /* not USE_LSB_TAG */ |
| @@ -755,8 +755,7 @@ compile_wrong_type_argument (jit_function_t func, jit_label_t *label, | |||
| 755 | jit_insn_label (func, label); | 755 | jit_insn_label (func, label); |
| 756 | jit_insn_call_native (func, "wrong_type_argument", | 756 | jit_insn_call_native (func, "wrong_type_argument", |
| 757 | (void *) wrong_type_argument, | 757 | (void *) wrong_type_argument, |
| 758 | /* FIXME incorrect signature. */ | 758 | specbind_signature, args, 2, |
| 759 | binary_signature, args, 2, | ||
| 760 | JIT_CALL_NORETURN); | 759 | JIT_CALL_NORETURN); |
| 761 | } | 760 | } |
| 762 | 761 | ||
| @@ -1625,7 +1624,6 @@ compile (ptrdiff_t bytestr_length, unsigned char *bytestr_data, | |||
| 1625 | args[2] = POP; | 1624 | args[2] = POP; |
| 1626 | args[0] = POP; | 1625 | args[0] = POP; |
| 1627 | 1626 | ||
| 1628 | /* FIXME this lies about the signature. */ | ||
| 1629 | jit_value_t result = jit_insn_call_native (func, "internal_catch", | 1627 | jit_value_t result = jit_insn_call_native (func, "internal_catch", |
| 1630 | internal_catch, | 1628 | internal_catch, |
| 1631 | internal_catch_signature, | 1629 | internal_catch_signature, |