{  Type definition for swap file descriptor.  This is part of the
{  swapped job image on mass storage and describes the swap file contents.

  TYPE
    jst$swap_file_descriptor = record
      ijl_entry: jmt$initiated_job_list_entry,
      swapped_job_entry: jmt$swapped_job_entry,
      swapped_page_descriptors: jst$swapped_page_descriptors,
    recend,

    jst$swapped_page_descriptors = array [0 .. *] of
      jst$swapped_page_descriptor,

    jst$swapped_page_descriptor = record
      pft_entry: mmt$page_frame_table_entry,
      page_table_entry: ost$page_table_entry,
      ast_entry: mmt$active_segment_table_entry,
      entry_updated: boolean,
      old_asid {used on swap in if asid reassigned} : ost$asid,
      changed_asid: jst$changed_asid_entry,
    recend,


{  The changed asid list is NOT logically part of the swapped page descriptor
{  but is imbedded in the same record entry since CYBIL does not
{  currently support record definitions that contain multiple adaptable
{  components.

    jst$changed_asid_entry = RECORD
      old_asid: ost$asid,
      new_asid: ost$asid,
      new_asti: mmt$ast_index,
    RECEND;

*copyc jmt$initiated_job_list_entry
*copyc jmt$swapped_job_entry
*copyc mmt$active_segment_table
*copyc mmt$ast_index
*copyc mmt$page_frame_index
*copyc mmt$page_frame_table
*copyc ost$hardware_subranges
