mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-07-03 03:01:21 +00:00
Fixes not being able to add lines to a program.
This commit is contained in:
parent
7d73fa5beb
commit
a472d1aab9
|
@ -8804,6 +8804,9 @@ SUB ideshowtext
|
||||||
_PRINTSTRING (2, y + 3), SPACE$(maxLineNumberLength)
|
_PRINTSTRING (2, y + 3), SPACE$(maxLineNumberLength)
|
||||||
IF l <= iden THEN
|
IF l <= iden THEN
|
||||||
l2$ = STR$(l)
|
l2$ = STR$(l)
|
||||||
|
DO WHILE l > UBOUND(IdeBreakpoints)
|
||||||
|
REDIM _PRESERVE IdeBreakpoints(UBOUND(IdeBreakpoints) + 100) AS _BYTE
|
||||||
|
LOOP
|
||||||
IF IdeBreakpoints(l) THEN COLOR , 4
|
IF IdeBreakpoints(l) THEN COLOR , 4
|
||||||
IF 2 + maxLineNumberLength - (LEN(l2$) + 1) >= 2 THEN
|
IF 2 + maxLineNumberLength - (LEN(l2$) + 1) >= 2 THEN
|
||||||
_PRINTSTRING (2 + maxLineNumberLength - (LEN(l2$) + 1), y + 3), l2$
|
_PRINTSTRING (2 + maxLineNumberLength - (LEN(l2$) + 1), y + 3), l2$
|
||||||
|
|
Loading…
Reference in a new issue