CVS difference for ais/ai-00388.txt
--- ais/ai-00388.txt 2004/12/09 19:55:38 1.3
+++ ais/ai-00388.txt 2005/01/07 03:07:45 1.4
@@ -1,4 +1,4 @@
-!standard A.5(3) 04-12-01 AI95-00388/02
+!standard A.5(3) 04-12-30 AI95-00388/02
!class amendment 04-11-10
!status Amendment 200Y 04-12-01
!status ARG Approved 8-1-1 04-11-19
@@ -15,17 +15,17 @@
!problem
AI95-00285 introduces support for the entire ISO/IEC 10646:2003 character
-repertoire in source files. In particular, many characters from non-Latin
+repertoire in source files. In particular, many characters from non-Latin
alphabets are now allowed in identifiers.
The identifiers appearing in language-defined units are typically written in
-English, and therefore use the ASCII subset. In general this is appropriate,
+English, and therefore use the ASCII subset. In general this is appropriate,
and there is no reason to take advantage of the support added by AI95-00285.
-One exception to this is the named number Ada.Numerics.Pi. It is universally
-written using the Greek letter pi in printed text. Having to use the ASCII
+One exception to this is the named number Ada.Numerics.Pi. It is universally
+written using the Greek letter pi in printed text. Having to use the ASCII
identifier Pi in numerical algorithms written in Ada degrades the readability of
-the program text. Being able to use the Greek letter would make it clearer to
+the program text. Being able to use the Greek letter would make it clearer to
the reader that a piece of code is using the mathematical number pi, not some
random identifier that happens to read PI.
@@ -52,9 +52,11 @@
package Ada.Numerics is
pragma Pure (Numerics);
Argument_Error : exception;
- Pi : constant := 3.141...;
+ Pi : constant :=
+ 3.14159_26535_89793_23846_26433_83279_50288_41971_69399_37511;
<GREEK SMALL LETTER PI> : constant := Pi;
- e : constant := 2.718...;
+ e : constant :=
+ 2.71828_18284_59045_23536_02874_71352_66249_77572_47093_69996;
end Ada.Numerics;
!discussion
@@ -65,7 +67,27 @@
No example is needed.
---!corrigendum
+!corrigendum A.5(3)
+
+@drepl
+@xcode<@b<package> Ada.Numerics @b<is>
+ @b<pragma> Pure (Numerics);
+ Argument_Error : @b<exception>;
+ Pi : @b<constant> :=
+ 3.14159_26535_89793_23846_26433_83279_50288_41971_69399_37511;
+ e : @b<constant> :=
+ 2.71828_18284_59045_23536_02874_71352_66249_77572_47093_69996;
+@b<end> Ada.Numerics;>
+@dby
+@xcode<@b<package> Ada.Numerics @b<is>
+ @b<pragma> Pure (Numerics);
+ Argument_Error : @b<exception>;
+ Pi : @b<constant> :=
+ 3.14159_26535_89793_23846_26433_83279_50288_41971_69399_37511;
+ @Pi : constant := Pi;
+ e : @b<constant> :=
+ 2.71828_18284_59045_23536_02874_71352_66249_77572_47093_69996;
+@b<end> Ada.Numerics;>
!ACATS test
Questions? Ask the ACAA Technical Agent