diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2010-10-21 11:52:52 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2010-10-21 11:52:52 +0200 |
| commit | 90c63b098ced9fb7b17143e4e5a4f860d31ea680 (patch) | |
| tree | 48fbc1f9e140568185208db10385d01e204813e4 /gcc/ada/sem_res.adb | |
| parent | acee84866682d56e06be28e1d81e399214cde5f6 (diff) | |
| download | gcc-90c63b098ced9fb7b17143e4e5a4f860d31ea680.zip gcc-90c63b098ced9fb7b17143e4e5a4f860d31ea680.tar.gz gcc-90c63b098ced9fb7b17143e4e5a4f860d31ea680.tar.bz2 | |
[multiple changes]
2010-10-21 Robert Dewar <dewar@adacore.com>
* exp_ch4.adb, exp_intr.adb, par-ch4.adb, scn.adb, sem_ch4.adb,
sem_res.adb, sem_util.adb, sinfo.ads, a-except-2005.adb: Minor
reformatting.
* snames.ads-tmpl: Add note on Name_Some (not a reserved keyword).
2010-10-21 Geert Bosch <bosch@adacore.com>
* ttypef.ads: Further cleanup of Safe_XXX float attributes.
From-SVN: r165756
Diffstat (limited to 'gcc/ada/sem_res.adb')
| -rw-r--r-- | gcc/ada/sem_res.adb | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/sem_res.adb b/gcc/ada/sem_res.adb index cc8ac85..80b074e 100644 --- a/gcc/ada/sem_res.adb +++ b/gcc/ada/sem_res.adb @@ -7758,9 +7758,9 @@ package body Sem_Res is Wrong_Type (Expr, Target_Typ); end if; - -- If the target type is unconstrained, then we reset the type of - -- the result from the type of the expression. For other cases, the - -- actual subtype of the expression is the target type. + -- If the target type is unconstrained, then we reset the type of the + -- result from the type of the expression. For other cases, the actual + -- subtype of the expression is the target type. if Is_Composite_Type (Target_Typ) and then not Is_Constrained (Target_Typ) |