diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2013-07-08 09:55:24 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2013-07-08 09:55:24 +0200 |
| commit | 08daa7828efe5443383b2553e964c21aaed17cdf (patch) | |
| tree | 8e07c8e54d101174bf9cc82468e145979fcbbc1a /gcc/ada/exp_ch4.adb | |
| parent | 8d80ff64373eb64492469fbf4f0bf0043f9e0854 (diff) | |
| download | gcc-08daa7828efe5443383b2553e964c21aaed17cdf.zip gcc-08daa7828efe5443383b2553e964c21aaed17cdf.tar.gz gcc-08daa7828efe5443383b2553e964c21aaed17cdf.tar.bz2 | |
[multiple changes]
2013-07-08 Robert Dewar <dewar@adacore.com>
* exp_ch4.adb: Minor reformatting.
2013-07-08 Ed Schonberg <schonberg@adacore.com>
* sem_ch4.adb (Complete_Object_Operation): In ASIS mode, if
the parent node is a selected component and the analysis as a
call is successful, set the type of the selector in the parent
node for subsequent checks, because the rewriting of the node
does not take place during pre-analysis.
From-SVN: r200761
Diffstat (limited to 'gcc/ada/exp_ch4.adb')
| -rw-r--r-- | gcc/ada/exp_ch4.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/exp_ch4.adb b/gcc/ada/exp_ch4.adb index f351b67..46cf44b 100644 --- a/gcc/ada/exp_ch4.adb +++ b/gcc/ada/exp_ch4.adb @@ -2835,7 +2835,7 @@ package body Exp_Ch4 is elsif Ada_Version >= Ada_2012 or else Is_Bounded_String (Typ) then - -- if no TSS has been created for the type, check whether there is + -- If no TSS has been created for the type, check whether there is -- a primitive equality declared for it. declare |