mirror of
https://github.com/moparisthebest/Simba
synced 2024-11-24 18:22:25 -05:00
Tried to fix zeh codehints error. + latest Smart.
This commit is contained in:
parent
1159703b7c
commit
b61153e634
Binary file not shown.
@ -1215,6 +1215,8 @@ var
|
|||||||
b: array[1..2] of TDeclaration;
|
b: array[1..2] of TDeclaration;
|
||||||
c: array[0..2] of TDeclarationClass;
|
c: array[0..2] of TDeclarationClass;
|
||||||
begin
|
begin
|
||||||
|
if item = nil then
|
||||||
|
exit;
|
||||||
if (Item is TciProcedureDeclaration) then
|
if (Item is TciProcedureDeclaration) then
|
||||||
begin
|
begin
|
||||||
AddFuncDeclaration(TciProcedureDeclaration(Item), ItemList, InsertList);
|
AddFuncDeclaration(TciProcedureDeclaration(Item), ItemList, InsertList);
|
||||||
@ -1339,7 +1341,7 @@ procedure TCodeInsight.FillSynCompletionProposal(ItemList, InsertList: TStrings;
|
|||||||
var
|
var
|
||||||
i: Integer;
|
i: Integer;
|
||||||
begin
|
begin
|
||||||
if item = nil then
|
if (item = nil) or (ItemList = nil) or (InsertList = nil) or (Item.Proposal_InsertList = nil) or (Item.Proposal_ItemList = nil) then
|
||||||
exit;
|
exit;
|
||||||
if (not Item.Proposal_Filled) then
|
if (not Item.Proposal_Filled) then
|
||||||
Item.FillProposal;
|
Item.FillProposal;
|
||||||
|
Loading…
Reference in New Issue
Block a user