diff options
| author | Arnaud Charlet <charlet@adacore.com> | 2023-01-19 08:43:47 +0000 |
|---|---|---|
| committer | Marc Poulhiès <poulhies@adacore.com> | 2023-05-16 10:30:57 +0200 |
| commit | b54fd57a1b3429542286c3bea7c38cce931064f7 (patch) | |
| tree | 0a528f921767472cb0c2cb31c279c5bf4bcd593a /gcc/ada/errout.ads | |
| parent | 387e147cf513e4aa703e9c2f4eb417af986f16ba (diff) | |
| download | gcc-b54fd57a1b3429542286c3bea7c38cce931064f7.zip gcc-b54fd57a1b3429542286c3bea7c38cce931064f7.tar.gz gcc-b54fd57a1b3429542286c3bea7c38cce931064f7.tar.bz2 | |
ada: Add tags on style messages
Similar to tags on warnings [-gnatwx], we add tags on style messages
[-gnatyx] when -gnatw.d is enabled.
gcc/ada/
* errout.ads: Update comment.
* errout.adb (Skip_Msg_Insertion_Warning): Update to take e.g.
-gnatyM into account.
* erroutc.adb (Get_Warning_Option, Get_Warning_Tag)
(Prescan_Message): Add support for Style tags.
* par-ch5.adb, par-ch6.adb, par-ch7.adb, par-endh.adb,
par-util.adb, style.adb, styleg.adb: Set tag on all style
messages.
Diffstat (limited to 'gcc/ada/errout.ads')
| -rw-r--r-- | gcc/ada/errout.ads | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/errout.ads b/gcc/ada/errout.ads index 1e09961..f152839 100644 --- a/gcc/ada/errout.ads +++ b/gcc/ada/errout.ads @@ -307,9 +307,9 @@ package Errout is -- Insertion character ?x? ?.x? ?_x? (warning with switch) -- "x" is a (lower-case) warning switch character. -- Like ??, but if the flag Warn_Doc_Switch is True, adds the string - -- "[-gnatwx]", "[-gnatw.x]", or "[-gnatw_x]", at the end of the - -- warning message. For continuations, use this on each continuation - -- message. + -- "[-gnatwx]", "[-gnatw.x]", "[-gnatw_x]", or "[-gnatyx]" (for style + -- messages), at the end of the warning message. For continuations, use + -- this on each continuation message. -- Insertion character ?*? (restriction warning) -- Like ?, but if the flag Warn_Doc_Switch is True, adds the string |