summaryrefslogtreecommitdiff
path: root/gcc/ada/sem_ch2.adb
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2011-08-04 08:52:52 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2011-08-04 08:52:52 +0000
commit19dde43a5444696b62f54433def1d7f240f4aa09 (patch)
treecf9117d20a6ae44e087010ef13e99f9d232e3109 /gcc/ada/sem_ch2.adb
parent0cafb06692a9f2f52e222239c0c3d95835d240f2 (diff)
downloadgcc-19dde43a5444696b62f54433def1d7f240f4aa09.tar.gz
2011-08-04 Javier Miranda <miranda@adacore.com>
* exp_strm.adb (Build_Array_Input_Function): if the array type is constrained, do not attempt to build a subtype of it. 2011-08-04 Yannick Moy <moy@adacore.com> * errout.ads Change comments: remove 'R'M as an example where quotes are needed; add ALFA as another case where quotes are not needed * erroutc.adb (Set_Msg_Insertion_Reserved_Word): add ALFA as another case where quotes are not needed. * sem_ch11.adb, sem_ch13.adb, sem_ch2.adb, sem_ch3.adb, sem_ch4.adb, sem_ch5.adb, sem_ch6.adb, sem_ch9.adb, sem_prag.adb, sem_res.adb: Remove all occurrences of 'A'L'F'A 2011-08-04 Ed Schonberg <schonberg@adacore.com> * sem_ch13.adb: check legality of invariant pragma. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@177335 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/sem_ch2.adb')
-rw-r--r--gcc/ada/sem_ch2.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sem_ch2.adb b/gcc/ada/sem_ch2.adb
index d6db4d96bef..d4393963a05 100644
--- a/gcc/ada/sem_ch2.adb
+++ b/gcc/ada/sem_ch2.adb
@@ -81,7 +81,7 @@ package body Sem_Ch2 is
and then Is_Object (Entity (N))
and then not Is_In_ALFA (Entity (N))
then
- Mark_Non_ALFA_Subprogram ("object is not in 'A'L'F'A", N);
+ Mark_Non_ALFA_Subprogram ("object is not in ALFA", N);
end if;
end if;
end Analyze_Identifier;