DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - downloadIndex: ┃ T V ┃
Length: 2808 (0xaf8) Types: TextFile Names: »V«
└─⟦5f3412b64⟧ Bits:30000745 8mm tape, Rational 1000, ENVIRONMENT 12_6_5 TOOLS └─ ⟦91c658230⟧ »DATA« └─⟦458657fb6⟧ └─⟦a5bbbb819⟧ └─⟦this⟧ └─⟦d10a02448⟧ Bits:30000409 8mm tape, Rational 1000, ENVIRONMENT, D_12_7_3 └─ ⟦fc9b38f02⟧ »DATA« └─⟦9b46a407a⟧ └─⟦eec0a994f⟧ └─⟦this⟧
package Xref is procedure Used_By (List_Of_Names : String := "<IMAGE>"; Do_Functions : Boolean := True; Do_Generics : Boolean := True; Do_Procedures : Boolean := True; Do_Attributes : Boolean := False; Do_Record_Components : Boolean := False; Do_Constants : Boolean := False; Do_Entries : Boolean := False; Do_Exceptions : Boolean := False; Do_Labels : Boolean := False; Do_Packages : Boolean := False; Do_Parameters : Boolean := False; Do_Pragmas : Boolean := False; Do_Task_Bodies : Boolean := True; Do_Types : Boolean := False; Do_Variables : Boolean := False; Exclude_References_From : String := ""; List_File_Name : String := ""); -- Produce a report showing all of the units that reference (use) something -- defined in the units specified in "List_Of_Names". Only the IDs defined -- in units specified in "List_Of_Names" will be included in the report. -- "Using" units can be excluded by listing their names in -- "Exclude_References_From". procedure Uses (List_Of_Names : String := "<IMAGE>"; Visible_Declarations_Only : Boolean := True; Do_Functions : Boolean := True; Do_Generics : Boolean := True; Do_Procedures : Boolean := True; Do_Attributes : Boolean := False; Do_Record_Components : Boolean := False; Do_Constants : Boolean := False; Do_Entries : Boolean := False; Do_Exceptions : Boolean := False; Do_Labels : Boolean := False; Do_Packages : Boolean := False; Do_Parameters : Boolean := False; Do_Pragmas : Boolean := False; Do_Task_Bodies : Boolean := True; Do_Types : Boolean := False; Do_Variables : Boolean := False; Exclude_References_To : String := ""; Only_References_To : String := ""; List_File_Name : String := ""); -- produce a report of the items referenced by the units specified -- in "list_of_names". Units mentioned in "Exclude_references_To" -- are not included in the report. If units are mentioned in -- Only_references_to then these are the only units included in the -- report. It is an error to specify both Exclude... and Only... end Xref;