ultimatepp/bazaar/Tcc/lib/alloca86-bt.S
koldo 5d3e7033a9 Tcc: Adding package
git-svn-id: svn://ultimatepp.org/upp/trunk@1331 f0d560ea-af0d-0410-9eb7-867de7ffcac7
2009-06-23 22:15:38 +00:00

45 lines
703 B
ArmAsm

/* ---------------------------------------------- */
/* alloca86b.S */
#include "config.h"
.globl __bound__alloca
__bound__alloca:
pop %edx
pop %eax
mov %eax, %ecx
add $3,%eax
and $-4,%eax
jz p6
#ifdef TCC_TARGET_PE
p4:
cmp $4096,%eax
jle p5
sub $4096,%esp
sub $4096,%eax
test %eax,(%esp)
jmp p4
p5:
#endif
sub %eax,%esp
mov %esp,%eax
push %edx
push %eax
push %ecx
push %eax
call __bound_new_region
add $8, %esp
pop %eax
pop %edx
p6:
push %edx
push %edx
ret
/* ---------------------------------------------- */