DataMuseum.dk

top - download

    Length: 1243 (0x4db)
    Types: TextFile
    Names: »V«

└─⟦d10a02448⟧ Bits:30000409 8mm tape, Rational 1000, ENVIRONMENT, D_12_7_3
    └─ ⟦fc9b38f02⟧ »DATA« 
        └─⟦9b46a407a⟧ 
            └─⟦12c68c704⟧ 
                └─⟦this⟧ 
└─⟦5f3412b64⟧ Bits:30000745 8mm tape, Rational 1000, ENVIRONMENT 12_6_5 TOOLS 
    └─ ⟦91c658230⟧ »DATA« 
        └─⟦458657fb6⟧ 
            └─⟦220843204⟧ 
                └─⟦this⟧ 

TextFile

with Action;
with Calendar;
with Directory;

package Cmvc_Implementation_Utilities is
    function Appropriate_Modification_Time
                (Obj : Directory.Object; Action_Id : Action.Id)
                return Calendar.Time;

    -- return the time the unit was last modified.  For Ada units, the
    -- edit time is used.  For others, the modified time is used.

    procedure Analyze_Space (For_Subsystem              : String  := "<IMAGE>";
                             Do_Reservation_Token_Trace : Boolean := False);

    -- Produce a report describing how space is used in the
    -- cmvc_database indicated.  If Do_Reservation_Token_Trace is
    -- true, a (potentiall long) report is written showing by
    -- Element which reservation_tokens (version sets) are defined
    -- and which configurations reference them

    procedure Enable_Page_Accounting (To_What : Boolean := False);

    -- Turn on page tracing within the Cmvc_Database disk subsystem.  The
    -- result is a report of what pages were touched how many times
    -- whenever a database is closed.  This is system wide, and causes the
    -- creation of garbage.

    pragma Subsystem (Tools);
    pragma Module_Name (4, 3762);
end Cmvc_Implementation_Utilities;