mirror of
https://github.com/QB64Official/qb64.git
synced 2024-07-04 23:30:24 +00:00
Fixes "set address"
This commit is contained in:
parent
cad9e407d8
commit
b49d2e7326
|
@ -7084,8 +7084,9 @@ SUB DebugMode
|
|||
CASE "STRING"
|
||||
varSize& = usedVariableList(tempIndex&).strLength
|
||||
value$ = LEFT$(value$, varSize&)
|
||||
varSize& = LEN(value$)
|
||||
END SELECT
|
||||
cmd$ = "set address" + MKL$(varSize&) + _MK$(_OFFSET, address%&) + value$
|
||||
cmd$ = "set address:" + MKL$(varSize&) + _MK$(_OFFSET, address%&) + value$
|
||||
GOSUB SendCommand
|
||||
usedVariableList(tempIndex&).mostRecentValue = CHR$(16) + CHR$(4) + "Sent: " + MID$(result$, 5)
|
||||
END IF
|
||||
|
|
Loading…
Reference in a new issue