{  Define structures used to manage the IJL arrays.
{  Force word alignment for performance.

  TYPE
    jmt$initiated_job_list_block = RECORD
      in_use_count: ALIGNED [0 MOD 8] 0 .. jmc$max_ijl_index_count,
      terminated_job: boolean,
      index_p: ^ARRAY [jmt$ijl_block_index] OF jmt$initiated_job_list_entry,
    RECEND,

    jmt$initiated_job_list_p = ^ARRAY [0 .. *] OF jmt$initiated_job_list_block;

?? PUSH (LISTEXT := ON) ??
*copyc jmt$ijl_ordinal
*copyc jmt$initiated_job_list_entry
?? POP ??
