
  VAR
    clv$value_type_kinds: [XREF] array [clt$data_kind] of clt$type_kind;

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