* sim/ucsim/hc08.src/inst.cc (inst_condbranch): fixed simulation of

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

diff --git a/src/hc08/peeph.def b/src/hc08/peeph.def
index a4c8e75615af7a7eaec507b4d47d330c76c7e1e8..93af395f532f237f518732889e32da6f91020121 100644 (file)
--- a/src/hc08/peeph.def
+++ b/src/hc08/peeph.def
@@ -86,6 +86,66 @@ replace {
 %1:
 } if labelInRange
 
+replace {
+       bls     %1
+       jmp     %5
+%1:
+} by {
+       ; Peephole 2g   - eliminated bra
+       bhi     %5
+%1:
+} if labelInRange
+
+replace {
+       bhi     %1
+       jmp     %5
+%1:
+} by {
+       ; Peephole 2h   - eliminated bra
+       bls     %5
+%1:
+} if labelInRange
+
+replace {
+       ble     %1
+       jmp     %5
+%1:
+} by {
+       ; Peephole 2i   - eliminated bra
+       bgt     %5
+%1:
+
+} if labelInRange
+replace {
+       bgt     %1
+       jmp     %5
+%1:
+} by {
+       ; Peephole 2j   - eliminated bra
+       ble     %5
+%1:
+} if labelInRange
+
+replace {
+       bge     %1
+       jmp     %5
+%1:
+} by {
+       ; Peephole 2k   - eliminated bra
+       blt     %5
+%1:
+} if labelInRange
+
+replace {
+       blt     %1
+       jmp     %5
+%1:
+} by {
+       ; Peephole 2l   - eliminated bra
+       bge     %5
+%1:
+} if labelInRange
+
 replace {
        jmp     %5
 } by {
@@ -124,3 +184,107 @@ replace {
        ; Peephole 4d   - eliminated redundant tstx
        ldx     %1,s
 }
+
+replace {
+       clra
+       sta     %1
+       clra
+       sta     %2
+       clra
+       sta     %3
+       clra
+       sta     %4
+} by {
+       ; Peephole 5a   - eliminated redundant clra
+       clra
+       sta     %1
+       sta     %2
+       sta     %3
+       sta     %4
+}
+
+replace {
+       clra
+       sta     %1
+       clra
+       sta     %2
+       clra
+       sta     %3
+} by {
+       ; Peephole 5b   - eliminated redundant clra
+       clra
+       sta     %1
+       sta     %2
+       sta     %3
+}
+
+replace {
+       clra
+       sta     %1
+       clra
+       sta     %2
+} by {
+       ; Peephole 5c   - eliminated redundant clra
+       clra
+       sta     %1
+       sta     %2
+}
+
+replace {
+       lda     #%9
+       sta     %1
+       lda     #%9
+       sta     %2
+       lda     #%9
+       sta     %3
+       lda     #%9
+       sta     %4
+} by {
+       ; Peephole 5d   - eliminated redundant lda
+       lda     #%9
+       sta     %1
+       sta     %2
+       sta     %3
+       sta     %4
+}
+
+replace {
+       lda     #%9
+       sta     %1
+       lda     #%9
+       sta     %2
+       lda     #%9
+       sta     %3
+} by {
+       ; Peephole 5e   - eliminated redundant lda
+       lda     #%9
+       sta     %1
+       sta     %2
+       sta     %3
+}
+
+replace {
+       lda     #%9
+       sta     %1
+       lda     #%9
+       sta     %2
+} by {
+       ; Peephole 5f   - eliminated redundant lda
+       lda     #%9
+       sta     %1
+       sta     %2
+}
+
+replace {
+       jmp     %5
+} by {
+       ; Peephole 6a  - replaced jmp to rts with rts
+       rts
+} if labelIsReturnOnly
+
+replace {
+       bra     %5
+} by {
+       ; Peephole 6b  - replaced jmp to rts with rts
+       rts
+} if labelIsReturnOnly