mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-27 19:28:05 +11:00
ed: fix 'd' going crazy when deleting last lines of buf
This commit is contained in:
parent
0fd16a0bb6
commit
0237ff105f
@ -111,6 +111,13 @@ bufDelLines:
|
|||||||
pop de ; <-- lvl 2
|
pop de ; <-- lvl 2
|
||||||
pop hl ; <-- lvl 1
|
pop hl ; <-- lvl 1
|
||||||
; Line count updated!
|
; Line count updated!
|
||||||
|
; One other thing... is BC zero? Because if it is, then we shouldn't
|
||||||
|
; call ldir (otherwise we're on for a veeeery long loop), BC=0 means
|
||||||
|
; that only last lines were deleted. nothing to do.
|
||||||
|
ld a, b
|
||||||
|
or c
|
||||||
|
ret z ; BC==0, return
|
||||||
|
|
||||||
; let's have invert HL and DE to match LDIR's signature
|
; let's have invert HL and DE to match LDIR's signature
|
||||||
ex de, hl
|
ex de, hl
|
||||||
; At this point we have higher index in HL, lower index in DE and number
|
; At this point we have higher index in HL, lower index in DE and number
|
||||||
|
Loading…
Reference in New Issue
Block a user