Lines Matching defs:List
33 procedure List (File_Names_Only : Boolean := False) is subprogram
35 Num_Units : constant Nat := Int (Units.Last) - Int (Units.First) + 1;
38 Sorted_Units : Unit_Ref_Table (1 .. Num_Units);
41 Unit_Hed : constant String := "Unit name ";
42 Unit_Und : constant String := "--------- ";
43 Unit_Bln : constant String := " ";
44 File_Hed : constant String := "File name ";
45 File_Und : constant String := "--------- ";
46 File_Bln : constant String := " ";
47 Time_Hed : constant String := "Time stamp";
48 Time_Und : constant String := "----------";
50 Unit_Length : constant Natural := Unit_Hed'Length;
51 File_Length : constant Natural := File_Hed'Length;