aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/init.c
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2014-02-19 11:55:33 +0100
committerArnaud Charlet <charlet@gcc.gnu.org>2014-02-19 11:55:33 +0100
commit4877d85f404cfaa4eb33a5efd178d7f6d0e65769 (patch)
tree33cbef6918a24c7e036710b3aacd30c1aac72af0 /gcc/ada/init.c
parentf660fba6af9ac165d3e02c0a9083c9e0897e0c52 (diff)
downloadgcc-4877d85f404cfaa4eb33a5efd178d7f6d0e65769.zip
gcc-4877d85f404cfaa4eb33a5efd178d7f6d0e65769.tar.gz
gcc-4877d85f404cfaa4eb33a5efd178d7f6d0e65769.tar.bz2
[multiple changes]
2014-02-19 Gary Dismukes <dismukes@adacore.com> * gnat_rm.texi: Minor spelling fixes. 2014-02-19 Doug Rupp <rupp@adacore.com> * init.c: Remove unneeded code. * fe.h (Float_Format): New macro * gcc-interface/trans.c (gigi): On VMS, set vms_float_format. From-SVN: r207887
Diffstat (limited to 'gcc/ada/init.c')
-rw-r--r--gcc/ada/init.c4
1 files changed, 0 insertions, 4 deletions
diff --git a/gcc/ada/init.c b/gcc/ada/init.c
index fb94198..e943837 100644
--- a/gcc/ada/init.c
+++ b/gcc/ada/init.c
@@ -809,7 +809,6 @@ void (*__gnat_ctrl_c_handler) (void) = 0;
/* Masks for facility identification. */
#define FAC_MASK 0x0fff0000
#define DECADA_M_FACILITY 0x00310000
-#define SEVERITY_MASK 0x7
/* Define macro symbols for the VMS conditions that become Ada exceptions.
It would be better to just include <ssdef.h> */
@@ -1069,9 +1068,6 @@ __gnat_default_resignal_p (int code)
if ((code & FAC_MASK) == facility_resignal_table [i])
return 1;
- if ((code & SEVERITY_MASK) == 1 || (code & SEVERITY_MASK) == 3)
- return 1;
-
for (i = 0, iexcept = 0;
cond_resignal_table [i]
&& !(iexcept = LIB$MATCH_COND (&code, &cond_resignal_table [i]));