Tweak PowerPC %dispatch

2008-11-13 05:58:49 -06:00 · 2008-11-13 05:58:49 -06:00 · eef45a1cc3
parent a14e1ebcb5
commit eef45a1cc3
1 changed files with 2 additions and 3 deletions
--- a/basis/cpu/ppc/ppc.factor
+++ b/basis/cpu/ppc/ppc.factor
@ -113,9 +113,8 @@ M: ppc %return ( -- ) BLR ;

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