{ Define ordinal type for indexing into the segment offset array.  This array
{ defines byte offsets for beginning of some special segments. These segments do NOT start at
{ offset zero. This is an attempt to reduce thrashing in the page map.

  TYPE
    mmt$page_map_offsets_ord = (mmc$pmo_binding_segment, mmc$pmo_user_stack,
         mmc$pmo_r3_stack, mmc$pmo_r2_stack, mmc$pmo_r1_stack),

    mmt$page_map_offsets =  array [mmt$page_map_offsets_ord] of 0 .. 255;

{ The following constant defines the byte offset in a stack segment for the space reserved
{ for the stack frame save area used by pmp$call_ring_crossing_proc.

{ NOTE: Any changes to the value of this constant must be reflected in the following assembly
{       language decks:
{            SYM$CORE_TRAP_HANDLER
{            SYM$JOB_FIXED_TEMPLATE
{            PMM$TASKING_HELPER_PROCEDURES

  CONST
    mmc$ring_crossing_offset = 28(16);
