diff options
Diffstat (limited to 'gcc/ada/stand.ads')
| -rw-r--r-- | gcc/ada/stand.ads | 36 |
1 files changed, 18 insertions, 18 deletions
diff --git a/gcc/ada/stand.ads b/gcc/ada/stand.ads index b9dac00..dd5e9a7 100644 --- a/gcc/ada/stand.ads +++ b/gcc/ada/stand.ads @@ -229,8 +229,8 @@ package Stand is type Standard_Entity_Array_Type is array (Standard_Entity_Type) of Node_Id; Standard_Entity : Standard_Entity_Array_Type; - -- This array contains pointers to the Defining Identifier nodes for - -- each of the visible entities defined in Standard_Entities_Type. It is + -- This array contains pointers to the Defining Identifier nodes for each + -- of the visible entities defined in Standard_Entities_Type. The array is -- initialized by the Create_Standard procedure. Standard_Package_Node : Node_Id; @@ -336,12 +336,12 @@ package Stand is -- carrying the enumeration literal names. Standard_A_Char : Entity_Id; - -- Access to character, used as a component of the exception type to - -- denote a thin pointer component. + -- Access to character, used as a component of the exception type to denote + -- a thin pointer component. Standard_Debug_Renaming_Type : Entity_Id; - -- A zero-size subtype of Integer, used as the type of variables used - -- to provide the debugger with name encodings for renaming declarations. + -- A zero-size subtype of Integer, used as the type of variables used to + -- provide the debugger with name encodings for renaming declarations. Predefined_Float_Types : Elist_Id; -- Entities for predefined floating point types. These are used by @@ -395,9 +395,9 @@ package Stand is -- Used to represent some unknown integer type Any_Modular : Entity_Id; - -- Used to represent the result type of a boolean operation on an - -- integer literal. The result is not Universal_Integer, because it is - -- only legal in a modular context. + -- Used to represent the result type of a boolean operation on an integer + -- literal. The result is not Universal_Integer, because it is only legal + -- in a modular context. Any_Numeric : Entity_Id; -- Used to represent some unknown numeric type @@ -409,10 +409,10 @@ package Stand is -- Used to represent some unknown scalar type Any_String : Entity_Id; - -- The type Any_String is used for string literals before type - -- resolution. It corresponds to array (Positive range <>) of character - -- where the component type is compatible with any character type, - -- not just Standard_Character. + -- The type Any_String is used for string literals before type resolution. + -- It corresponds to array (Positive range <>) of character where the + -- component type is compatible with any character type, not just + -- Standard_Character. Universal_Integer : Entity_Id; -- Entity for universal integer type. The bounds of this type correspond @@ -438,9 +438,9 @@ package Stand is Standard_Integer_16 : Entity_Id; Standard_Integer_32 : Entity_Id; Standard_Integer_64 : Entity_Id; - -- These are signed integer types with the indicated sizes, They are - -- used for the underlying implementation types for fixed-point and - -- enumeration types. + -- These are signed integer types with the indicated sizes, They are used + -- for the underlying implementation types for fixed-point and enumeration + -- types. Standard_Unsigned : Entity_Id; -- An unsigned type of the same size as Standard_Integer @@ -465,7 +465,7 @@ package Stand is -- initialization that is carried out by Create_Standard. procedure Tree_Write; - -- Writes out the entity values in this package to the current - -- tree file using Osint.Tree_Write. + -- Writes out the entity values in this package to the current tree file + -- using Osint.Tree_Write. end Stand; |