X-Git-Url: http://cloudbase.mooo.com/gitweb/z180-stamp-cpm3.git/blobdiff_plain/2a413c0df536bc1808a60598edc981152c4ec5f7..a894545eb628dd3899b970132a29bd87a30e760f:/cbios/bioskrnl.180

diff --git a/cbios/bioskrnl.180 b/cbios/bioskrnl.180
index 79dac2c..39927be 100644
--- a/cbios/bioskrnl.180
+++ b/cbios/bioskrnl.180
@@ -67,7 +67,7 @@ ccp	equ	0100h		; Console Command Processor gets loaded
 
     ; External names for BIOS entry points
 
-	public ?boot,?wboot,?const,?conin,?cono,?list,?auxo,?auxi
+	public ?boot,?wboot,boot,?const,?conin,?cono,?list,?auxo,?auxi
 	public ?home,?sldsk,?sttrk,?stsec,?stdma,?read,?write
 	public ?lists,?sctrn
 	public ?conos,?auxis,?auxos,?dvtbl,?devin,?drtbl
@@ -129,6 +129,10 @@ ccp	equ	0100h		; Console Command Processor gets loaded
 	dseg			; this part can be banked
 
 boot:
+	ld	a,SYS$CBR
+	out0	(cbr),a
+	ld	a,USR$CBAR
+	out0	(cbar),a
 	ld	sp,bs$stack
 
 	call	hwinit		; first time hardware initialisation