
  VAR
    clv$value_descriptors: [XREF, READ] array
          [clc$variable_reference .. clc$status_value] of string (8);

?? PUSH (LISTEXT := ON) ??
*copyc clt$value_kinds
?? POP ??
