
  TYPE
    dmt$file_information = record
      eoi_byte_address: amt$file_byte_address,
      file_kind: gft$file_kind,
      shared_queue: mmt$page_frame_queue_id,
      time_last_modified: ost$free_running_clock,
      total_allocated_length: amt$file_byte_address,
      trimmed_length: integer,
    recend;

?? PUSH (LISTEXT := ON) ??
*copyc amt$file_byte_address
*copyc gft$file_kind
*copyc mmt$page_frame_queue_id
*copyc ost$free_running_clock
?? POP ??
