We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
2 parents a7264f3 + 477a54a commit 593f296Copy full SHA for 593f296
code_analysis/src/codepeer.adb
@@ -256,7 +256,11 @@ package body CodePeer is
256
begin
257
for Check of Self.Checks loop
258
if Length (Aux) = 0 then
259
- Append (Aux, " (");
+ if Is_CPL then
260
+ Append (Aux, " <");
261
+ else
262
+ Append (Aux, " (");
263
+ end if;
264
265
else
266
Append (Aux, ", ");
@@ -267,7 +271,11 @@ package body CodePeer is
267
271
end loop;
268
272
269
273
if Length (Aux) /= 0 then
270
- Append (Aux, ")");
274
275
+ Append (Aux, ">");
276
277
+ Append (Aux, ")");
278
279
end if;
280
281
return Aux;
0 commit comments