DataMuseum.dk

top - download

    Length: 1478 (0x5c6)
    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⟧ 

TextFile

procedure Show_Load_Proc_Unit_Names (Load_Proc : String := "<SELECTION>";
                                     Response  : String := "<PROFILE>");
------------------------------------------------------------------------------
--  Load_Proc   - Specifies the 'c(Load_Proc) or 'c(Func_Proc) to query.
--  Response    - Specifies what messages to report.
--
-- Used to obtain the Ada object instance ID numbers for the Ada units that
-- make up the source code for this load-proc.  The printout includes lines
-- of this form:
--
--      Library.Resolve ("<[ADA,  12345,1]>");
--
-- These lines will sometimes be followed by an environment path name.
-- These lines indicate the Ada object instance ID of one or more of the
-- original Ada source units that make up this load-proc.  If those Ada source
-- units still exist, and if they exist on the current machine, then the
-- environment paths of those units will also be printed.  If the units do
-- not exist (perhaps they have been edited, moved, renamed, or deleted), or if
-- the load-proc came from another machine, then no path will be printed.
--
-- In order to attempt to locate the source units for this load-proc, take the
-- Library.Resolve lines that were printed and log into each R1000 where the
-- source units might still exist.  Execute the Library.Resolve commands.
-- With luck, eventually one of the source units will be found.
------------------------------------------------------------------------------