
  PROCEDURE [XREF] clp$check_name_for_control
    (    name: clt$name;
     VAR control_statement_descriptor: ^clt$control_statement_desc);

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