diff options
| author | Robert Dewar <dewar@adacore.com> | 2014-08-01 08:19:00 +0000 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-08-01 10:19:00 +0200 |
| commit | f1a85fe7193cddc99f68c80c6aef96231866cad1 (patch) | |
| tree | ad6b6e5460c06819cd77d7b397ad501495da9fbf /gcc/ada/gcc-interface/trans.c | |
| parent | ea0c8cfb98bc575325f35f4798b2c657f4497e5e (diff) | |
| download | gcc-f1a85fe7193cddc99f68c80c6aef96231866cad1.zip gcc-f1a85fe7193cddc99f68c80c6aef96231866cad1.tar.gz gcc-f1a85fe7193cddc99f68c80c6aef96231866cad1.tar.bz2 | |
* gcc-interface/decl.c, gcc-interface/trans.c: Remove VMS handling.
From-SVN: r213415
Diffstat (limited to 'gcc/ada/gcc-interface/trans.c')
| -rw-r--r-- | gcc/ada/gcc-interface/trans.c | 7 |
1 files changed, 0 insertions, 7 deletions
diff --git a/gcc/ada/gcc-interface/trans.c b/gcc/ada/gcc-interface/trans.c index 6df6dea..0798a66 100644 --- a/gcc/ada/gcc-interface/trans.c +++ b/gcc/ada/gcc-interface/trans.c @@ -5484,13 +5484,6 @@ gnat_to_gnu (Node_Id gnat_node) gcc_assert (!TREE_OVERFLOW (gnu_result)); } - /* Convert the Ureal to a vax float (represented on a signed type). */ - else if (Vax_Float (Underlying_Type (Etype (gnat_node)))) - { - gnu_result = UI_To_gnu (Get_Vax_Real_Literal_As_Signed (gnat_node), - gnu_result_type); - } - else { Ureal ur_realval = Realval (gnat_node); |