cpu.x86: don't clobber src in %dispatch

db4
Slava Pestov 2009-06-30 16:47:22 -05:00
parent b61b47922f
commit fc6c9e2dfd
2 changed files with 4 additions and 4 deletions

View File

@ -29,10 +29,10 @@ M: x86.32 temp-reg-2 EDX ;
M:: x86.32 %dispatch ( src temp -- ) M:: x86.32 %dispatch ( src temp -- )
! Load jump table base. ! Load jump table base.
src HEX: ffffffff ADD temp src HEX: ffffffff [+] LEA
0 rc-absolute-cell rel-here 0 rc-absolute-cell rel-here
! Go ! Go
src HEX: 7f [+] JMP temp HEX: 7f [+] JMP
! Fix up the displacement above ! Fix up the displacement above
cell code-alignment cell code-alignment
[ 7 + building get dup pop* push ] [ 7 + building get dup pop* push ]

View File

@ -27,8 +27,8 @@ M:: x86.64 %dispatch ( src temp -- )
temp HEX: ffffffff MOV temp HEX: ffffffff MOV
0 rc-absolute-cell rel-here 0 rc-absolute-cell rel-here
! Add jump table base ! Add jump table base
src temp ADD temp src ADD
src HEX: 7f [+] JMP temp HEX: 7f [+] JMP
! Fix up the displacement above ! Fix up the displacement above
cell code-alignment cell code-alignment
[ 15 + building get dup pop* push ] [ 15 + building get dup pop* push ]