From: ceriel <none@none>
Date: Wed, 10 Nov 1993 12:51:03 +0000 (+0000)
Subject: Fixed CII (?) did not handle stack pointer right
X-Git-Tag: release-5-5~249
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=964bf270ab1e5c3ec8320ec81f43403184c29224;p=ack.git

Fixed CII (?) did not handle stack pointer right
---

diff --git a/mach/z80/libem/cii.s b/mach/z80/libem/cii.s
index d042d65b2..c39213544 100644
--- a/mach/z80/libem/cii.s
+++ b/mach/z80/libem/cii.s
@@ -76,6 +76,12 @@
 	ex de,hl	! de := difference (> 0)
 	ld hl,0
 	add hl,sp	! hl := sp
+	dec de		! if difference = 1, don't adjust stack pointer
+	jr nz, 4f
+	inc de
+	jr 5f
+4:
+	inc de
 	push hl
 	or a
 	sbc hl,de
@@ -96,6 +102,7 @@
 	dec hl		! now hl points to
 			! most significant byte
 			! of the source
+5:
 	or a		! see if we're doing
 			! a 'cii' or a 'cuu'
 	jr nz,3f	! cuu, expand with zeroes