aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/sem_attr.adb
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2013-01-02 10:31:07 +0100
committerArnaud Charlet <charlet@gcc.gnu.org>2013-01-02 10:31:07 +0100
commit1824c168768592a20fcf9fe41634f9ebecabb52c (patch)
treed260c536f19e9090be2316aa878f77e6b69f7fa1 /gcc/ada/sem_attr.adb
parentdb318f46594d4080931db7f56ccb30c7f6f1f949 (diff)
downloadgcc-1824c168768592a20fcf9fe41634f9ebecabb52c.zip
gcc-1824c168768592a20fcf9fe41634f9ebecabb52c.tar.gz
gcc-1824c168768592a20fcf9fe41634f9ebecabb52c.tar.bz2
[multiple changes]
2013-01-02 Vincent Celier <celier@adacore.com> * switch-m.adb (Normalize_Compiler_Switches): Record the complete switch -fstack-check=specific instead of its shorter alias -fstack-check. 2013-01-02 Ed Schonberg <schonberg@adacore.com> * sem_ch3.adb (Derive_Subprogram): Enforce RM 6.3.1 (8): if the derived type is a tagged generic formal type with unknown discriminants, the inherited operation has convention Intrinsic. As such, the 'Access attribute cannot be applied to it. 2013-01-02 Thomas Quinot <quinot@adacore.com> * sem_attr.adb: Minor reformatting. From-SVN: r194780
Diffstat (limited to 'gcc/ada/sem_attr.adb')
-rw-r--r--gcc/ada/sem_attr.adb6
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/sem_attr.adb b/gcc/ada/sem_attr.adb
index 94cbd9e..963a19f 100644
--- a/gcc/ada/sem_attr.adb
+++ b/gcc/ada/sem_attr.adb
@@ -4251,9 +4251,9 @@ package body Sem_Attr is
Prag := N;
while not Nkind_In (Prag, N_Pragma,
- N_Function_Specification,
- N_Procedure_Specification,
- N_Subprogram_Body)
+ N_Function_Specification,
+ N_Procedure_Specification,
+ N_Subprogram_Body)
loop
Prag := Parent (Prag);
end loop;