For 296a

[fw/sdcc] / src / z80 / peeph-gbz80.def

diff --git a/src/z80/peeph-gbz80.def b/src/z80/peeph-gbz80.def
index 846e49c9a7b6e00c2393ee318fa64f73ac479ff3..b96b64c72ff3b7dd377af7033c4b20c9cd717179 100644 (file)
--- a/src/z80/peeph-gbz80.def
+++ b/src/z80/peeph-gbz80.def
@@ -40,4 +40,24 @@ replace {
 } by {
        ld      [hl-],a
 }
-
+replace {
+       ld      (hl+),a
+       ld      (hl),d
+       dec     hl
+       ld      e,(hl)
+       inc     hl
+       ld      d,(hl)
+       ld      a,(de)
+} by {
+       ld      (hl+),a
+       ld      (hl),d
+       ld      e,a
+       ld      a,(de)
+}
+replace {
+       ld      (hl),a
+       ld      %1,(hl)
+} by {
+        ld      (hl),a
+        ld      %1,a
+}