File tree Expand file tree Collapse file tree 1 file changed +5
-4
lines changed Expand file tree Collapse file tree 1 file changed +5
-4
lines changed Original file line number Diff line number Diff line change 1
1
-- ----------------------------------------------------------------------------
2
2
-- Language Server Protocol --
3
3
-- --
4
- -- Copyright (C) 2018-2023 , AdaCore --
4
+ -- Copyright (C) 2018-2025 , AdaCore --
5
5
-- --
6
6
-- This is free software; you can redistribute it and/or modify it under --
7
7
-- terms of the GNU General Public License as published by the Free Soft- --
@@ -21,6 +21,7 @@ with GNAT.Strings;
21
21
with GNATCOLL.Traces ;
22
22
with GNATCOLL.VFS ;
23
23
with Gnatformat.Configuration ;
24
+ with Gnatformat.Edits ;
24
25
with Gnatformat.Formatting ;
25
26
26
27
with Langkit_Support.Symbols ;
@@ -1450,17 +1451,17 @@ package body LSP.Ada_Documents is
1450
1451
1451
1452
declare
1452
1453
Range_Formatted_Document :
1453
- constant Gnatformat.Formatting.Formatted_Edits :=
1454
+ constant Gnatformat.Edits.Formatting_Edit_Type :=
1454
1455
Gnatformat.Formatting.Range_Format
1455
1456
(Self.Unit (Context),
1456
1457
Self.To_Source_Location_Range (Span),
1457
1458
Full_Options);
1458
1459
1459
1460
begin
1460
1461
return
1461
- (Self.To_A_Range (Range_Formatted_Document.Edit .Location),
1462
+ (Self.To_A_Range (Range_Formatted_Document.Text_Edit .Location),
1462
1463
VSS.Strings.Conversions.To_Virtual_String
1463
- (Range_Formatted_Document.Edit .Text));
1464
+ (Range_Formatted_Document.Text_Edit .Text));
1464
1465
end ;
1465
1466
end Range_Format ;
1466
1467
You can’t perform that action at this time.
0 commit comments