Avoid uninitialized status in ALS job

for cases when Property_Error is raised and a job doesn't
handle it by it-self.

Refs eng/libadalang/libadalang#1490
This commit is contained in:
Maxim Reznik
2024-11-13 14:13:37 +02:00
parent 9a97b74210
commit 24f7cacdce

View File

@@ -38,6 +38,7 @@ package body LSP.Ada_Request_Jobs is
(Client'Unchecked_Access);
begin
Self.Request.Visit_Server_Receiver (R);
Status := LSP.Server_Jobs.Done;
end;
end Execute_Request;