
  TYPE
    tmt$ptl_lock = RECORD
     CASE boolean OF
    = true =
      locked: aligned [0 MOD 8]   boolean,
      count: 0 .. 0ffffff(16),
      id: 0 .. 0ffffffff(16),
{     class: 0 ..0ffffff(16),
    = false =
      clear: aligned [0 mod 8] integer,
     CASEND,
    RECEND;

{copyc mtt$ptl_recovery
