From: Alan Cox <alan@linux.intel.com>
Date: Mon, 1 Oct 2018 12:43:14 +0000 (+0100)
Subject: z80pack32: update to avoid ld a,i
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=71812d46c13b8cc56455a9a474fca22fdd0bb610;p=FUZIX.git

z80pack32: update to avoid ld a,i
---

diff --git a/Kernel/platform-z80pack32/z80pack.s b/Kernel/platform-z80pack32/z80pack.s
index edc31790..57f7ae4f 100644
--- a/Kernel/platform-z80pack32/z80pack.s
+++ b/Kernel/platform-z80pack32/z80pack.s
@@ -74,7 +74,7 @@ _fd_bankcmd:pop de		; return
 	    push hl
 	    push bc
 	    push de		; fix stack
-	    ld a, i
+	    ld a, (_int_disabled)
 	    di
 	    push af		; save DI state
 	    call map_process	; HL alread holds our bank
@@ -82,7 +82,8 @@ _fd_bankcmd:pop de		; return
 	    out (13), a		;
 	    call map_kernel	; return to kernel mapping
 	    pop af
-	    ret po
+	    or a
+	    ret nz
 	    ei
 	    ret