QB64/qb64
QB64/qb64
1
1
Fork 0
mirror of https://github.com/QB64Official/qb64.git synced 2024-07-05 01:50:25 +00:00
Code Releases Wiki Activity

Fixes duplicate SKIP labels in some scenarios.

Browse source
This commit is contained in:
FellippeHeitor 2021-07-20 13:16:06 -03:00
parent fe4575a181
commit dfb33206b4
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
source/qb64.bas
View file

@ -14215,11 +14215,12 @@ SUB clearid
END SUB
SUB vWatchTagLabel (this AS LONG, lastLine AS _BYTE)
STATIC prevLabel AS LONG
STATIC prevLabel AS LONG, prevSkipLabel AS LONG
IF lastLine THEN
IF prevLabel > 0 THEN
IF prevLabel > 0 AND prevLabel <> prevSkipLabel THEN
PRINT #12, "VWATCH_SKIPLABEL_" + str2$(prevLabel) + ":;"
prevSkipLabel = prevLabel
END IF
ELSE
WHILE this > LEN(vWatchUsedLabels)