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

⟦73aa2325e⟧ Ada Source

    Length: 5120 (0x1400)
    Types: Ada Source
    Notes: 03_class, FILE, R1k_Segment, e3_tag, seg_03bdb1

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=4
    nid=0
    hdr6=8
        [0x00] rec0=20 rec1=00 rec2=01 rec3=072
        [0x01] rec0=01 rec1=00 rec2=04 rec3=00e
        [0x02] rec0=1a rec1=00 rec2=02 rec3=050
        [0x03] rec0=07 rec1=00 rec2=03 rec3=000
    tail 0x215347eee856574498cdb 0x489e0066482863c01