diff options
author | Tristan Gingold <gingold@adacore.com> | 2012-05-15 10:17:26 +0000 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2012-05-15 12:17:26 +0200 |
commit | 0c644c99db0e5a83b8106a25e8346c2ecc250297 (patch) | |
tree | 80eaa504f086c6fde09e5e8544c13bac2c29a557 /gcc/ada/fe.h | |
parent | a2f6dee8a995f8d62609d3d091d0c96c114d610a (diff) | |
download | gcc-0c644c99db0e5a83b8106a25e8346c2ecc250297.zip gcc-0c644c99db0e5a83b8106a25e8346c2ecc250297.tar.gz gcc-0c644c99db0e5a83b8106a25e8346c2ecc250297.tar.bz2 |
fe.h (Get_RT_Exception_Name): Define.
2012-05-15 Tristan Gingold <gingold@adacore.com>
* fe.h (Get_RT_Exception_Name): Define.
* types.ads (RT_Exception_Code): Update comment.
* exp_ch11.adb, exp_ch11.ads (Get_RT_Exception_Name): New
procedure to get the name of the rcheck subprograms.
* a-except-2005.adb (Rcheck_xx): Rename.
* a-except.adb Likewise, but also keep the old Rcheck_nn routines
for bootstrap.
* arith64.c (__gnat_mulv64): Use __gnat_rcheck_CE_Overflow_Check
instead of __gnat_rcheck_10.
* gcc-interface/trans.c (build_raise_check): Use Get_RT_Exception_Name
to create the __gnat_rcheck routines name.
* gcc-interface/Make-lang.in: Update dependencies.
From-SVN: r187517
Diffstat (limited to 'gcc/ada/fe.h')
-rw-r--r-- | gcc/ada/fe.h | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/fe.h b/gcc/ada/fe.h index fe6b22d..e55253c 100644 --- a/gcc/ada/fe.h +++ b/gcc/ada/fe.h @@ -6,7 +6,7 @@ * * * C Header File * * * - * Copyright (C) 1992-2011, Free Software Foundation, Inc. * + * Copyright (C) 1992-2012, Free Software Foundation, Inc. * * * * GNAT is free software; you can redistribute it and/or modify it under * * terms of the GNU General Public License as published by the Free Soft- * @@ -106,6 +106,7 @@ extern Nat Serious_Errors_Detected; #define Get_Local_Raise_Call_Entity exp_ch11__get_local_raise_call_entity #define Get_RT_Exception_Entity exp_ch11__get_rt_exception_entity +#define Get_RT_Exception_Name exp_ch11__get_rt_exception_name extern Entity_Id Get_Local_Raise_Call_Entity (void); extern Entity_Id Get_RT_Exception_Entity (int); |