Skip to content

Commit 762fc72

Browse files
U415-017: Check for null values when reading vectors
1 parent 3b0ab17 commit 762fc72

File tree

1 file changed

+5
-0
lines changed

1 file changed

+5
-0
lines changed

source/protocol/lsp-generic_vectors.adb

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -33,6 +33,11 @@ package body LSP.Generic_Vectors is
3333
LSP.JSON_Streams.JSON_Stream'Class (S.all);
3434
begin
3535
V.Clear;
36+
37+
if JS.R.Is_Null_Value then
38+
return;
39+
end if;
40+
3641
pragma Assert (JS.R.Is_Start_Array);
3742
JS.R.Read_Next;
3843

0 commit comments

Comments
 (0)