Skip to content

Commit 9811b46

Browse files
committed
Fix some CONSTRAINT_ERROR (invalid data) for
non-initialized local variables. (no-issue-check)
1 parent 93c6475 commit 9811b46

File tree

2 files changed

+4
-2
lines changed

2 files changed

+4
-2
lines changed

source/ada/lsp-ada_handlers-call_hierarchy.adb

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -313,8 +313,9 @@ package body LSP.Ada_Handlers.Call_Hierarchy is
313313
end if;
314314
end Callback;
315315

316-
Ignore : Libadalang.Common.Ref_Result_Kind;
317316
Cursor : Laltools.Common.References_By_Subprogram.Cursor;
317+
Ignore : Libadalang.Common.Ref_Result_Kind :=
318+
Libadalang.Common.No_Ref;
318319

319320
begin
320321
Laltools.Call_Hierarchy.Find_Outgoing_Calls

source/ada/lsp-ada_handlers.adb

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -2539,8 +2539,9 @@ package body LSP.Ada_Handlers is
25392539

25402540
Definition : Libadalang.Analysis.Defining_Name;
25412541
Imprecise : Boolean := False;
2542-
Ignore : Libadalang.Common.Ref_Result_Kind;
25432542
Decl : Libadalang.Analysis.Basic_Decl;
2543+
Ignore : Libadalang.Common.Ref_Result_Kind :=
2544+
Libadalang.Common.No_Ref;
25442545

25452546
begin
25462547
if Name_Node.Is_Null then

0 commit comments

Comments
 (0)