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

Resets variable values from previous run.

This commit is contained in:
Fellippe Heitor 2021-07-28 18:00:19 -03:00
parent f086aaec95
commit 5495e4d3ba

View file

@ -725,6 +725,23 @@ FUNCTION ide2 (ignore)
'$DEBUG mode on
IdeDebugMode = 1
FOR x = 1 TO totalVariablesCreated
usedVariableList(x).mostRecentValue = ""
NEXT
variableWatchList$ = ""
longestVarName = 0
FOR y = 1 TO totalVariablesCreated
IF usedVariableList(y).watch THEN
IF LEN(usedVariableList(y).name) > longestVarName THEN
longestVarName = LEN(usedVariableList(y).name)
IF variableWatchList$ = "" THEN variableWatchList$ = SPACE$(4)
MID$(variableWatchList$, 1, 4) = MKL$(longestVarName)
END IF
variableWatchList$ = variableWatchList$ + MKL$(y)
END IF
NEXT
EnterDebugMode:
IF idehelp THEN
idewy = idewy + idesubwindow