mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2026-10-12 02:31:41 +00:00
Code Issues 1 Releases Wiki Activity

Add cffi support to x32 (#1911)

Browse Source
This commit is contained in:
Alex Alejandre
2026-10-08 08:07:21 -05:00
committed by GitHub
parent 8357f71519
commit 246951c809
1 changed files with 12 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/core/ffi.c
+12 -2
View File
@@ -53,7 +53,7 @@
#if defined(JANET_WINDOWS) && (defined(__x86_64__) || defined(_M_X64))
#define JANET_FFI_WIN64_ENABLED
#endif
#if (defined(__x86_64__) || defined(_M_X64)) && !defined(__ILP32__) && !defined(JANET_WINDOWS)
#if (defined(__x86_64__) || defined(_M_X64)) && !defined(JANET_WINDOWS)
#define JANET_FFI_SYSV64_ENABLED
#endif
#if (defined(__aarch64__) || defined(_M_ARM64)) && !defined(JANET_WINDOWS)
@@ -1217,8 +1217,14 @@ static Janet janet_ffi_sysv64(JanetFFISignature *signature, void *function_point
sysv64_intsse_return intsse_return;
} retu;
uint64_t pair[2];
uint64_t regs[6];
double fp_regs[8];
#ifdef __ILP32__
/* x32 pointers fill only the low half of a slot and must be zero-extended.
* Left behind compiler flag because 64b doesn't need to zero unused parts */
uint64_t regs[6] = {0};
#else
uint64_t regs[6];
#endif
JanetFFIWordSpec ret_spec = signature->ret.spec;
void *ret_mem = &retu.int_return;
if (ret_spec == JANET_SYSV64_MEMORY) {
@@ -1233,6 +1239,10 @@ static Janet janet_ffi_sysv64(JanetFFISignature *signature, void *function_point
uint64_t *stack = __builtin_alloca_with_align(sizeof(uint64_t) * signature->stack_count, 128);
#else
uint64_t *stack = alloca(sizeof(uint64_t) * signature->stack_count);
#endif
/* x32 pointers fill only the low half of a slot and must be zero-extended */
#ifdef __ILP32__
memset(stack, 0, sizeof(uint64_t) * signature->stack_count);
#endif
for (uint32_t i = 0; i < signature->arg_count; i++) {
uint64_t *to;