Merge remote-tracking branch 'origin/master' into edge

Author: setton

source/ada/lsp-ada_handlers.adb

@@ -3305,8 +3305,10 @@ package body LSP.Ada_Handlers is
       Location_Text := LSP.Lal_Utils.Node_Location_Image (Decl);
 
       if Self.Project_Tree.Root_Project.Kind in GPR2.Aggregate_Kind then
-         Location_Text.Append (" in project ");
+         Location_Text.Append (VSS.Characters.Latin.Line_Feed);
+         Location_Text.Append ("As defined in project ");
          Location_Text.Append (C.Id);
+         Location_Text.Append (" (other projects skipped).");
       end if;
 
       Response.result.Value.contents.Vector.Append

testsuite/ada_lsp/implementation.aggregates/test.json

@@ -239,7 +239,7 @@
                         "value": "function Common_Fun return Integer",
                         "language": "ada"
                      },
-                     "at common_pack.ads (4:4) in project p"
+                     "at common_pack.ads (4:4)\nAs defined in project p (other projects skipped)."
                   ]
                }
             }
@@ -271,7 +271,7 @@
                         "value": "function Common_Fun return Integer",
                         "language": "ada"
                      },
-                     "at common_pack.ads (4:4) in project p"
+                     "at common_pack.ads (4:4)\nAs defined in project p (other projects skipped)."
                   ]
                }
             }