diff options
| author | Andreas Jaeger <aj@suse.de> | 2004-11-21 21:06:10 +0100 |
|---|---|---|
| committer | Andreas Jaeger <aj@gcc.gnu.org> | 2004-11-21 21:06:10 +0100 |
| commit | 7fe16580f0d58b8527f6bf078d5ba7279a2ddb45 (patch) | |
| tree | 9a67b2c892b2f151f38474c5ddf9bab482bc711c /gcc/ada | |
| parent | f146ac0af879daa3f4e6d71c569092234a91faf6 (diff) | |
| download | gcc-7fe16580f0d58b8527f6bf078d5ba7279a2ddb45.zip gcc-7fe16580f0d58b8527f6bf078d5ba7279a2ddb45.tar.gz gcc-7fe16580f0d58b8527f6bf078d5ba7279a2ddb45.tar.bz2 | |
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
Diffstat (limited to 'gcc/ada')
| -rw-r--r-- | gcc/ada/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/ada/stylesw.adb | 14 |
2 files changed, 12 insertions, 7 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 3dbed55..ac42b98 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,8 @@ +2004-11-21 Andreas Jaeger <aj@suse.de> + + * stylesw.adb: Change Style_Check_Subprogram_Order to + Style_Check_Order_Subprograms. + 2004-11-18 Arnaud Charlet <charlet@adacore.com> * adaint.h, adaint.c diff --git a/gcc/ada/stylesw.adb b/gcc/ada/stylesw.adb index 8c2aa58..b07826f 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; |