From: Alan Cox <alan@linux.intel.com>
Date: Thu, 18 Dec 2014 00:50:46 +0000 (+0000)
Subject: trs80,floppy: bug fixes noticed in passing
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=495093129ec737a9052f1fbcfdc5843b5bb00b7d;p=FUZIX.git

trs80,floppy: bug fixes noticed in passing
---

diff --git a/Kernel/platform-trs80/floppy.s b/Kernel/platform-trs80/floppy.s
index 324f6101..400f34e7 100644
--- a/Kernel/platform-trs80/floppy.s
+++ b/Kernel/platform-trs80/floppy.s
@@ -20,7 +20,7 @@
 FDCREG	.equ	0xF0
 FDCTRK	.equ	0xF1
 FDCSEC	.equ	0xF2
-FDCDATA	.equ	0x43
+FDCDATA	.equ	0xF3
 FDCCTRL	.equ	0xF4
 FDCINT	.equ	0xE4
 ;
@@ -109,7 +109,7 @@ fdsetup:
 	;	So we can verify
 	;
 	ld	a, SECTOR(ix)
-	out	(FDCSEC), a
+	out	(FDCDATA), a
 	;
 	;	Need to seek the disk
 	;
@@ -186,7 +186,7 @@ fdio_in:
 fdio_inl:
 	in	a, (FDCREG)
 	and	e
-	jr	z, fdio_in
+	jr	z, fdio_inl
 	ini
 	di
 	ld	a, d