Skip to content

Commit 7ddd55b

Browse files
committed
Update tests.
1 parent b9ee6b3 commit 7ddd55b

File tree

10 files changed

+73
-26
lines changed

10 files changed

+73
-26
lines changed

testsuite/ada_lsp/SB21-042.tooltips.aspects/test.json

Lines changed: 50 additions & 13 deletions
Original file line numberDiff line numberDiff line change
@@ -131,7 +131,11 @@
131131
"value": "type My_Record is tagged record\n I : Integer := 1;\nend record\n with Alignment => (8);",
132132
"language": "ada"
133133
},
134-
"at foo.adb (3:4)"
134+
"at foo.adb (3:4)",
135+
{
136+
"language": "ada",
137+
"value": " Alignment => (8)"
138+
}
135139
]
136140
}
137141
}
@@ -163,7 +167,12 @@
163167
"value": "type My_New_Record is new My_Record with\n Record\n J : Integer := 2;\n K : Integer := 3;\n end record with Alignment => (8);",
164168
"language": "ada"
165169
},
166-
"at foo.adb (8:4)"
170+
"at foo.adb (8:4)",
171+
{
172+
"language": "ada",
173+
"value": " Alignment => (8)"
174+
}
175+
167176
]
168177
}
169178
}
@@ -227,7 +236,11 @@
227236
"value": "My_Int : Integer := 42 with Atomic;",
228237
"language": "ada"
229238
},
230-
"at foo.adb (14:4)"
239+
"at foo.adb (14:4)",
240+
{
241+
"language": "ada",
242+
"value": " Atomic"
243+
}
231244
]
232245
}
233246
}
@@ -288,10 +301,14 @@
288301
"result": {
289302
"contents": [
290303
{
291-
"value": "procedure Bar (V : in out My_Record)\nwith\n Pre => V.I > 0,\n Post => V.I > 0",
304+
"value": "procedure Bar (V : in out My_Record)",
292305
"language": "ada"
293306
},
294-
"at foo.adb (17:4)"
307+
"at foo.adb (17:4)",
308+
{
309+
"language": "ada",
310+
"value": " Pre => V.I > 0,\n Post => V.I > 0"
311+
}
295312
]
296313
}
297314
}
@@ -320,10 +337,14 @@
320337
"result": {
321338
"contents": [
322339
{
323-
"value": "procedure FooBar (V : in out My_New_Record)\nwith\n Pre =>\n V.I > 0\n and then (V.J > V.K\n and then V.K > V.I),\n Post => V.I = 0",
340+
"value": "procedure FooBar (V : in out My_New_Record)",
324341
"language": "ada"
325342
},
326-
"at foo.adb (22:4)"
343+
"at foo.adb (22:4)",
344+
{
345+
"language": "ada",
346+
"value": " Pre =>\n V.I > 0\n and then (V.J > V.K\n and then V.K > V.I),\n Post => V.I = 0"
347+
}
327348
]
328349
}
329350
}
@@ -352,10 +373,14 @@
352373
"result": {
353374
"contents": [
354375
{
355-
"value": "procedure Bar (V : in out My_Record)\nwith\n Pre => V.I > 0,\n Post => V.I > 0",
376+
"value": "procedure Bar (V : in out My_Record)",
356377
"language": "ada"
357378
},
358-
"at foo.adb (17:4)"
379+
"at foo.adb (17:4)",
380+
{
381+
"language": "ada",
382+
"value": " Pre => V.I > 0,\n Post => V.I > 0"
383+
}
359384
]
360385
}
361386
}
@@ -384,10 +409,14 @@
384409
"result": {
385410
"contents": [
386411
{
387-
"value": "procedure FooBar (V : in out My_New_Record)\nwith\n Pre =>\n V.I > 0\n and then (V.J > V.K\n and then V.K > V.I),\n Post => V.I = 0",
412+
"value": "procedure FooBar (V : in out My_New_Record)",
388413
"language": "ada"
389414
},
390-
"at foo.adb (22:4)"
415+
"at foo.adb (22:4)",
416+
{
417+
"language": "ada",
418+
"value": " Pre =>\n V.I > 0\n and then (V.J > V.K\n and then V.K > V.I),\n Post => V.I = 0"
419+
}
391420
]
392421
}
393422
}
@@ -419,7 +448,11 @@
419448
"value": "type My_Record is tagged record\n I : Integer := 1;\nend record\n with Alignment => (8);",
420449
"language": "ada"
421450
},
422-
"at foo.adb (3:4)"
451+
"at foo.adb (3:4)",
452+
{
453+
"language": "ada",
454+
"value": " Alignment => (8)"
455+
}
423456
]
424457
}
425458
}
@@ -451,7 +484,11 @@
451484
"value": "type My_New_Record is new My_Record with\n Record\n J : Integer := 2;\n K : Integer := 3;\n end record with Alignment => (8);",
452485
"language": "ada"
453486
},
454-
"at foo.adb (8:4)"
487+
"at foo.adb (8:4)",
488+
{
489+
"language": "ada",
490+
"value": " Alignment => (8)"
491+
}
455492
]
456493
}
457494
}

testsuite/ada_lsp/T123-048.incremental_editing/test.json

Lines changed: 12 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -371,10 +371,14 @@
371371
"result": {
372372
"contents": [
373373
{
374-
"value": "procedure C_Function\nwith\n Convention => C,\n Import => True,\n Link_Name => \"c_function\"",
374+
"value": "procedure C_Function",
375375
"language": "ada"
376376
},
377-
"at main.adb (3:4)"
377+
"at main.adb (3:4)",
378+
{
379+
"language": "ada",
380+
"value": " Convention => C,\n Import => True,\n Link_Name => \"c_function\""
381+
}
378382
]
379383
}
380384
}
@@ -555,10 +559,14 @@
555559
"result": {
556560
"contents": [
557561
{
558-
"value": "procedure C_Function\nwith\n Convention => C,\n Import => True,\n Link_Name => \"c_function\"",
562+
"value": "procedure C_Function",
559563
"language": "ada"
560564
},
561-
"at main.adb (3:4)"
565+
"at main.adb (3:4)",
566+
{
567+
"value": " Convention => C,\n Import => True,\n Link_Name => \"c_function\"",
568+
"language": "ada"
569+
}
562570
]
563571
}
564572
}

testsuite/ada_lsp/U721-012.signatureHelp.null_expr_funcs/test.json

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -226,7 +226,7 @@
226226
"result": {
227227
"signatures": [
228228
{
229-
"label": "procedure Bar (A : Integer; B, C : Integer) is null",
229+
"label": "procedure Bar (A : Integer; B, C : Integer)",
230230
"documentation": "",
231231
"parameters": [
232232
{

testsuite/ada_lsp/completion.complex_renames/test.json

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -199,7 +199,7 @@
199199
"additionalTextEdits": [],
200200
"kind": 3,
201201
"documentation": "at parent-children.ads (7:4)",
202-
"detail": "procedure Do_Someting (D : Children.Child) is null",
202+
"detail": "procedure Do_Someting (D : Children.Child)",
203203
"label": "Do_Someting"
204204
}
205205
]

testsuite/ada_lsp/completion.invisible2/test.json

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -154,7 +154,7 @@
154154
{
155155
"label": "Do_Nothing",
156156
"kind": 3,
157-
"detail": "procedure Do_Nothing (Obj : My_Int; A :Integer; B : Integer) is null",
157+
"detail": "procedure Do_Nothing (Obj : My_Int; A :Integer; B : Integer)",
158158
"documentation": "at bar.ads (7:4)",
159159
"sortText": "025&2Do_Nothing",
160160
"insertText": "Do_Nothing (${1:A : Integer}, ${2:B : Integer})$0",

testsuite/ada_lsp/completion.lazy_computation/test.json

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -211,7 +211,7 @@
211211
"result": {
212212
"label": "Select_Some",
213213
"kind": 3,
214-
"detail": "procedure Select_Some is null",
214+
"detail": "procedure Select_Some",
215215
"documentation": "at test.ads (3:4)\n\nThis a very useful comment.",
216216
"sortText": "100&1Select_Some",
217217
"insertTextFormat": 1,

testsuite/ada_lsp/completion.param.non_basic_calls/test.json

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -163,7 +163,7 @@
163163
{
164164
"label": "Params of Bar",
165165
"kind": 15,
166-
"detail": "procedure Bar (A, B : Integer) is null",
166+
"detail": "procedure Bar (A, B : Integer)",
167167
"documentation": "at foo.adb (4:4)",
168168
"sortText": "+02",
169169
"insertText": "${1:A : Integer}, ${2:B : Integer})$0",

testsuite/ada_lsp/completion.subp_parameters/test.json

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -256,7 +256,7 @@
256256
{
257257
"label": "Do_Nothing",
258258
"kind": 3,
259-
"detail": "procedure Do_Nothing (Obj : My_Int; A :Integer) is null",
259+
"detail": "procedure Do_Nothing (Obj : My_Int; A :Integer)",
260260
"documentation": "at bar.ads (7:4)",
261261
"sortText": "025&2Do_Nothing",
262262
"insertText": "Do_Nothing (${1:A : Integer})$0",

testsuite/ada_lsp/completion.subp_params_dotted_names/test.json

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -200,7 +200,7 @@
200200
{
201201
"label": "Do_Nothing",
202202
"kind": 3,
203-
"detail": "procedure Do_Nothing (Obj : My_Int; A :Integer) is null",
203+
"detail": "procedure Do_Nothing (Obj : My_Int; A :Integer)",
204204
"documentation": "at bar.ads (7:4)",
205205
"insertText": "Do_Nothing (${1:Obj : My_Int}, ${2:A : Integer})$0",
206206
"insertTextFormat": 2,

testsuite/ada_lsp/editor.incremental/test.json

Lines changed: 4 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1181,9 +1181,10 @@
11811181
"result": {
11821182
"contents": [
11831183
{
1184-
"value": "procedure foo is null",
1184+
"value": "procedure foo",
11851185
"language": "ada"
11861186
},
1187+
"null",
11871188
"at hello.ads (2:4)",
11881189
{
11891190
"value": "documentation for foo",
@@ -1346,9 +1347,10 @@
13461347
"result": {
13471348
"contents": [
13481349
{
1349-
"value": "procedure foo is null",
1350+
"value": "procedure foo",
13501351
"language": "ada"
13511352
},
1353+
"null",
13521354
"at hello.ads (3:4)",
13531355
{
13541356
"value": "documentation for foo",

0 commit comments

Comments
 (0)