[Ada] Minor reformatting and add ??? comment

[bosch@gnat.com]

Applied.

2001-10-26  Robert Dewar <dewar@gnat.com>

	* prj-attr.ads: Minor reformatting
	Add ??? comment (this whole spec has almost no comments)

*** prj-attr.ads	2001/10/05 15:15:23	1.2
--- prj-attr.ads	2001/10/05 15:58:47	1.3
***************
*** 25,34 ****
  -- It is now maintained by Ada Core Technologies Inc ( http://www.gnat.com ). --
  --                                                                          --
  ------------------------------------------------------------------------------
- --
- --  This package defines allowed packages and attributes in GNAT project
- --  files.
  
  with Types; use Types;
  with Table;
  
--- 25,33 ----
  -- It is now maintained by Ada Core Technologies Inc ( http://www.gnat.com ). --
  --                                                                          --
  ------------------------------------------------------------------------------
  
+ --  This package defines allowed packages and attributes in GNAT project files
+ 
  with Types; use Types;
  with Table;
  
***************
*** 36,41 ****
--- 35,42 ----
  
     --  Define the allowed attributes
  
+    --  All these declarations are uncommented, they all need comments ???
+ 
     Attributes_Initial   : constant := 50;
     Attributes_Increment : constant := 50;
  
***************
*** 45,55 ****
     type Attribute_Node_Id is
       range Attribute_Node_Low_Bound .. Attribute_Node_High_Bound;
  
!    First_Attribute_Node_Id : constant Attribute_Node_Id
!      := Attribute_Node_Low_Bound;
  
!    Empty_Attribute : constant Attribute_Node_Id
!      := Attribute_Node_Low_Bound;
  
     type Attribute_Kind is
       (Single,
--- 46,56 ----
     type Attribute_Node_Id is
       range Attribute_Node_Low_Bound .. Attribute_Node_High_Bound;
  
!    First_Attribute_Node_Id : constant Attribute_Node_Id :=
!                                Attribute_Node_Low_Bound;
  
!    Empty_Attribute : constant Attribute_Node_Id :=
!                        Attribute_Node_Low_Bound;
  
     type Attribute_Kind is
       (Single,
***************
*** 84,91 ****
     type Package_Node_Id is
       range Package_Node_Low_Bound .. Package_Node_High_Bound;
  
!    First_Package_Node_Id : constant Package_Node_Id
!      := Package_Node_Low_Bound;
  
     Empty_Package : constant Package_Node_Id := Package_Node_Low_Bound;
  
--- 85,92 ----
     type Package_Node_Id is
       range Package_Node_Low_Bound .. Package_Node_High_Bound;
  
!    First_Package_Node_Id : constant Package_Node_Id :=
!                              Package_Node_Low_Bound;
  
     Empty_Package : constant Package_Node_Id := Package_Node_Low_Bound;