mirror of
https://github.com/QB64Official/qb64.git
synced 2024-07-05 00:40:26 +00:00
Encloses string data within quotation marks (Watch Panel).
This commit is contained in:
parent
087c320631
commit
d29a6657cc
|
@ -7651,6 +7651,7 @@ SUB showvWatchPanel (this AS vWatchPanelType, currentScope$, totalVisibleVariabl
|
||||||
END IF
|
END IF
|
||||||
item$ = thisName$ + SPACE$(longestVarName - LEN(thisName$)) + " = "
|
item$ = thisName$ + SPACE$(longestVarName - LEN(thisName$)) + " = "
|
||||||
IF usedVariableList(tempIndex&).subfunc = currentScope$ OR usedVariableList(tempIndex&).subfunc = "" THEN
|
IF usedVariableList(tempIndex&).subfunc = currentScope$ OR usedVariableList(tempIndex&).subfunc = "" THEN
|
||||||
|
isString = (INSTR(usedVariableList(tempIndex&).varType, "STRING *") > 0 OR usedVariableList(tempIndex&).varType = "STRING")
|
||||||
IF usedVariableList(tempIndex&).isarray THEN
|
IF usedVariableList(tempIndex&).isarray THEN
|
||||||
seqIndex& = INSTR(usedVariableList(tempIndex&).indexes, MKL$(tempArrayIndex&))
|
seqIndex& = INSTR(usedVariableList(tempIndex&).indexes, MKL$(tempArrayIndex&))
|
||||||
IF seqIndex& <= LEN(usedVariableList(tempIndex&).mostRecentValue) - 3 THEN
|
IF seqIndex& <= LEN(usedVariableList(tempIndex&).mostRecentValue) - 3 THEN
|
||||||
|
@ -7661,7 +7662,11 @@ SUB showvWatchPanel (this AS vWatchPanelType, currentScope$, totalVisibleVariabl
|
||||||
tempValue$ = usedVariableList(tempIndex&).mostRecentValue
|
tempValue$ = usedVariableList(tempIndex&).mostRecentValue
|
||||||
END IF
|
END IF
|
||||||
|
|
||||||
item$ = item$ + tempValue$
|
IF isString THEN
|
||||||
|
item$ = item$ + CHR$(34) + tempValue$ + CHR$(34)
|
||||||
|
ELSE
|
||||||
|
item$ = item$ + tempValue$
|
||||||
|
END IF
|
||||||
COLOR fg
|
COLOR fg
|
||||||
ELSE
|
ELSE
|
||||||
item$ = item$ + "<out of scope>"
|
item$ = item$ + "<out of scope>"
|
||||||
|
|
Loading…
Reference in a new issue