QB64/QB64-PE
QB64/QB64-PE
1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-06-29 09:20:38 +00:00
Code Issues Releases Wiki Activity

Fixes detecting if it's a local/global var before sending value.

Browse source
This commit is contained in:
FellippeHeitor 2021-08-29 19:32:32 -03:00
parent 704b781cd2
commit da1344221f
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
source/ide/ide_methods.bas
View file

@ -7069,8 +7069,9 @@ SUB DebugMode
result$ = idevariablewatchbox$(currentSub$, filter$, selectVar, returnAction)
IF returnAction = 1 THEN
'set address
tempHeader$ = LEFT$(result$, 24)
tempIndex& = CVL(LEFT$(result$, 4))
result$ = MID$(result$, 5)
tempHeader$ = LEFT$(result$, 24)
tempIsArray& = CVL(MID$(result$, 5, 4))
tempArrayIndex& = CVL(MID$(result$, 9, 4))
tempIsUDT& = CVL(MID$(result$, 13, 4))
@ -8173,6 +8174,7 @@ FUNCTION idevariablewatchbox$(currentScope$, filter$, selectVar, returnAction)
v$ = ideinputbox$("Change Value", "#New value", a2$, "", thisWidth, 0, ok)
IF ok THEN
temp$ = ""
temp$ = temp$ + MKL$(tempIndex&)
temp$ = temp$ + MKL$(usedVariableList(tempIndex&).localindex)
temp$ = temp$ + MKL$(usedVariableList(tempIndex&).isarray <> 0)
temp$ = temp$ + MKL$(tempArrayIndex&)