From ad510c7c8b72cfe43ec0c0c94d650cdff91cc6a6 Mon Sep 17 00:00:00 2001 From: Ronan Desplanques Date: Wed, 14 Feb 2024 10:34:32 +0100 Subject: 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. --- gcc/ada/usage.adb | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'gcc') 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 " & -- cgit v1.1