2009-06-08 18:23:08 +00:00
|
|
|
/* ---------------------------------------------- */
|
|
|
|
|
/* alloca86_64.S */
|
|
|
|
|
|
|
|
|
|
#include "../config.h"
|
|
|
|
|
|
|
|
|
|
.globl alloca
|
|
|
|
|
|
|
|
|
|
alloca:
|
|
|
|
|
pop %rdx
|
|
|
|
|
mov %rdi,%rax
|
2009-06-10 23:33:41 +00:00
|
|
|
add $15,%rax
|
|
|
|
|
and $-16,%rax
|
2009-06-08 18:23:08 +00:00
|
|
|
jz p3
|
|
|
|
|
|
|
|
|
|
#ifdef TCC_TARGET_PE
|
|
|
|
|
/* XXX: not tested */
|
|
|
|
|
p1:
|
|
|
|
|
cmp $4096,%rax
|
|
|
|
|
jle p2
|
|
|
|
|
sub $4096,%rsp
|
|
|
|
|
sub $4096,%rax
|
|
|
|
|
test %rax,(%rsp)
|
|
|
|
|
jmp p1
|
|
|
|
|
p2:
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
sub %rax,%rsp
|
|
|
|
|
mov %rsp,%rax
|
|
|
|
|
p3:
|
|
|
|
|
push %rdx
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
/* ---------------------------------------------- */
|
