DataMuseum.dk

top - download

    Length: 2183 (0x887)
    Types: TextFile
    Names: »V«

└─⟦516dceb10⟧ Bits:30000751 8mm tape, Rational 1000, RCI_VADS
    └─ ⟦9a14c9417⟧ »DATA« 
        └─⟦this⟧ 

TextFile

-- 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;