From ad8b87c8787bff3c56ad6372e272e6ec1fce9260 Mon Sep 17 00:00:00 2001 From: charlet Date: Mon, 11 Oct 2010 09:11:57 +0000 Subject: 2010-10-11 Bob Duff * sem_aggr.adb, impunit.adb, impunit.ads, switch-c.adb, usage.adb, sem_ch10.adb, sem_prag.adb, sem_ch12.adb, par-ch4.adb, par-ch6.adb, par-ch8.adb, exp_ch4.adb, sem_ch4.adb, sem_ch6.adb, par-prag.adb, opt.ads, par-ch3.adb, lib-xref.adb: Use Ada_2012 instead of Ada_12 (Ada_Version_Type). 2010-10-11 Javier Miranda * exp_util.adb (Safe_Prefixed_Reference): If the prefix is an explicit dereference then do not exclude dereferences of access-to-constant types to handle them as constant view of variables (and hence remove side effects when required). * sem_res.adb (Resolve_Slice): Ensure that side effects in the bounds are properly handled. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@165282 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/ada/par-ch3.adb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'gcc/ada/par-ch3.adb') diff --git a/gcc/ada/par-ch3.adb b/gcc/ada/par-ch3.adb index ec1f33a67f1..4b95767c299 100644 --- a/gcc/ada/par-ch3.adb +++ b/gcc/ada/par-ch3.adb @@ -3683,7 +3683,7 @@ package body Ch3 is -- Technically in the grammar, the expression must match the -- grammar for restricted expression. - if Ada_Version >= Ada_12 then + if Ada_Version >= Ada_2012 then Check_Restricted_Expression (Expr_Node); -- In Ada 83 mode, the syntax required a simple expression -- cgit v1.2.1