aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/sem_ch13.adb
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2014-07-29 16:00:06 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2014-07-29 16:00:06 +0200
commiteffdbb7d578ab9e8122f17b7249c107a93e685ba (patch)
tree4711b0c6c08e0a2d38a040380cfbf314c9bbe8e9 /gcc/ada/sem_ch13.adb
parent09d67391ff9fa5a74a2bf727a50b5199b736fdb0 (diff)
downloadgcc-effdbb7d578ab9e8122f17b7249c107a93e685ba.zip
gcc-effdbb7d578ab9e8122f17b7249c107a93e685ba.tar.gz
gcc-effdbb7d578ab9e8122f17b7249c107a93e685ba.tar.bz2
[multiple changes]
2014-07-29 Robert Dewar <dewar@adacore.com> * gnat_rm.texi: Change theta to @ in documentation of aspect Dimension_System. 2014-07-29 Robert Dewar <dewar@adacore.com> * sem_attr.adb (Uneval_Old_Msg): Flags Uneval_Old_Accept/Warn are now on pragma. * sem_ch13.adb (Analyze_Aspect_Specifications): Remove setting of Uneval_Old_* * sem_prag.adb (Analyze_Pragma): Set Uneval_Old_* flags * sinfo.ads, sinfo.adb: Move Uneval_Old_Accept/Warn to N_Pragma node. 2014-07-29 Javier Miranda <miranda@adacore.com> * types.ads Update documentation on how to add new reason codes for exceptions. (RT_Exception_Code): Keep values ordered by their reason code. Required by the .NET backend. (RT_CE_Exceptions): Subtype declaration removed. (RT_PE_Exceptions): Subtype declaration removed. (RT_SE_Exceptions): Subtype declaration removed. (Kind): New mapping table of RT_Exception_Codes. * exp_ch11.adb (Get_RT_Exception_Entity): Updated to use the new mapping table. * tbuild.adb (Make_Raise_Storage_Error): Updated to use the new mapping table. (Make_Raise_Program_Error): Updated to use the new mapping table. (Make_Raise_Storage_Error): Updated to use the new mapping table. * a-except.adb Keep Rcheck_CE_xxx entities ordered according to their reason code. From-SVN: r213194
Diffstat (limited to 'gcc/ada/sem_ch13.adb')
-rw-r--r--gcc/ada/sem_ch13.adb13
1 files changed, 0 insertions, 13 deletions
diff --git a/gcc/ada/sem_ch13.adb b/gcc/ada/sem_ch13.adb
index 16ce674..6510372 100644
--- a/gcc/ada/sem_ch13.adb
+++ b/gcc/ada/sem_ch13.adb
@@ -1544,19 +1544,6 @@ package body Sem_Ch13 is
Set_Entity (Aspect, E);
Ent := New_Occurrence_Of (E, Sloc (Id));
- -- Capture setting of Opt.Uneval_Old
-
- case Opt.Uneval_Old is
- when 'A' =>
- Set_Uneval_Old_Accept (Aspect);
- when 'E' =>
- null;
- when 'W' =>
- Set_Uneval_Old_Warn (Aspect);
- when others =>
- raise Program_Error;
- end case;
-
-- Check for duplicate aspect. Note that the Comes_From_Source
-- test allows duplicate Pre/Post's that we generate internally
-- to escape being flagged here.