CVS difference for arm/source/numerics.mss

Differences between 1.46 and version 1.47
Log of other versions for file arm/source/numerics.mss

--- arm/source/numerics.mss	2005/10/29 06:01:22	1.46
+++ arm/source/numerics.mss	2005/10/31 17:34:20	1.47
@@ -1,8 +1,8 @@
 @comment{ $Source: e:\\cvsroot/ARM/Source/numerics.mss,v $ }
-@comment{ $Revision: 1.46 $ $Date: 2005/10/29 06:01:22 $ $Author: Randy $ }
+@comment{ $Revision: 1.47 $ $Date: 2005/10/31 17:34:20 $ $Author: Randy $ }
 @Part(numerics, Root="ada.mss")
 
-@Comment{$Date: 2005/10/29 06:01:22 $}
+@Comment{$Date: 2005/10/31 17:34:20 $}
 
 @LabeledNormativeAnnex{Numerics}
 @begin{Intro}
@@ -100,8 +100,8 @@
    @key{type} @AdaTypeDefn{Imaginary} @key{is} @key{private};@Chg{Version=[2],New=[
    @key{pragma} Preelaborable_Initialization(Imaginary);],Old=[]}
 
-   @AdaDefn{i} : @key{constant} Imaginary;
-   @AdaDefn{j} : @key{constant} Imaginary;
+   @AdaObjDefn{i} : @key{constant} Imaginary;
+   @AdaObjDefn{j} : @key{constant} Imaginary;
 
 
    @key{function} @AdaSubDefn{Re} (X : Complex)   @key{return} Real'Base;
@@ -1015,9 +1015,9 @@
 
    @key[use] Complex_Types;
 
-   @AdaDefn{Default_Fore} : Field := 2;
-   @AdaDefn{Default_Aft}  : Field := Real'Digits - 1;
-   @AdaDefn{Default_Exp}  : Field := 3;
+   @AdaObjDefn{Default_Fore} : Field := 2;
+   @AdaObjDefn{Default_Aft}  : Field := Real'Digits - 1;
+   @AdaObjDefn{Default_Exp}  : Field := 3;
 
 
    @key[procedure] @AdaSubDefn{Get} (File  : @key[in]  File_Type;

Questions? Ask the ACAA Technical Agent