aboutsummaryrefslogtreecommitdiffstats
path: root/gcc-4.2.1/gcc/ada/a-numeri.ads
diff options
context:
space:
mode:
authorJing Yu <jingyu@google.com>2009-11-05 15:11:04 -0800
committerJing Yu <jingyu@google.com>2009-11-05 15:11:04 -0800
commitdf62c1c110e8532b995b23540b7e3695729c0779 (patch)
treedbbd4cbdb50ac38011e058a2533ee4c3168b0205 /gcc-4.2.1/gcc/ada/a-numeri.ads
parent8d401cf711539af5a2f78d12447341d774892618 (diff)
downloadtoolchain_gcc-df62c1c110e8532b995b23540b7e3695729c0779.tar.gz
toolchain_gcc-df62c1c110e8532b995b23540b7e3695729c0779.tar.bz2
toolchain_gcc-df62c1c110e8532b995b23540b7e3695729c0779.zip
Check in gcc sources for prebuilt toolchains in Eclair.
Diffstat (limited to 'gcc-4.2.1/gcc/ada/a-numeri.ads')
-rw-r--r--gcc-4.2.1/gcc/ada/a-numeri.ads32
1 files changed, 32 insertions, 0 deletions
diff --git a/gcc-4.2.1/gcc/ada/a-numeri.ads b/gcc-4.2.1/gcc/ada/a-numeri.ads
new file mode 100644
index 000000000..a0513d019
--- /dev/null
+++ b/gcc-4.2.1/gcc/ada/a-numeri.ads
@@ -0,0 +1,32 @@
+------------------------------------------------------------------------------
+-- --
+-- GNAT RUN-TIME COMPONENTS --
+-- --
+-- A D A . N U M E R I C S --
+-- --
+-- S p e c --
+-- --
+-- This specification is adapted from the Ada Reference Manual for use with --
+-- GNAT. In accordance with the copyright of that document, you can freely --
+-- copy and modify this specification, provided that if you redistribute a --
+-- modified version, any changes that you have made are clearly indicated. --
+-- --
+------------------------------------------------------------------------------
+
+package Ada.Numerics is
+ pragma Pure;
+
+ Argument_Error : exception;
+
+ Pi : constant :=
+ 3.14159_26535_89793_23846_26433_83279_50288_41971_69399_37511;
+
+ ["03C0"] : constant := Pi;
+ -- This is the greek letter Pi (for Ada 2005 AI-388). Note that it is
+ -- conforming to have this present even in Ada 95 mode, because there is
+ -- no way for a normal mode Ada 95 program to reference this identifier.
+
+ e : constant :=
+ 2.71828_18284_59045_23536_02874_71352_66249_77572_47093_69996;
+
+end Ada.Numerics;