Cleanups of the mess I made on the last commit

[fw/sdcc] / src / ds390 / peeph.def

diff --git a/src/ds390/peeph.def b/src/ds390/peeph.def
index 9cefcc7d217567053c4b76876f0945111fbc2b3b..8c67d2da80470365afddb4d3b7b7f8c3fed4943e 100644 (file)
--- a/src/ds390/peeph.def
+++ b/src/ds390/peeph.def
@@ -2367,10 +2367,35 @@ replace {
 }
 
 replace {
-        mov     r%1,a
-        mov     a,ar%1
+        sjmp    %1
+%2:
+        mov     %3,%4
+%5:
+        ret
 } by {
-        mov     r%1,a
-        ; Peephole 237   removed redundant move
+        ; Peephole 237a  removed sjmp to ret
+        ret
+%2:
+        mov     %3,%4
+%1:
+        ret
 }
 
+replace {
+        sjmp    %1
+%2:
+        mov     %3,%4
+        mov     dpl,%5
+        mov     dph,%6
+%1:
+        ret
+} by {
+        ; Peephole 237b  removed sjmp to ret
+        ret
+%2:
+        mov     %3,%4
+        mov     dpl,%5
+        mov     dph,%6
+%1:
+        ret
+}