QB64/QB64-PE
QB64/QB64-PE
1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-01 12:40:36 +00:00
Code Issues Releases Wiki Activity

Keeps array index selection made before entering Debug mode.

Browse source
This commit is contained in:
FellippeHeitor 2021-08-21 17:39:41 -03:00
parent cc92a8f868
commit 82d4de881f
2 changed files with 5 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
source/ide/ide_methods.bas
View file

@ -737,7 +737,7 @@ FUNCTION ide2 (ignore)
IdeDebugMode = 1 IdeDebugMode = 1
FOR x = 1 TO totalVariablesCreated FOR x = 1 TO totalVariablesCreated
usedVariableList(x).mostRecentValue = "" IF usedVariableList(x).isarray = 0 THEN usedVariableList(x).mostRecentValue = ""
NEXT NEXT
EnterDebugMode: EnterDebugMode:

7
source/qb64.bas
View file

@ -25981,10 +25981,11 @@ SUB manageVariableList (__name$, __cname$, localIndex AS LONG, action AS _BYTE)
usedVariableList(i).name = usedVariableList(i).name + "()" usedVariableList(i).name = usedVariableList(i).name + "()"
ELSE ELSE
usedVariableList(i).isarray = 0 usedVariableList(i).isarray = 0
usedVariableList(i).watchRange = ""
usedVariableList(i).indexes = ""
usedVariableList(i).elements = ""
END IF END IF
usedVariableList(i).watchRange = ""
usedVariableList(i).indexes = ""
usedVariableList(i).elements = ""
usedVariableList(i).elementOffset = 0
totalVariablesCreated = totalVariablesCreated + 1 totalVariablesCreated = totalVariablesCreated + 1
END IF END IF
CASE ELSE 'find and mark as used CASE ELSE 'find and mark as used