diff --git a/core/cpu/ppc/intrinsics/intrinsics.factor b/core/cpu/ppc/intrinsics/intrinsics.factor index 8a2f41ec12..0aef15ba99 100755 --- a/core/cpu/ppc/intrinsics/intrinsics.factor +++ b/core/cpu/ppc/intrinsics/intrinsics.factor @@ -481,7 +481,7 @@ IN: cpu.ppc.intrinsics \ [ tuple "layout" get layout-size 2 + cells %allot ! Store layout - "layout" operand 12 LOAD32 + "layout" get 12 load-indirect 12 11 cell STW ! Zero out the rest of the tuple f v>operand 12 LI