Skip to content

Commit 5dee04e

Browse files
committed
Make doc-strings clearer for GNAT tags striping functions
1 parent 885537e commit 5dee04e

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

lkql_checker/src/gnatcheck-diagnoses.adb

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -174,7 +174,7 @@ package body Gnatcheck.Diagnoses is
174174
-- boolean parameter is used to define the needed indentation level
175175

176176
function Strip_Tag (Diag : String) return String;
177-
-- Strip trailing " [-gnatxxx]", if any
177+
-- Strip trailing GNAT tag following the format " [-gnat<x>]", if any
178178

179179
----------------------------------------------------------------------
180180
-- Data structures and local routines for rule exemption mechanism --
@@ -1682,7 +1682,7 @@ package body Gnatcheck.Diagnoses is
16821682

16831683
function Preprocess_Diag (Diag : String) return String;
16841684
-- Add GPS_Prefix if Progress_Indicator_Mode is True, and remove any
1685-
-- trailing [-gnatwxxx].
1685+
-- trailing GNAT tag following the "[-gnat<x>]" format.
16861686

16871687
procedure Counted_Print_Diagnosis
16881688
(Position : Error_Messages_Storage.Cursor);

0 commit comments

Comments
 (0)