Define fifos: msg_tx_fifo, msg_rx_fifo

[z180-stamp.git] / z180 / console.180

diff --git a/z180/console.180 b/z180/console.180
index d7b5ef68b44b79a6c2994e7250613bd39be6fdd2..9b0d5197b8dc2cbcc8be1e1015f88fe736334777 100644 (file)
--- a/z180/console.180
+++ b/z180/console.180
@@ -8,8 +8,8 @@
 \r
 \r
        extrn   ser.init,ser.instat,ser.in,ser.out\r
-;      extrn   f.init,f.in,f.out,f.i.st\r
-;      extrn   msg.co\r
+       extrn   msginit,msg.in,msg.out,msgi.st\r
+       extrn   msg.co\r
        \r
 \r
        include config.inc\r
@@ -20,19 +20,19 @@
 ;\r
 \r
 $coninit:\r
-;      call    f.init\r
+       call    msginit\r
        call    ser.init\r
        ret\r
        \r
 $cists:\r
-;      call    f.i.st\r
-;      ret     nz\r
+       call    msgi.st\r
+       ret     nz\r
        call    ser.instat\r
        ret\r
        \r
 $ci:\r
-;      call    f.i.st\r
-;      jp      nz,f.in\r
+       call    msgi.st\r
+       jp      nz,msg.in\r
        call    ser.instat\r
        jp      nz,ser.in\r
        jr      $ci\r
@@ -41,7 +41,7 @@ $ci:
 ;      jp      f.o.st\r
        \r
 $co:\r
-;      call    msg.co\r
+       call    msg.co\r
        jp      ser.out\r
        \r
        end\r