printf() --> printf_P(PSTR())

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

diff --git a/z180/r3init.180 b/z180/r3init.180
index 83bdbe5d715afb8225a1f43b1293afcece008732..7ba9a0c02de7112580adf403b35fc0689a2a07e6 100644 (file)
--- a/z180/r3init.180
+++ b/z180/r3init.180
@@ -52,7 +52,6 @@ nullbyte:
        dw      0-romend        ;count (64k)\r
 dmct_e:\r
 \r
-\r
 INIWAITS defl  CWAITIO\r
        if      ROMSYS\r
 INIWAITS defl  INIWAITS+CWAITROM\r
@@ -270,7 +269,7 @@ wstart:
        call    prt0_init\r
 \r
 \r
-       call    bufferinit\r
+;;;    call    bufferinit\r
 \r
 \r
        call    $coninit\r
@@ -295,10 +294,6 @@ wstart:
 ;----------------------------------------------------------------------\r
 ;\r
 \r
-       extrn   msginit,msg.sout,msg_fifo\r
-       extrn   tx.buf,rx.buf\r
-\r
-\r
 ;TODO: Make a ringbuffer module.\r
 \r
        global  buf.init\r
@@ -311,6 +306,12 @@ buf.init:
 \r
 ;----------------------------------------------------------------------\r
 \r
+.comment *\r
+\r
+       extrn   msginit,msg.sout,msg_fifo\r
+       extrn   tx.buf,rx.buf\r
+\r
+\r
 bufferinit:\r
        call     msginit\r
        \r
@@ -354,7 +355,9 @@ bufdat:
        db      0\r
        dw      0\r
        db      0\r
-inimsg_e\r
+inimsg_e:\r
+\r
+       *\r
 \r
 ;\r
 ;----------------------------------------------------------------------\r
@@ -390,6 +393,7 @@ ivt_i1:
        djnz    ivt_i1\r
        ret\r
 \r
+;----------------------------------------------------------------------\r
 \r
 prt0_init:\r
        ld      a,i\r
@@ -413,6 +417,7 @@ prt0itab:
        db      M_TIE0+M_TDE0   ;enable timer 0 interrupt and down count.\r
 prt0it_e:\r
 \r
+\r
 ;\r
 ;----------------------------------------------------------------------\r
 ;\r
@@ -519,6 +524,8 @@ checkcrc_alv:
        pop hl                  ;041e\r
        ret                     ;041f\r
 \r
+;----------------------------------------------------------------------\r
+\r
 ;\r
 ;  alloc\r
 ;\r
@@ -704,7 +711,7 @@ bnk2phys:
 ;\r
 ; OP: ahl = (a<<12) + (d<<8) + e\r
 ;\r
-;out ehl: Phys. (linear) Address\r
+;out ahl: Phys. (linear) Address\r
 \r
 \r
 log2phys:\r
@@ -787,6 +794,7 @@ jphl:
 \r
 ; ---------------------------------------------------------\r
 \r
+\r
 iprt0:\r
        push    af\r
        push    hl\r