aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/gcc-interface/trans.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/gcc-interface/trans.c')
-rw-r--r--gcc/ada/gcc-interface/trans.c7
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);