Tweak PowerPC %dispatch

db4
Slava Pestov 2008-11-13 05:58:49 -06:00
parent a14e1ebcb5
commit eef45a1cc3
1 changed files with 2 additions and 3 deletions

View File

@ -113,9 +113,8 @@ M: ppc %return ( -- ) BLR ;
M:: ppc %dispatch ( src temp offset -- ) M:: ppc %dispatch ( src temp offset -- )
0 temp LOAD32 0 temp LOAD32
5 offset + cells rc-absolute-ppc-2/2 rel-here 4 offset + cells rc-absolute-ppc-2/2 rel-here
temp temp src ADD temp temp src LWZX
temp temp 0 LWZ
temp MTCTR temp MTCTR
BCTR ; BCTR ;