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

⟦d7533060e⟧ Ada Source

    Length: 4096 (0x1000)
    Types: Ada Source
    Notes: 03_class, FILE, R1k_Segment, e3_tag, package V_Cpu_Conf, seg_04cdfc

Derivation

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

E3 Source Code



-- Copyright 1987, 1988 Verdix Corporation

----------------------------------------------------------------------
-- This package provides the M68000 processor family machine
-- configuration definitions and data structures used by the RTS Kernel.
----------------------------------------------------------------------
package V_Cpu_Conf is

    pragma Suppress (All_Checks);
    pragma Suppress (Exception_Tables);
    pragma Not_Elaborated;

    --
    -- Default trap numbers
    --
    Default_Krn_Trap : constant := 0;
    Default_Tdm_Trap : constant := 15;

    --
    -- Vector index for Trap 0
    --
    Trap_0_Vector_Number : constant := 32;

    --
    -- Status register masks
    --
    S_Mask : constant := 16#2000#;   -- Supervisor/User state
    Not_S_Mask : constant := 16#DFFF#;
    M_Mask : constant := 16#1000#;   -- Master/interrupt state
    Not_M_Mask : constant := 16#EFFF#;
    Ipl_Mask : constant := 16#0700#; -- Interrupt priority level
    Not_Ipl_Mask : constant := 16#F8FF#;

    -- Supervisor/User state bit number in upper byte of status register
    S_Bit : constant := 5;

    -- Master/interrupt state bit number in upper byte of status register
    M_Bit : constant := 4;

    -- Kernel status register: trace disabled, supervisor state, interrupt
    -- state, interrupt priority = 7 (disabled)
    Krn_Status : constant := 16#2700#;

    -- User status register: trace disabled, user state, interrupt state,
    -- interrupt priority = 0 (enabled)
    User_Status : constant := 16#0000#;

    --
    -- Exception stack frame offsets, masks and format types
    --
    Sr_Frame_Offset : constant := 0;
    Pc_Frame_Offset : constant := 2;
    Format_Vector_Frame_Offset : constant := 6;
    Instr_Addr_Frame_Offset : constant := 8;
    Mid_Instr_Internal_Frame_Offset : constant := 12;

    Format_Mask : constant := 16#F000#;
    Vector_Offset_Mask : constant := 16#0FFF#;

    Short_Format : constant := 16#0000#;
    Throwaway_Format : constant := 16#1000#;
    Normal_Six_Word_Format : constant := 16#2000#;
    Coprocessor_Mid_Instr_Format : constant := 16#9000#;
end V_Cpu_Conf;

E3 Meta Data

    nblk1=3
    nid=0
    hdr6=6
        [0x00] rec0=20 rec1=00 rec2=01 rec3=06c
        [0x01] rec0=1c rec1=00 rec2=02 rec3=000
        [0x02] rec0=06 rec1=00 rec2=03 rec3=000
    tail 0x2154978d2874f7bdd9618 0x42a00088462060003