1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-06-29 11:40:38 +00:00

Resets internal variable list when compilation starts ($DEBUG).

This commit is contained in:
FellippeHeitor 2021-07-23 12:12:03 -03:00
parent d7b912c8a9
commit 53560ec34f

View file

@ -1227,6 +1227,7 @@ opexarray_recompileAttempts = 0
recompile:
vWatchOn = vWatchDesiredState
vWatchVariable "", -1 'reset internal variables list
qb64prefix_set = qb64prefix_set_desiredState
qb64prefix$ = "_"
@ -14219,6 +14220,11 @@ SUB vWatchVariable (this$, action AS _BYTE)
STATIC totalMainModuleVariables AS LONG, mainModuleVariablesList$
SELECT CASE action
CASE -1 'reset
totalLocalVariables = 0
localVariablesList$ = ""
totalMainModuleVariables = 0
mainModuleVariablesList$ = ""
CASE 0 'add
IF INSTR(vWatchVariableExclusions$, "@" + this$ + "@") > 0 OR LEFT$(this$, 12) = "_SUB_VWATCH_" THEN
EXIT SUB