
  TYPE
    oct$return_file_list = record
      file_name: ^fst$file_reference,
      link: ^oct$return_file_list,
    recend;

*copyc fst$file_reference
