1 files changed, 4 insertions, 4 deletions
diff --git a/src/vm_ppc.dasc b/src/vm_ppc.dasc
index 7eafebe1..5a6737ae 100644
--- a/src/vm_ppc.dasc
+++ b/src/vm_ppc.dasc
@@ -2100,10 +2100,10 @@ static void build_subroutines(BuildCtx *ctx)
  |  b ->fff_newstr
  |
  |5:  // Negative end or overflow.
-  |  sub CARG2, TMP0, TMP2
+  |  cmpw TMP0, TMP2                    // len >= end? (signed compare)
-  |  srawi CARG2, CARG2, 31
+  |   add TMP2, TMP0, TMP3              // Negative end: end = end+len+1.
-  |  andc TMP3, TMP3, CARG2             // end = end > len ? len : end+len+1
+  |  bge <2
-  |  add TMP2, TMP0, TMP3
+  |   mr TMP2, TMP0                     // Overflow: end = len.
  |  b <2
  |
  |7:  // Negative start or underflow.

diff --git a/src/vm_ppc.dasc b/src/vm_ppc.dasc index 7eafebe1..5a6737ae 100644 --- a/src/vm_ppc.dasc +++ b/src/vm_ppc.dasc
@@ -2100,10 +2100,10 @@ static void build_subroutines(BuildCtx *ctx)
2100	\| b ->fff_newstr	2100	\| b ->fff_newstr
2101	\|	2101	\|
2102	\|5: // Negative end or overflow.	2102	\|5: // Negative end or overflow.
2103	\| sub CARG2, TMP0, TMP2	2103	\| cmpw TMP0, TMP2 // len >= end? (signed compare)
2104	\| srawi CARG2, CARG2, 31	2104	\| add TMP2, TMP0, TMP3 // Negative end: end = end+len+1.
2105	\| andc TMP3, TMP3, CARG2 // end = end > len ? len : end+len+1	2105	\| bge <2
2106	\| add TMP2, TMP0, TMP3	2106	\| mr TMP2, TMP0 // Overflow: end = len.
2107	\| b <2	2107	\| b <2
2108	\|	2108	\|
2109	\|7: // Negative start or underflow.	2109	\|7: // Negative start or underflow.