
  TYPE
    jmt$swapin_candidate_q_header = RECORD
      swapin_candidate_queue: jmt$ijl_ordinal,
      number_of_jobs_in_queue:  0 .. jmc$max_ijl_ord,
      end_of_dp_q: ARRAY [jmc$priority_p1..jmc$priority_p14] OF jmt$ijl_ordinal,
    RECEND;

?? PUSH (LISTEXT := ON) ??
*copyc jmt$dispatching_priority
*copyc jmt$ijl_ordinal
*copyc jmc$maximum_constants
?? POP ??
