steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

cpu.x86.32: fix callbacks on platforms where stack is not aligned

db4
Slava Pestov 2009-10-17 21:20:08 -05:00
parent 0653bae7ec
commit 86c16eeb6a
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
basis/cpu/x86/32/32.factor
View File

@ -250,10 +250,10 @@ M:: x86.32 %unbox-large-struct ( n c-type -- )
] with-aligned-stack ; ] with-aligned-stack ;
M: x86.32 %nest-stacks ( -- ) M: x86.32 %nest-stacks ( -- )
! Save current frame. See comment in vm/contexts.hpp
EAX stack-reg stack-frame get total-size>> 3 cells - [+] LEA
8 [ 8 [
push-vm-ptr push-vm-ptr
! Save current frame. See comment in vm/contexts.hpp
EAX stack-reg stack-frame get total-size>> [+] LEA
EAX PUSH EAX PUSH
"nest_stacks" f %alien-invoke "nest_stacks" f %alien-invoke
] with-aligned-stack ; ] with-aligned-stack ;