2001-10-21 Michael Hope <michaelh@juju.net.nz>

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

diff --git a/src/z80/peeph-gbz80.def b/src/z80/peeph-gbz80.def
index 00c8644cb17cd7b67be2e108e46097de665de8f0..846e49c9a7b6e00c2393ee318fa64f73ac479ff3 100644 (file)
--- a/src/z80/peeph-gbz80.def
+++ b/src/z80/peeph-gbz80.def
@@ -1,12 +1,43 @@
-replace restart {
+replace {
+       ld      (hl),a
+        dec     hl
+} by {
+        ld      (hl-),a
+}
+replace {
        ld      (hl),a
        inc     hl
 } by {
        ld      (hl+),a
 }
-replace restart {
+replace {
        ld      a,(hl)
        inc     hl
 } by {
        ld      a,(hl+)
 }
+replace {
+       ld      a,[hl]
+       inc     hl
+} by {
+       ld      a,[hl+]
+}
+replace {
+       ld      a,[hl]
+       inc     hl
+} by {
+       ld      a,[hl+]
+}
+replace {
+       ld      [hl],a
+       inc     hl
+} by {
+       ld      [hl+],a
+}
+replace {
+       ld      [hl],a
+       dec     hl
+} by {
+       ld      [hl-],a
+}
+