]> cloudbase.mooo.com Git - z180-stamp-cpm3.git/blobdiff - cbios/fifo.180
Unifiy asci0/asci1 interrupt routines
[z180-stamp-cpm3.git] / cbios / fifo.180
index ca2924a7df3651d4617cc7006f146c5624d7573e..e818c5a7cfa39814297018cc80d0cf4dbf278173 100644 (file)
@@ -120,12 +120,13 @@ ff_gech:
        ld      c,(ix+o.out_idx)        ;\r
        ld      b,0\r
        add     hl,bc\r
-       jr      $+3\r
 gech.wait:\r
-       halt\r
        ld      a,(ix+o.in_idx)         ;\r
        sub     c\r
-       jr      z,gech.wait\r
+       jr      nz,gech.cont\r
+       halt\r
+       jr      gech.wait\r
+gech.cont:\r
        jr      nc,$+5\r
         adc    (ix+o.mask)             ; mask+carry == buffer size\r
        dec     a\r