Fixed up support for the gbz80 such that it will at least run (and fail badly) the...

[fw/sdcc] / device / lib / gbz80 / putchar.s

diff --git a/device/lib/gbz80/putchar.s b/device/lib/gbz80/putchar.s
index 509d8aa6c9639f7ae87b591f2a9181ce8da12d55..4b43a6159e621fd252f9ac91669a336b73a2c26e 100644 (file)
--- a/device/lib/gbz80/putchar.s
+++ b/device/lib/gbz80/putchar.s
@@ -1,22 +1,18 @@
        .area _CODE
-_putchar::
-       lda     hl,2(sp)
-       ld      l,(hl)
-       ld      a,#0
-       rst     0x00
-       ret
-       
-.if 0
-_putchar::
-       push    ix
-       ld      ix,#0
-       add     ix,sp
+_putchar::       
+_putchar_rr_s:: 
+        ld      hl,#2
+        add     hl,sp
+        
+        ld      l,(hl)
+        ld      a,#1
+        rst     0x08
+        
+        ret
+           
+_putchar_rr_dbs::
+        ld      l,e
+       ld      a,#1
+        rst     0x08
 
-       ld      l,4(ix)
-       ld      a,#0
-       out     (0xff),a
-
-       pop     ix
-       ret
-.endif
-                       
+        ret