PPC: Fix ipairs() for keys in the hash part.

diff --git a/src/buildvm_ppc.dasc b/src/buildvm_ppc.dasc
index 16cfd6ecfbf2b59c9d0f2d43d5ffa0329bb153f5..909c6fc7540af1b8f234c2127c6f21ebcf94b170 100644 (file)
--- a/src/buildvm_ppc.dasc
+++ b/src/buildvm_ppc.dasc
@@ -1130,13 +1130,13 @@ static void build_subroutines(BuildCtx *ctx)
   |   la RA, -8(BASE)
   |  cmplw TMP0, TMP2
   |   slwi TMP3, TMP2, 3
+  |  evstdd CARG2, 0(RA)
   |  ble >2                            // Not in array part?
   |  evlddx TMP1, TMP1, TMP3
   |1:
   |  checknil TMP1
   |   li RD, (0+1)*8
   |  checkok ->fff_res                 // End of iteration, return 0 results.
-  |  evstdd CARG2, 0(RA)
   |   li RD, (2+1)*8
   |  evstdd TMP1, 8(RA)
   |  b ->fff_res

diff --git a/src/buildvm_ppcspe.h b/src/buildvm_ppcspe.h
index 8209684835888327edc53c70899baa81140f39d5..e3665b3534ad7b00a385aa0ebf3dea9c311e7e63 100644 (file)
--- a/src/buildvm_ppcspe.h
+++ b/src/buildvm_ppcspe.h
@@ -1102,6 +1102,7 @@ static const unsigned int build_actionlist[4950] = {
 0x7c004840,
 0x55261800,
 0x000900a1,
+0x10940321,
 0x40810000,
 0x00050802,
 0x11083300,
@@ -1111,7 +1112,6 @@ static const unsigned int build_actionlist[4950] = {
 0x00098200,
 0x41800000,
 0x00050843,
-0x10940321,
 0x39800000,
 0x00098200,
 0x11140b21,