Skip to content

Commit c541993

Browse files
committed
Merge branch 'topic/vscode-tasks' into 'master'
Make als-project-file more robust Closes #1709 See merge request eng/ide/ada_language_server!2103
2 parents c03852f + 13cadce commit c541993

File tree

1 file changed

+6
-2
lines changed

1 file changed

+6
-2
lines changed

source/ada/lsp-ada_handlers-project_file_commands.adb

Lines changed: 6 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -61,8 +61,12 @@ package body LSP.Ada_Handlers.Project_File_Commands is
6161
begin
6262
if Handler.Project_Tree.Is_Defined then
6363
Element := Handler.Project_Tree.Root_Project;
64-
Value := VSS.Strings.Conversions.To_Virtual_String
65-
(URIs.Conversions.From_File (String (Element.Path_Name.Value)));
64+
if Element.Is_Defined then
65+
Value :=
66+
VSS.Strings.Conversions.To_Virtual_String
67+
(URIs.Conversions.From_File
68+
(String (Element.Path_Name.Value)));
69+
end if;
6670
end if;
6771

6872
Response := (Is_Null => False, Value => <>);

0 commit comments

Comments
 (0)