mirror of
https://github.com/LuaJIT/LuaJIT.git
synced 2025-02-07 23:24:09 +00:00
FFI/ARM64/OSX: Fix vararg call handling.
Thanks to Igor Munkin.
This commit is contained in:
parent
fcdb246506
commit
521b367567
@ -334,7 +334,7 @@
|
|||||||
isfp = sz == 2*sizeof(float) ? 2 : 1;
|
isfp = sz == 2*sizeof(float) ? 2 : 1;
|
||||||
|
|
||||||
#define CCALL_HANDLE_REGARG \
|
#define CCALL_HANDLE_REGARG \
|
||||||
if (LJ_TARGET_IOS && isva) { \
|
if (LJ_TARGET_OSX && isva) { \
|
||||||
/* IOS: All variadic arguments are on the stack. */ \
|
/* IOS: All variadic arguments are on the stack. */ \
|
||||||
} else if (isfp) { /* Try to pass argument in FPRs. */ \
|
} else if (isfp) { /* Try to pass argument in FPRs. */ \
|
||||||
int n2 = ctype_isvector(d->info) ? 1 : \
|
int n2 = ctype_isvector(d->info) ? 1 : \
|
||||||
@ -345,10 +345,10 @@
|
|||||||
goto done; \
|
goto done; \
|
||||||
} else { \
|
} else { \
|
||||||
nfpr = CCALL_NARG_FPR; /* Prevent reordering. */ \
|
nfpr = CCALL_NARG_FPR; /* Prevent reordering. */ \
|
||||||
if (LJ_TARGET_IOS && d->size < 8) goto err_nyi; \
|
if (LJ_TARGET_OSX && d->size < 8) goto err_nyi; \
|
||||||
} \
|
} \
|
||||||
} else { /* Try to pass argument in GPRs. */ \
|
} else { /* Try to pass argument in GPRs. */ \
|
||||||
if (!LJ_TARGET_IOS && (d->info & CTF_ALIGN) > CTALIGN_PTR) \
|
if (!LJ_TARGET_OSX && (d->info & CTF_ALIGN) > CTALIGN_PTR) \
|
||||||
ngpr = (ngpr + 1u) & ~1u; /* Align to regpair. */ \
|
ngpr = (ngpr + 1u) & ~1u; /* Align to regpair. */ \
|
||||||
if (ngpr + n <= maxgpr) { \
|
if (ngpr + n <= maxgpr) { \
|
||||||
dp = &cc->gpr[ngpr]; \
|
dp = &cc->gpr[ngpr]; \
|
||||||
@ -356,7 +356,7 @@
|
|||||||
goto done; \
|
goto done; \
|
||||||
} else { \
|
} else { \
|
||||||
ngpr = maxgpr; /* Prevent reordering. */ \
|
ngpr = maxgpr; /* Prevent reordering. */ \
|
||||||
if (LJ_TARGET_IOS && d->size < 8) goto err_nyi; \
|
if (LJ_TARGET_OSX && d->size < 8) goto err_nyi; \
|
||||||
} \
|
} \
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -414,7 +414,7 @@ void lj_ccallback_mcode_free(CTState *cts)
|
|||||||
nfpr = CCALL_NARG_FPR; /* Prevent reordering. */ \
|
nfpr = CCALL_NARG_FPR; /* Prevent reordering. */ \
|
||||||
} \
|
} \
|
||||||
} else { \
|
} else { \
|
||||||
if (!LJ_TARGET_IOS && n > 1) \
|
if (!LJ_TARGET_OSX && n > 1) \
|
||||||
ngpr = (ngpr + 1u) & ~1u; /* Align to regpair. */ \
|
ngpr = (ngpr + 1u) & ~1u; /* Align to regpair. */ \
|
||||||
if (ngpr + n <= maxgpr) { \
|
if (ngpr + n <= maxgpr) { \
|
||||||
sp = &cts->cb.gpr[ngpr]; \
|
sp = &cts->cb.gpr[ngpr]; \
|
||||||
|
Loading…
Reference in New Issue
Block a user