mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-07-06 00:00:22 +00:00
Reenables detection of undefined arrays.
This commit is contained in:
parent
4e5c35bb7f
commit
8d29964587
|
@ -18358,32 +18358,32 @@ FUNCTION findid& (n2$)
|
||||||
id = ids(i)
|
id = ids(i)
|
||||||
|
|
||||||
t = id.t
|
t = id.t
|
||||||
'IF id.subfunc = 0 THEN
|
IF id.subfunc = 0 THEN
|
||||||
' IF t = 0 THEN
|
IF t = 0 THEN
|
||||||
' t = id.arraytype
|
t = id.arraytype
|
||||||
' IF t AND ISUDT THEN
|
IF t AND ISUDT THEN
|
||||||
' manageVariableList "", scope$ + "ARRAY_UDT_" + RTRIM$(id.n), 1
|
manageVariableList "", scope$ + "ARRAY_UDT_" + RTRIM$(id.n), 1
|
||||||
' ELSE
|
ELSE
|
||||||
' n$ = id2shorttypename$
|
n$ = id2shorttypename$
|
||||||
' IF LEFT$(n$, 1) = "_" THEN
|
IF LEFT$(n$, 1) = "_" THEN
|
||||||
' manageVariableList "", scope$ + "ARRAY" + n$ + "_" + RTRIM$(id.n), 2
|
manageVariableList "", scope$ + "ARRAY" + n$ + "_" + RTRIM$(id.n), 2
|
||||||
' ELSE
|
ELSE
|
||||||
' manageVariableList "", scope$ + "ARRAY_" + n$ + "_" + RTRIM$(id.n), 3
|
manageVariableList "", scope$ + "ARRAY_" + n$ + "_" + RTRIM$(id.n), 3
|
||||||
' END IF
|
END IF
|
||||||
' END IF
|
END IF
|
||||||
' ELSE
|
ELSE
|
||||||
' IF t AND ISUDT THEN
|
IF t AND ISUDT THEN
|
||||||
' manageVariableList "", scope$ + "UDT_" + RTRIM$(id.n), 4
|
manageVariableList "", scope$ + "UDT_" + RTRIM$(id.n), 4
|
||||||
' ELSE
|
ELSE
|
||||||
' n$ = id2shorttypename$
|
'n$ = id2shorttypename$
|
||||||
' IF LEFT$(n$, 1) = "_" THEN
|
'IF LEFT$(n$, 1) = "_" THEN
|
||||||
' manageVariableList "", scope$ + MID$(n$, 2) + "_" + RTRIM$(id.n), 5
|
' manageVariableList "", scope$ + MID$(n$, 2) + "_" + RTRIM$(id.n), 5
|
||||||
' ELSE
|
'ELSE
|
||||||
' manageVariableList "", scope$ + n$ + "_" + RTRIM$(id.n), 6
|
' manageVariableList "", scope$ + n$ + "_" + RTRIM$(id.n), 6
|
||||||
' END IF
|
'END IF
|
||||||
' END IF
|
END IF
|
||||||
' END IF
|
END IF
|
||||||
'END IF
|
END IF
|
||||||
|
|
||||||
currentid = i
|
currentid = i
|
||||||
EXIT FUNCTION
|
EXIT FUNCTION
|
||||||
|
|
Loading…
Reference in a new issue