DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦21dda3ac5⟧ Ada Source

    Length: 3072 (0xc00)
    Types: Ada Source
    Notes: 03_class, FILE, R1k_Segment, e3_tag, procedure Install_Machine_Initialize, seg_02829b

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦this⟧ 

E3 Source Code



procedure Install_Machine_Initialize
             (Release_World : String := "$$"; Options : String := "");

pragma Loaded_Main;
--
-- This procedure updates a pre Delta 2.2 machine to the new initialization
-- scheme that was introduced in Delta 2.2 (D_12_5_0).
-- After running this procedure, the user should look at three files
-- in the Lists directory in the release world.
-- These files are:
--      Init_Procs_To_Delete - this file lists initialization routines which
--              are identical to those provided by Rational.  These files
--              will be deleted when Install_Subsystems is run.
--      Init_Procs_To_Change - this file lists initialization routines which
--              have been modified from those provided by Rational.
--      Init_Proc_Differences - this file lists the differences of the files
--              listed in Init_Procs_To_Change
--
-- Please see the release note for a more detailed description of how to
-- upgrade to the new initialization scheme.

E3 Meta Data

    nblk1=2
    nid=0
    hdr6=4
        [0x00] rec0=15 rec1=00 rec2=01 rec3=020
        [0x01] rec0=01 rec1=00 rec2=02 rec3=000
    tail 0x217222a5083c16e71e350 0x42a00088462060003