Skip to content

Commit b58c835

Browse files
committed
Merge branch 'topic/gnatcheck/adapt_to_gpr2' into 'master'
Adapt GNATcheck sources to the "gpr2-build-view_db.ads" update See merge request eng/libadalang/langkit-query-language!401
2 parents a67b85c + 1cc7bc0 commit b58c835

File tree

1 file changed

+4
-3
lines changed

1 file changed

+4
-3
lines changed

lkql_checker/src/gnatcheck-source_table.adb

Lines changed: 4 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -238,11 +238,12 @@ package body Gnatcheck.Source_Table is
238238
First_Idx : Natural;
239239
Last_Idx : Natural;
240240

241-
Root : constant GPR2.Project.View.Object :=
241+
Ambiguous : Boolean;
242+
Root : constant GPR2.Project.View.Object :=
242243
Arg_Project.Tree.Namespace_Root_Projects.First_Element;
243-
Res : constant GPR2.Build.Source.Object :=
244+
Res : constant GPR2.Build.Source.Object :=
244245
Root.View_Db.Visible_Source
245-
(GPR2.Path_Name.Simple_Name (Filename_Type (Fname)));
246+
(GPR2.Path_Name.Simple_Name (Filename_Type (Fname)), Ambiguous);
246247
begin
247248
Free (Full_Source_Name_String);
248249
Free (Short_Source_Name_String);

0 commit comments

Comments
 (0)