diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-11-19 10:56:53 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-11-19 10:56:53 +0000 |
| commit | 25ba8eb38bbbc147d86796ff8db54c44252709f7 (patch) | |
| tree | bd2bdeb5f19ff29203c41b2c8b4fd854bcaa43aa /gcc/ada/style.ads | |
| parent | 5245b786fc5507b712ad9dd5fc461962d269f78d (diff) | |
| download | gcc-25ba8eb38bbbc147d86796ff8db54c44252709f7.tar.gz | |
* errout.ads, errout.adb: (First_Sloc): New function
* par-ch5.adb (P_Condition): Check for redundant parens is now a style
check (-gnatyx) instead of being included as a redundant construct
warning.
* sem_ch6.adb: Change name Style_Check_Subprogram_Order to
Style_Check_Order_Subprograms.
* style.ads, styleg.ads, styleg.adb, styleg-c.adb, stylesw.ads,
stylesw.adb: Add Style_Check_Xtra_Parens
* usage.adb: Add line for -gnatyx (check extra parens)
* vms_data.ads: Add entry for STYLE_CHECKS=XTRA_PARENS => -gnatyx
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@90905 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/style.ads')
| -rw-r--r-- | gcc/ada/style.ads | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/gcc/ada/style.ads b/gcc/ada/style.ads index ac2d6296938..c7a46ed3e3b 100644 --- a/gcc/ada/style.ads +++ b/gcc/ada/style.ads @@ -169,6 +169,11 @@ package Style is renames Style_Inst.Check_Vertical_Bar; -- Called after scanning a vertical bar to check spacing + procedure Check_Xtra_Parens (Loc : Source_Ptr) + renames Style_Inst.Check_Xtra_Parens; + -- Called after scanning a conditional expression that has at least one + -- level of parentheses around the entire expression. + procedure No_End_Name (Name : Node_Id) renames Style_Inst.No_End_Name; -- Called if an END is encountered where a name is allowed but not present. |