X-Git-Url: http://cloudbase.mooo.com/gitweb/z180-stamp.git/blobdiff_plain/eded7ec457ef999586c66b15ada5948bddcc735c..4caee1ec599c6d78f5234b218e2ccf5e23eb4bf0:/z180/r3init.180

diff --git a/z180/r3init.180 b/z180/r3init.180
index 8599349..7ba9a0c 100644
--- a/z180/r3init.180
+++ b/z180/r3init.180
@@ -269,7 +269,7 @@ wstart:
 	call	prt0_init
 
 
-	call	bufferinit
+;;;	call	bufferinit
 
 
 	call	$coninit
@@ -294,10 +294,6 @@ wstart:
 ;----------------------------------------------------------------------
 ;
 
-	extrn	msginit,msg.sout,msg_fifo
-	extrn	tx.buf,rx.buf
-
-
 ;TODO: Make a ringbuffer module.
 
 	global	buf.init
@@ -310,6 +306,12 @@ buf.init:
 
 ;----------------------------------------------------------------------
 
+.comment *
+
+	extrn	msginit,msg.sout,msg_fifo
+	extrn	tx.buf,rx.buf
+
+
 bufferinit:
 	call	 msginit
 	
@@ -355,6 +357,8 @@ bufdat:
 	db	0
 inimsg_e:
 
+	*
+
 ;
 ;----------------------------------------------------------------------
 ;
@@ -389,6 +393,7 @@ ivt_i1:
 	djnz	ivt_i1
 	ret
 
+;----------------------------------------------------------------------
 
 prt0_init:
 	ld	a,i
@@ -412,6 +417,7 @@ prt0itab:
 	db	M_TIE0+M_TDE0	;enable timer 0 interrupt and down count.
 prt0it_e:
 
+
 ;
 ;----------------------------------------------------------------------
 ;
@@ -518,6 +524,8 @@ checkcrc_alv:
 	pop hl			;041e
 	ret			;041f
 
+;----------------------------------------------------------------------
+
 ;
 ;  alloc
 ;
@@ -703,7 +711,7 @@ bnk2phys:
 ;
 ; OP: ahl = (a<<12) + (d<<8) + e
 ;
-;out ehl: Phys. (linear) Address
+;out ahl: Phys. (linear) Address
 
 
 log2phys:
@@ -786,6 +794,7 @@ jphl:
 
 ; ---------------------------------------------------------
 
+
 iprt0:
 	push	af
 	push	hl