DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400 Tapes

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 Tapes

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - download
Index: ┃ T V ┃

⟦a05879ce3⟧ TextFile

    Length: 1842 (0x732)
    Types: TextFile
    Names: »V«

Derivation

└─⟦afbc8121e⟧ Bits:30000532 8mm tape, Rational 1000, MC68020_OS2000 7_2_2
    └─ ⟦77aa8350c⟧ »DATA« 
        └─⟦f794ecd1d⟧ 
            └─⟦this⟧

TextFile

package M68k is

    procedure Assemble (Source_File : String := "<IMAGE>";
                        Options     : String := "";
                        Response    : String := "<PROFILE>");

    procedure Link (Command_File : String := "<IMAGE>";
                    Options      : String := "";
                    Response     : String := "<PROFILE>");

    procedure Remote_Link (Main_Unit        : String := "<IMAGE>";  
                           Remote_Username  : String := "<DEFAULT>";
                           Remote_Machine   : String := "<DEFAULT>";
                           Remote_Directory : String := "<DEFAULT>";
                           Remote_Password  : String := "<DEFAULT>";
                           Response         : String := "<PROFILE>");
    --------------------------------------------------------------------
    -- The following commands are intended for system management only --
    --------------------------------------------------------------------

    subtype Stream_Name  is Integer range 1 .. 5;
    subtype Stream_Count is Stream_Name;

    procedure Restart_Compiler (Streams : Stream_Count := 1);
    -- Replace the existing compiler (if any) with this version; starts
    -- the specified number of streams.

    procedure Start_Common;
    -- Start the cross compiler common layer (only one copy may be run
    -- per R1000)

    procedure Start_Control;
    -- Start the Motorola_68k compiler control layer (only one copy may be
    -- run per R1000)

    procedure Start_Stream;
    -- Start an additional compilation stream; a maximum of three may be
    -- started.

    procedure Kill_Stream (Stream : Stream_Name);
    -- Kill stream "cleanly" (wait for current compilation to complete)

    procedure Diagnose_Compiler (Script : String := "");
    -- for Rational use only

end M68k;