TYPE
  jst$ijl_lock  = RECORD
       lock: aligned [0 MOD 8] boolean,
       lock_owner: jmt$ijl_ordinal,
    RECEND;

*copyc jmt$ijl_ordinal
