summaryrefslogtreecommitdiff
path: root/gcc/ada/sem_vfpt.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/sem_vfpt.adb')
-rw-r--r--gcc/ada/sem_vfpt.adb10
1 files changed, 2 insertions, 8 deletions
diff --git a/gcc/ada/sem_vfpt.adb b/gcc/ada/sem_vfpt.adb
index d4b76d4eeef..709edfb0c36 100644
--- a/gcc/ada/sem_vfpt.adb
+++ b/gcc/ada/sem_vfpt.adb
@@ -6,9 +6,9 @@
-- --
-- B o d y --
-- --
--- $Revision: 1.10 $
+-- $Revision$
-- --
--- Copyright (C) 1997-2000, Free Software Foundation, Inc. --
+-- Copyright (C) 1997-2002, 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- --
@@ -32,15 +32,9 @@ with Opt; use Opt;
with Stand; use Stand;
with Targparm; use Targparm;
with Ttypef; use Ttypef;
-with Uintp; use Uintp;
-
-pragma Elaborate_All (Uintp);
package body Sem_VFpt is
- T_Digits : constant Uint := UI_From_Int (IEEEL_Digits);
- -- Digits for IEEE formats
-
-----------------
-- Set_D_Float --
-----------------