QB64/qb64
QB64/qb64
1
1
Fork 0
mirror of https://github.com/QB64Official/qb64.git synced 2024-07-02 22:21:21 +00:00
Code Releases Wiki Activity

Removes fix046$ from variable names before displaying them.

Browse source
This commit is contained in:
FellippeHeitor 2021-09-09 00:26:51 -03:00
parent 133805181e
commit 908a5b179f
1 changed files with 6 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
source/qb64.bas
View file

@ -25997,6 +25997,12 @@ SUB manageVariableList (__name$, __cname$, localIndex AS LONG, action AS _BYTE)
usedVariableList(i).varType = id2fulltypename$
usedVariableList(i).cname = cname$
usedVariableList(i).localIndex = localIndex
'remove eventual instances of fix046$ in name$
DO WHILE INSTR(name$, fix046$)
x = INSTR(name$, fix046$): name$ = LEFT$(name$, x - 1) + "." + RIGHT$(name$, LEN(name$) - x + 1 - LEN(fix046$))
LOOP
IF LEN(RTRIM$(id.musthave)) > 0 THEN
usedVariableList(i).name = name$ + RTRIM$(id.musthave)
ELSE