QB64/qb64
QB64/qb64
1
1
Fork 0
mirror of https://github.com/QB64Official/qb64.git synced 2024-08-22 11:25:08 +00:00
Code Releases Wiki Activity

Prevents adding SHARED variables to SUB vWatch()

Browse source
This commit is contained in:
FellippeHeitor 2021-07-24 12:00:40 -03:00
parent 6436ee76bf
commit c621917a69
1 changed files with 17 additions and 13 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
source/qb64.bas
View file

@ -14261,6 +14261,7 @@ SUB vWatchVariable (this$, action AS _BYTE)
mainModuleVariablesList$ = "" mainModuleVariablesList$ = ""
totalMainModuleVariables = 0 totalMainModuleVariables = 0
ELSE ELSE
IF subfunc <> "SUB_VWATCH" THEN
IF totalLocalVariables + totalSharedVariablesFromMainModule > 0 THEN IF totalLocalVariables + totalSharedVariablesFromMainModule > 0 THEN
PRINT #13, "void *vwatch_local_vars["; (totalLocalVariables + totalSharedVariablesFromMainModule); "];" PRINT #13, "void *vwatch_local_vars["; (totalLocalVariables + totalSharedVariablesFromMainModule); "];"
i = totalLocalVariables i = totalLocalVariables
@ -14277,6 +14278,9 @@ SUB vWatchVariable (this$, action AS _BYTE)
ELSE ELSE
PRINT #13, "void *vwatch_local_vars[0];" PRINT #13, "void *vwatch_local_vars[0];"
END IF END IF
ELSE
PRINT #13, "void *vwatch_local_vars[0];"
END IF
localVariablesList$ = "" localVariablesList$ = ""
totalLocalVariables = 0 totalLocalVariables = 0