diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-04-20 10:55:51 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-04-20 10:55:51 +0200 |
| commit | d7f9440126bb66732dced069c6cc61ea136c1f57 (patch) | |
| tree | d3d43f7a558b700ce77e85a82786d8e77509880d /gcc/ada/sem_ch10.adb | |
| parent | f8b86c2d808dadbb9143adacc1b0c162dbf58e1a (diff) | |
| download | gcc-d7f9440126bb66732dced069c6cc61ea136c1f57.zip gcc-d7f9440126bb66732dced069c6cc61ea136c1f57.tar.gz gcc-d7f9440126bb66732dced069c6cc61ea136c1f57.tar.bz2 | |
[multiple changes]
2009-04-20 Bob Duff <duff@adacore.com>
* rtsfind.adb: Minor comment fix
2009-04-20 Robert Dewar <dewar@adacore.com>
* exp_aggr.adb: Minor reformatting
Minor code reorganization (use Nkind_In)
* g-socket.adb: Minor reformatting
* g-socket.ads: Minor comment fix
* s-auxdec.ads: Minor comment and organization update.
* s-auxdec-vms_64.ads: Minor comment and organization update.
* sem_ch10.adb: Minor addition of ??? comment
* sem_disp.adb: Minor reformatting
From-SVN: r146375
Diffstat (limited to 'gcc/ada/sem_ch10.adb')
| -rw-r--r-- | gcc/ada/sem_ch10.adb | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/ada/sem_ch10.adb b/gcc/ada/sem_ch10.adb index b72c1d2..17f9074 100644 --- a/gcc/ada/sem_ch10.adb +++ b/gcc/ada/sem_ch10.adb @@ -774,6 +774,8 @@ package body Sem_Ch10 is Version_Update (N, Lib_Unit); end if; + -- Comment needed here ??? + if Nkind (Defining_Unit_Name (Specification (Unit_Node))) = N_Defining_Program_Unit_Name then |