
  TYPE
    clt$variable_information = record
      access_info_found: boolean,
      access_mode: clt$data_access_mode,
      class: clt$internal_variable_class,
      parameter_passed: boolean,
      evaluation_method: clt$expression_eval_method,
      has_no_internal_value: boolean,
      internal_value: ^clt$internal_data_value,
      type_specification: ^clt$type_specification,
      type_description: ^clt$type_description,
      value_qualifiers_present: boolean,
      value_qualifiers: ^clt$value_qualifiers,
    recend;

*copyc clt$data_access_mode
*copyc clt$expression_eval_method
*copyc clt$internal_data_value
*copyc clt$internal_variable_class
*copyc clt$type_description
*copyc clt$type_specification
*copyc clt$value_qualifiers
