
  TYPE
    clt$file_reference = record
      path_name: clt$path_name,
      path_name_size: 1 .. clc$max_path_name_size,
      validation_ring: record
        case known: boolean of
        = TRUE =
          number: ost$valid_ring,
        casend,
      recend,
    recend;

*copyc clt$path_name
*copyc osd$virtual_address
