summaryrefslogtreecommitdiff
path: root/gcc/ada/5lsystem.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/5lsystem.ads')
-rw-r--r--gcc/ada/5lsystem.ads7
1 files changed, 4 insertions, 3 deletions
diff --git a/gcc/ada/5lsystem.ads b/gcc/ada/5lsystem.ads
index 951404c3926..c39e7c61d93 100644
--- a/gcc/ada/5lsystem.ads
+++ b/gcc/ada/5lsystem.ads
@@ -7,8 +7,7 @@
-- S p e c --
-- (GNU-Linux/x86 Version) --
-- --
--- --
--- Copyright (C) 1992-2002 Free Software Foundation, Inc. --
+-- Copyright (C) 1992-2003 Free Software Foundation, Inc. --
-- --
-- This specification is derived from the Ada Reference Manual for use with --
-- GNAT. The copyright notice above, and the license provisions that follow --
@@ -59,7 +58,7 @@ pragma Pure (System);
Max_Mantissa : constant := 63;
Fine_Delta : constant := 2.0 ** (-Max_Mantissa);
- Tick : constant := 1.0;
+ Tick : constant := 0.01;
-- Storage-related Declarations
@@ -120,6 +119,7 @@ private
Backend_Overflow_Checks : constant Boolean := False;
Command_Line_Args : constant Boolean := True;
Denorm : constant Boolean := True;
+ Exit_Status_Supported : constant Boolean := True;
Fractional_Fixed_Ops : constant Boolean := False;
Frontend_Layout : constant Boolean := False;
Functions_Return_By_DSP : constant Boolean := False;
@@ -135,4 +135,5 @@ private
ZCX_By_Default : constant Boolean := False;
GCC_ZCX_Support : constant Boolean := False;
Front_End_ZCX_Support : constant Boolean := False;
+
end System;