
  TYPE
    clt$variables = record
      hash_groups: array [clt$variable_name_hash] of clt$variable_hash_group,
      thread: ^clt$variable_access,
    recend;

*copyc clt$variable_access
*copyc clt$variable_hash_group
*copyc clt$variable_name_hash
