
  PROCEDURE [XREF] clp$analyze_command
    (    command_text: ^clt$command_line;
     VAR prompting_requested: boolean;
     VAR escaped: boolean;
     VAR label: ost$name;
     VAR command_reference_index: clt$command_line_index;
     VAR command_reference_size: clt$command_line_size;
     VAR file: clt$file;
     VAR form: clt$command_reference_form;
     VAR name: clt$name;
     VAR utility_name: clt$utility_name;
     VAR parameter_list_index: clt$command_line_index;
     VAR separator: clt$lexical_unit_kind;
     VAR empty_command: boolean;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc clt$command_line
*copyc clt$command_line_index
*copyc clt$command_line_size
*copyc clt$command_reference_form
*copyc clt$file
*copyc clt$lexical_unit_kind
*copyc clt$name
*copyc clt$utility_name
*copyc ost$name
*copyc ost$status
?? POP ??
