2008-05-20 Hristian Kirtchev <kirtchev@adacore.com>
* par-ch3.adb (P_Access_Definition): Change the error message when parsing "access all" in Ada 95 mode. The message no longer forces the user to recompile in 05 mode only to discover that anonymous access types are not allowed to have "all". From-SVN: r135633
This commit is contained in:
parent
23e6615e0f
commit
caebb7c302
@ -3931,8 +3931,7 @@ package body Ch3 is
|
||||
if Token = Tok_All then
|
||||
if Ada_Version < Ada_05 then
|
||||
Error_Msg_SP
|
||||
("access-all in this context is an Ada 2005 extension");
|
||||
Error_Msg_SP ("\unit should be compiled with -gnat05 switch");
|
||||
("ALL is not permitted for anonymous access types");
|
||||
end if;
|
||||
|
||||
Scan; -- past ALL
|
||||
|
Loading…
Reference in New Issue
Block a user