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