diff options
| author | Bob Duff <duff@adacore.com> | 2008-08-22 14:41:42 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2008-08-22 14:41:42 +0200 |
| commit | 25bb6a4e0711f7db2df5089d4054c3cf6c15025d (patch) | |
| tree | c5c51a2c4f7a8e1c334cebb1a09cf4188f13778e | |
| parent | 87cd63ba592c3327adb7846bfdd92ee066ae3030 (diff) | |
| download | gcc-25bb6a4e0711f7db2df5089d4054c3cf6c15025d.zip gcc-25bb6a4e0711f7db2df5089d4054c3cf6c15025d.tar.gz gcc-25bb6a4e0711f7db2df5089d4054c3cf6c15025d.tar.bz2 | |
exp_ch7.adb: Minor comment fix
2008-08-22 Bob Duff <duff@adacore.com>
* exp_ch7.adb: Minor comment fix
From-SVN: r139448
| -rw-r--r-- | gcc/ada/exp_ch7.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/exp_ch7.adb b/gcc/ada/exp_ch7.adb index 0140c76..fb0f7dc 100644 --- a/gcc/ada/exp_ch7.adb +++ b/gcc/ada/exp_ch7.adb @@ -854,7 +854,7 @@ package body Exp_Ch7 is function Has_Some_Controlled_Component (Rec : Entity_Id) return Boolean; -- If type is not frozen yet, check explicitly among its components, - -- because flag is not necessarily set. + -- because the Has_Controlled_Component flag is not necessarily set. ----------------------------------- -- Has_Some_Controlled_Component -- |