summaryrefslogtreecommitdiff
path: root/gcc/ada/style.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/style.adb')
-rw-r--r--gcc/ada/style.adb2
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/ada/style.adb b/gcc/ada/style.adb
index 9b74d614774..31a05fea8fd 100644
--- a/gcc/ada/style.adb
+++ b/gcc/ada/style.adb
@@ -136,6 +136,8 @@ package body Style is
-- lower case, except after an underline character.
procedure Check_Attribute_Name (Reserved : Boolean) is
+ pragma Warnings (Off, Reserved);
+
begin
if Style_Check_Attribute_Casing then
if Determine_Token_Casing /= Mixed_Case then