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:
Binary file not shown.
+10
-5
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user