
  TYPE
    cmt$system_device_pp = RECORD
      software_idle: boolean,
      primary_pp: dst$iou_resource,
      CASE dual_pp: boolean OF
      = TRUE =
        partner_pp: dst$iou_resource,
        ppit_rma: ost$real_memory_address,
      = FALSE =
      CASEND,
    RECEND;

?? PUSH (LISTEXT := ON) ??
*copyc dst$iou_resource
*copyc ost$hardware_subranges
?? POP ??
