diff options
| author | Ronan Desplanques <desplanques@adacore.com> | 2024-02-14 10:34:32 +0100 |
|---|---|---|
| committer | Marc Poulhiès <poulhies@adacore.com> | 2024-05-14 10:19:57 +0200 |
| commit | ad510c7c8b72cfe43ec0c0c94d650cdff91cc6a6 (patch) | |
| tree | 94c7cfc968b5f45c6b3534ac059d54338b0ffb19 /gcc | |
| parent | 42ea46c67ddcde686e3792864d035dfd1645801f (diff) | |
| download | gcc-ad510c7c8b72cfe43ec0c0c94d650cdff91cc6a6.zip gcc-ad510c7c8b72cfe43ec0c0c94d650cdff91cc6a6.tar.gz gcc-ad510c7c8b72cfe43ec0c0c94d650cdff91cc6a6.tar.bz2 | |
ada: Fix warning indicators in usage string
Before this patch, the default status of -gnatw.i and -gnatw.d are
reported incorrectly in the usage string used throughout GNAT tools.
This patch fixes this.
gcc/ada/
* usage.adb (Usage): Fix enabled-by-default indicators.
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/usage.adb | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/ada/usage.adb b/gcc/ada/usage.adb index 85b371a..59cbd6f 100644 --- a/gcc/ada/usage.adb +++ b/gcc/ada/usage.adb @@ -498,8 +498,8 @@ begin "Compile_Time_Warning"); Write_Line (" d turn on warnings for implicit dereference"); Write_Line (" D* turn off warnings for implicit dereference"); - Write_Line (" .d turn on tagging of warnings with -gnatw switch"); - Write_Line (" .D* turn off tagging of warnings with -gnatw switch"); + Write_Line (" .d* turn on tagging of warnings with -gnatw switch"); + Write_Line (" .D turn off tagging of warnings with -gnatw switch"); Write_Line (" e treat all warnings (but not info) as errors"); Write_Line (" .e turn on every optional info/warning " & "(no exceptions)"); @@ -517,8 +517,8 @@ begin Write_Line (" .H* turn off warnings for holes in records"); Write_Line (" i*+ turn on warnings for implementation unit"); Write_Line (" I turn off warnings for implementation unit"); - Write_Line (" .i*+ turn on warnings for overlapping actuals"); - Write_Line (" .I turn off warnings for overlapping actuals"); + Write_Line (" .i+ turn on warnings for overlapping actuals"); + Write_Line (" .I* turn off warnings for overlapping actuals"); Write_Line (" j+ turn on warnings for obsolescent " & "(annex J) feature"); Write_Line (" J* turn off warnings for obsolescent " & |