

  TYPE
    mmt$user_attribute_keyword = (mmc$ua_segment_number,
          mmc$ua_max_segment_length, mmc$ua_preset_value,
          mmc$ua_segment_access_control, mmc$ua_wired_segment,
          mmc$ua_ring_numbers, mmc$ua_null_keyword),

    mmt$user_attribute_descriptor = record
      case keyword: mmt$user_attribute_keyword of
      = mmc$ua_segment_number =
        segnum: ost$segment,
      = mmc$ua_max_segment_length =
        max_length: ost$segment_length,
      = mmc$ua_preset_value =
        preset_value: pmt$initialization_value,
      = mmc$ua_segment_access_control =
        access_control: ost$segment_access_control,
      = mmc$ua_wired_segment =
        wired_segment_length: ost$segment_length,
        contiguous_real_memory: boolean, {NOT IMPLEMENTED YET}
      = mmc$ua_ring_numbers =
        r1: ost$ring,
        r2: ost$ring,
      casend,
    recend;

*copyc osd$virtual_address
*copyc ost$segment_access_control
*copyc pmt$initialization_value
