diff options
| author | Bob Duff <duff@adacore.com> | 2021-06-16 06:47:57 -0400 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2021-07-12 12:50:56 +0000 |
| commit | 9b89dabfd851f0ee0e9f0c6e141f8e3fba08d1d7 (patch) | |
| tree | cc0bb6341b5a75cb860101712c5a0a169b57945a /gcc/ada/errout.ads | |
| parent | 86b228b87b64ffa6991fce0dc188985d7a9a173a (diff) | |
| download | gcc-9b89dabfd851f0ee0e9f0c6e141f8e3fba08d1d7.zip gcc-9b89dabfd851f0ee0e9f0c6e141f8e3fba08d1d7.tar.gz gcc-9b89dabfd851f0ee0e9f0c6e141f8e3fba08d1d7.tar.bz2 | |
[Ada] Duplicate Size/Value_Size clause
gcc/ada/
* sem_ch13.adb (Duplicate_Clause): Add a helper routine
Check_One_Attr, with a parameter for the attribute_designator we
are looking for, and one for the attribute_designator of the
current node (which are usually the same). For Size and
Value_Size, call it twice, once for each.
* errout.ads: Fix a typo.
Diffstat (limited to 'gcc/ada/errout.ads')
| -rw-r--r-- | gcc/ada/errout.ads | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/errout.ads b/gcc/ada/errout.ads index b0cbd82..9b2e08d 100644 --- a/gcc/ada/errout.ads +++ b/gcc/ada/errout.ads @@ -279,7 +279,7 @@ package Errout is -- The character ? appearing anywhere in a message makes the message -- warning instead of a normal error message, and the text of the -- message will be preceded by "warning:" in the normal case. The - -- handling of warnings if further controlled by the Warning_Mode + -- handling of warnings is further controlled by the Warning_Mode -- option (-w switch), see package Opt for further details, and also by -- the current setting from pragma Warnings. This pragma applies only -- to warnings issued from the semantic phase (not the parser), but |