mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-06-29 11:40:38 +00:00
Fix watching regular fixed-length string variables
This commit is contained in:
parent
765b77c9bb
commit
1d51c41b53
|
@ -7312,10 +7312,10 @@ SUB DebugMode
|
|||
IF INSTR(varType$, "STRING") = 0 THEN
|
||||
GOSUB findVarSize
|
||||
ELSE
|
||||
IF INSTR(varType$, " * ") = 0 THEN
|
||||
varSize& = LEN(dummy%&) + LEN(dummy&)
|
||||
ELSE
|
||||
IF INSTR(varType$, " * ") > 0 AND (tempIsUDT& <> 0 OR tempIsArray& <> 0) THEN
|
||||
varSize& = VAL(_TRIM$(MID$(varType$, INSTR(varType$, "STRING *") + 8)))
|
||||
ELSE
|
||||
varSize& = LEN(dummy%&) + LEN(dummy&)
|
||||
END IF
|
||||
END IF
|
||||
|
||||
|
|
Loading…
Reference in a new issue