diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-08-01 14:37:10 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-08-01 14:37:10 +0200 |
| commit | e7d897b851a301c69124a1c94a13d3d766649757 (patch) | |
| tree | 10b80c95922155a511235ebfec7c842f9c6b184e /gcc/ada/sem_cat.adb | |
| parent | 460b171de54de807c8d139da4803bd0fae500622 (diff) | |
| download | gcc-e7d897b851a301c69124a1c94a13d3d766649757.zip gcc-e7d897b851a301c69124a1c94a13d3d766649757.tar.gz gcc-e7d897b851a301c69124a1c94a13d3d766649757.tar.bz2 | |
[multiple changes]
2011-08-01 Robert Dewar <dewar@adacore.com>
* exp_ch4.adb, sem_cat.adb: Minor reformatting.
2011-08-01 Geert Bosch <bosch@adacore.com>
* atree.ads: Fix comment.
From-SVN: r177023
Diffstat (limited to 'gcc/ada/sem_cat.adb')
| -rw-r--r-- | gcc/ada/sem_cat.adb | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/sem_cat.adb b/gcc/ada/sem_cat.adb index e262dc7..83d3d6a 100644 --- a/gcc/ada/sem_cat.adb +++ b/gcc/ada/sem_cat.adb @@ -1271,9 +1271,9 @@ package body Sem_Cat is -- For controlled type or type with controlled component, check -- preelaboration flag, as there may be a non-null Initialize -- primitive. For language versions earlier than Ada 2005, - -- there is no notion of preelaborable initialization, and the - -- rules for controlled objects are enforced in - -- Validate_Controlled_Object. + -- there is no notion of preelaborable initialization, and + -- Validate_Controlled_Object is used to enforce rules for + -- controlled objects. if (Is_Controlled (ET) or else Has_Controlled_Component (ET)) and then Ada_Version >= Ada_2005 |