From 7fe16580f0d58b8527f6bf078d5ba7279a2ddb45 Mon Sep 17 00:00:00 2001 From: Andreas Jaeger Date: Sun, 21 Nov 2004 21:06:10 +0100 Subject: [PATCH] stylesw.adb: Change Style_Check_Subprogram_Order to Style_Check_Order_Subprograms. * stylesw.adb: Change Style_Check_Subprogram_Order to Style_Check_Order_Subprograms. From-SVN: r90985 --- gcc/ada/ChangeLog | 5 +++++ gcc/ada/stylesw.adb | 14 +++++++------- 2 files changed, 12 insertions(+), 7 deletions(-) diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 3dbed55fddf..ac42b983379 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,8 @@ +2004-11-21 Andreas Jaeger + + * stylesw.adb: Change Style_Check_Subprogram_Order to + Style_Check_Order_Subprograms. + 2004-11-18 Arnaud Charlet * adaint.h, adaint.c diff --git a/gcc/ada/stylesw.adb b/gcc/ada/stylesw.adb index 8c2aa58d08e..b07826f7f8a 100644 --- a/gcc/ada/stylesw.adb +++ b/gcc/ada/stylesw.adb @@ -50,7 +50,7 @@ package body Stylesw is Style_Check_References := False; Style_Check_Specs := False; Style_Check_Standard := False; - Style_Check_Subprogram_Order := False; + Style_Check_Order_Subprograms := False; Style_Check_Tokens := False; end Reset_Style_Check_Options; @@ -113,7 +113,7 @@ package body Stylesw is Add ('k', Style_Check_Keyword_Casing); Add ('l', Style_Check_Layout); Add ('n', Style_Check_Standard); - Add ('o', Style_Check_Subprogram_Order); + Add ('o', Style_Check_Order_Subprograms); Add ('p', Style_Check_Pragma_Casing); Add ('r', Style_Check_References); Add ('s', Style_Check_Specs); @@ -279,19 +279,19 @@ package body Stylesw is Style_Check_Max_Line_Length := Style_Max_Line_Length /= 0; when 'o' => - Style_Check_Subprogram_Order := True; + Style_Check_Order_Subprograms := True; when 'p' => - Style_Check_Pragma_Casing := True; + Style_Check_Pragma_Casing := True; when 'r' => - Style_Check_References := True; + Style_Check_References := True; when 's' => - Style_Check_Specs := True; + Style_Check_Specs := True; when 't' => - Style_Check_Tokens := True; + Style_Check_Tokens := True; when ' ' => null; -- 2.30.2