1
0
mirror of https://github.com/dschmenk/PLASMA.git synced 2026-04-20 01:16:36 +00:00

Fix bug in //e 80 column CLEOL after GOTOXY

This commit is contained in:
David Schmenk
2025-03-04 20:49:28 -08:00
parent e9a75048ef
commit 6b691dcdc5
2 changed files with 10 additions and 5 deletions
Binary file not shown.
+10 -5
View File
@@ -554,12 +554,17 @@ def drawrows(toprow, bottomrow)#0
conio:textctrl(ctrlattr, NORMAL)
fin
strptr = txtlinbuf=>[scrnrow]
numchars = viewleft >= ^strptr ?? 0 :: ^strptr - viewleft
if numchars >= viewwidth
conio:putchars(viewwidth, strptr + viewleft + 1)
else
conio:putchars(numchars, strptr + viewleft + 1)
if viewleft >= ^strptr
conio:putchars(1, ' ') // Fix a bug in //e output when cleol directly follows gotoxy
conio:clear(cleol)
else
numchars = ^strptr - viewleft
if numchars >= viewwidth
conio:putchars(viewwidth, strptr + viewleft + 1)
else
conio:putchars(numchars, strptr + viewleft + 1)
conio:clear(cleol)
fin
fin
fin
next