small fix: carry was not always clear before the 'sbc'

1992-10-16 15:43:46 +00:00 · 1992-10-16 15:43:46 +00:00 · 67d5d2d6c4
parent 50db0a3643
commit 67d5d2d6c4
2 changed files with 2 additions and 0 deletions
--- a/mach/z80/libmon/head_em.s
+++ b/mach/z80/libmon/head_em.s
@ -25,6 +25,7 @@
 	ld h,d
 	ld l,e
 	ld bc,begbss
+	xor a			! to clear carry
 	sbc hl,bc
 	ld a,h
 	or l
--- a/mach/z80/libsys/head_em.s
+++ b/mach/z80/libsys/head_em.s
@ -25,6 +25,7 @@
 	ld h,d
 	ld l,e
 	ld bc,begbss
+	xor a			! to clear carry
 	sbc hl,bc
 	ld a,h
 	or l