cpu.x86: fix callbacks receiving stack parameters on Win64

db4
Slava Pestov 2010-05-23 23:08:07 -04:00
parent 6b87f0d0d9
commit 48f87e03e3
1 changed files with 1 additions and 1 deletions

View File

@ -583,7 +583,7 @@ M:: x86 %store-stack-param ( src n rep -- )
#! input values to callbacks; the callback has its own #! input values to callbacks; the callback has its own
#! stack frame set up, and we want to read the frame #! stack frame set up, and we want to read the frame
#! set up by the caller. #! set up by the caller.
frame-reg swap 2 cells + [+] ; [ frame-reg ] dip 2 cells + reserved-stack-space + [+] ;
M:: x86 %load-stack-param ( dst n rep -- ) M:: x86 %load-stack-param ( dst n rep -- )
dst n next-stack@ rep %copy ; dst n next-stack@ rep %copy ;