
  TYPE
    gft$segment_lock_info = RECORD
      locked_for_read: gft$open_count,
      locked_for_write: boolean,
      task_queue: tmt$task_queue_link,
    RECEND;

*copyc gft$open_count
*copyc tmt$task_queue_link
