(Name => Current_Item_Name,
Location => Current_Location,
Value => No_Array_Element,
- Next =>
- In_Tree.Packages.Table (Pkg).Decl.Arrays);
+ Next => In_Tree.Packages.Table
+ (Pkg).Decl.Arrays);
In_Tree.Packages.Table (Pkg).Decl.Arrays :=
New_Array;
(Name => Current_Item_Name,
Location => Current_Location,
Value => No_Array_Element,
- Next =>
- In_Tree.Projects.Table (Project).Decl.Arrays);
+ Next => In_Tree.Projects.Table
+ (Project).Decl.Arrays);
In_Tree.Projects.Table (Project).Decl.Arrays :=
New_Array;
(Name => Current_Item_Name,
Location => Current_Location,
Value => No_Array_Element,
- Next =>
- In_Tree.Packages.Table
- (Pkg).Decl.Arrays);
+ Next => In_Tree.Packages.Table
+ (Pkg).Decl.Arrays);
In_Tree.Packages.Table (Pkg).Decl.Arrays :=
The_Array;
(Name => Current_Item_Name,
Location => Current_Location,
Value => No_Array_Element,
- Next =>
- In_Tree.Projects.Table
- (Project).Decl.Arrays);
+ Next => In_Tree.Projects.Table
+ (Project).Decl.Arrays);
In_Tree.Projects.Table
(Project).Decl.Arrays := The_Array;