From 53560ec34f7508c003339733634113b2a0d0f9a6 Mon Sep 17 00:00:00 2001 From: FellippeHeitor Date: Fri, 23 Jul 2021 12:12:03 -0300 Subject: [PATCH] Resets internal variable list when compilation starts ($DEBUG). --- source/qb64.bas | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/source/qb64.bas b/source/qb64.bas index 84cde26fb..3fb5e10d4 100644 --- a/source/qb64.bas +++ b/source/qb64.bas @@ -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