We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent a67b85c commit 1cc7bc0Copy full SHA for 1cc7bc0
lkql_checker/src/gnatcheck-source_table.adb
@@ -238,11 +238,12 @@ package body Gnatcheck.Source_Table is
238
First_Idx : Natural;
239
Last_Idx : Natural;
240
241
- Root : constant GPR2.Project.View.Object :=
+ Ambiguous : Boolean;
242
+ Root : constant GPR2.Project.View.Object :=
243
Arg_Project.Tree.Namespace_Root_Projects.First_Element;
- Res : constant GPR2.Build.Source.Object :=
244
+ Res : constant GPR2.Build.Source.Object :=
245
Root.View_Db.Visible_Source
- (GPR2.Path_Name.Simple_Name (Filename_Type (Fname)));
246
+ (GPR2.Path_Name.Simple_Name (Filename_Type (Fname)), Ambiguous);
247
begin
248
Free (Full_Source_Name_String);
249
Free (Short_Source_Name_String);
0 commit comments